No.4ベストアンサー
- 回答日時:
B列のデータが同じものを1つのセルに結合したデータをセル内改行で表示したいならたとえば以下のような操作でできます。
C1セルには「=A1」と入力し、C2セルに以下の式を入力し下方向にオートフィルコピーします。
=IF(B1=B2,C1&CHAR(10)&A2,A2)
D2セルに以下の式を入力し下方向にオートフィルコピーします。
=IF(B2=B3,"",IF(B1=B2,C1&CHAR(10)&A2,A2))
E1セルに以下の式を入力して下方向にオートフィルコピーします。
=IF(D1="","",B1)
次に「データ」「フィルタ」でE列の▼をクリックして「空白セル」のチェックを外し、希望のデータけを表示して、抽出された範囲をコピーし、E列のフィルタ解除してG1セル(または新規シート)に「貼り付け」ます。
最後にG列のセルの書式設定の表示形式タブで「折り返して全体を表示する」のチェックを入れます。
ご回答ありがとうございます。
シンプルな式で、なるほど!と思いながら書いていきました。
最後に抽出されたデータは重複するセルを削除(=空白セルの削除)できれいにまとめられました。
大いに利用させていただきたいと思います。
本当にありがとうございました。
No.5
- 回答日時:
No4の回答の訂正と補足です。
オートフィルタで抽出した数式データをコピーして貼り付けるときは「G1セルで右クリックし「形式を選択して貼り付け」で「値」を選択してください。
単純に縦の複数のセルの値を1つのセルにまとめたいだけならフィル(文字の割り付け)の機能を利用することができます。
A列の列幅を結合した文字列が1行で表示できるセル幅になるように十分広く設定しておいて、結合したいセル範囲を選択し、ホームタブの「フィル」「文字の割り付け」(Excel2003なら「編集」「フィル」「文字の割り付け」)をしてみてください。
No.3
- 回答日時:
No.1です。
質問文や補足で、条件がきちんと示されれば、できないとは思えません。文字列を結合すべきセルの数が多くて、式を書くのが困難であれば、オートフィルの機能を併用してください。例えば、次のようなデータがあります。
A B
1 あ
2 い
3 う
4 え
5 お
6 か
7 き
8 く
9 け
10 こ
(1)B1とB2セルに次の式を入力。
B1
=a1
B2
=b1&"
"&a2
(2)B2にカーソルを置き、カーソル枠の右下の角をダブルクリック(オートフィル)。
(3)結合された文字列が算出されているB10をコピーして他のセルに「形式を選択して貼り付け」する。続いてそのセルに対して「折り返して全体を表示」を設定する。
以上により「あ~こ」が改行付きで1つのセルに入力されたデータが得られます。何千個であろうが、オートフィルなので、労力は大してかかりません。
回答有り難うございます。
文字列をまとめる方法としてはとても重宝します。
しかし、これを分類ごとにしなければならなくて……。
ありがとうございました。
No.2
- 回答日時:
こんばんは!
すでにデータが入っているセルを結合してしまうと、アラート画面が出て
質問にあるような状態になると思います。
(結合セルの最初のデータのみ表示)
そこで結合ではなく、B列データが同じものを一つのセルにまとめる方法はどうでしょうか?
VBAになってしまいますが・・・
一例です。
画面左↓の操作したいSheet見出し上で右クリック → コードの表示 → VBE画面に
↓のコードをコピー&ペーストしてマクロを実行してみてください。
(Alt+F8キー → マクロ → マクロ実行です)
尚、データは1行目からあるとしています。
Sub test() 'この行から
Dim i As Long
Application.ScreenUpdating = False
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
If Cells(i, 2) = Cells(i - 1, 2) Then
Cells(i - 1, 1) = Cells(i - 1, 1) & vbCrLf & Cells(i, 1)
Range(Cells(i, 1), Cells(i, 2)).Delete (xlUp)
End If
Next i
Columns("A:B").HorizontalAlignment = xlCenter
Application.ScreenUpdating = True
End Sub 'この行まで
※ 一旦マクロを実行すると元に戻せませんので、別Sheetでマクロを試してみてください。
参考になりますかね?m(_ _)m
回答有り難うございます。
こちらのマクロ、試させて頂きました。一発でデータが整理されて非常に助かりました。
しかし、大量のデータだったため数時間単位で時間がかかってしまいました。
しかしながら、マクロを学んでみようというキッカケになりました。ありがとうございました。
No.1
- 回答日時:
数が少なければ、手動で文字列を切り貼りしてください。
改行の文字列は、Ctrl+Enterで入ります。数が多ければ、参考URLの方法で文字列を結合してください。参考URL:http://oshiete.goo.ne.jp/qa/7451736.html
早速のご回答ありがとうございます。
例ではAが3つBが3つですが、実際は行の数が変則的なので、参考URLの式では対応できません。
分類(AやBのような)だけで1000弱あるので手動でするわけにもいかず……
また試行錯誤してみます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 関数EXACT(文字列,文字列)とexcelVBA 3 2022/04/14 15:07
- Excel(エクセル) Excel 関数 数式 について 2 2022/09/02 21:45
- Excel(エクセル) エクセル VBA セルの結合 2 2022/09/07 11:48
- Excel(エクセル) エクセルの書式設定の表示形式で設定した文字を文字列としてコピーしたい 1 2022/12/21 10:41
- Excel(エクセル) エクセルVBAでセルに表示されているとおりの数値を取得したい(時間の計算結果) 1 2022/03/30 17:52
- Excel(エクセル) Excelで数式をそのままコピーしたい どうすればいいですか? 4 2022/09/16 02:16
- Excel(エクセル) エクセルでIF関数中にIFERROR関数を使いたいのですが???? 5 2022/04/08 13:24
- Excel(エクセル) エクセルで、 A1セルに「A」という値、 B1セルに「B」という値が入っています。 どちらも表示形式 5 2023/02/22 23:05
- Excel(エクセル) 日本語向きの“ダブルクオーテーション”の入力 1 2022/10/16 11:33
- Excel(エクセル) Excelについて A1からA12まで、1月〜12月と入力し、 B1からB12の範囲に、C1とD1に 4 2022/05/26 22:48
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
excelでSUBTOTAL関数を設定した...
-
セルを結合した場合の関数(COU...
-
EXCELで、結合されたセルに連続...
-
エクセル ボタンを押すとセルの...
-
Excel 離れたセルへの連続デー...
-
VBAで結合したセルがクリアでき...
-
エクセルでチェックボックスを...
-
エクセルで片方のセルに入力し...
-
エクセルでセルをクリックして“...
-
EXCEL VBAでたくさんのURLの一...
-
Excel セルを結合したものを抽...
-
Excelの表に自動でナンバリング...
-
Excelのカウントアップボタンに...
-
エクセルVBAでセルのFormulaHid...
-
セルの値を取得してSQL文に組み...
-
Excelの関数を教えてください。
-
エクセル 結合セル内に空白なら...
-
エクセルでたくさんのセルを小...
-
結合セルのデータ消去でエラー...
-
Excel2007 セルの削除について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
excelでSUBTOTAL関数を設定した...
-
エクセル ボタンを押すとセルの...
-
EXCELで、結合されたセルに連続...
-
セルを結合した場合の関数(COU...
-
エクセルで片方のセルに入力し...
-
Excel 離れたセルへの連続デー...
-
VBAで結合したセルがクリアでき...
-
セルの値を取得してSQL文に組み...
-
Excelの表に自動でナンバリング...
-
エクセルでセルをクリックして“...
-
Excelのカウントアップボタンに...
-
エクセル 結合セル内に空白なら...
-
Excel セルを結合したものを抽...
-
VBAで困っています。
-
Excel2007 セルの削除について
-
【EXCEL】条件に合致するセルの...
-
エクセルでたくさんのセルを小...
-
エクセルで作業した日の日付を残す
-
Excelでnullになるような式のセ...
-
EXCEL VLOOKUP的コメント自動表示
おすすめ情報