エクセル初心者です。

質問

A列に100行くらいのデータが入っています。B列に同じく100行くらいのデータが入っています。
　　　　A　　B
（例）AAA　　120％
　　　BBB　　2300t/年
　　　CCC　　AA3500

コレをA列に　AAA120、BBB2300　等のように1つのセルにデータをまとめたいのです。できれば一括で・・。でB列を削除したいのです。A1&B1で表示をしたら、120％のところが1.2になって％も表示されません・・。

回答No.3

soons

ちょっと長いですがすごく簡単ですのでお試しを。

1.シート内を全部選択（Ctrl + A）してコピー（Ctrl + C）
2.メモ帳を開いてそのまま貼り付け（Ctrl + V）
3.貼り付けたデータをそのまま全部選択（Ctrl + A）してコピー（Ctrl + C）
4.ワードを開きそのまま貼り付け（Ctrl + V）
5.[編集]メニュー→[置換]でダイアログを表示
6.置換ダイアログにて
「オプション」を表示
「あいまい検索」のチェックをはずす
「特殊文字▽」のリストから「タブ文字」を選択（検索対象に「^t」）
「置換後の文字列」は空のまま「すべて置換」を実行
これですべてのタブ文字を削除する。
7.文書内を全部選択（Ctrl + A）してコピー（Ctrl + C）
8.エクセルの新規書類に貼り付け（Ctrl + V）

ポイント：
エクセルではどうしても「120%」→「1.2」などの問題を解決できなかったので
ここは発想を変えて純粋なテキストデータとして扱えるアプリで処理すればOK。
「TeraPad」などのテキストエディタがあれば、もっと簡単に出来るでしょう。

回答No.2

zap35

先の質問の補足でマクロがご希望のようですのでマクロにしました。
範囲が分からないのでとりあえず１行目からＡ列の最終行までを処理対象にしています。

マクロはALT＋F11でVBE画面を開き、「VBAProjectエクスプローラのシート名右クリック」→「挿入」→「標準モジュール」で表示される画面にペーストして下さい。実行はシート画面に戻って、ALT＋F8を押してマクロ一覧からマクロ名を選択します。

Sub Macro1()
Dim idx As Long
　With ActiveSheet
　　For idx = 1 To .Range("A65536").End(xlUp).Row
　　　.Cells(idx, "A").Value = .Cells(idx, "A").Text & .Cells(idx, "B").Text
　　　.Cells(idx, "B").ClearContents
　　Next
　End With
End Sub

マクロの実行結果は「Undo」で戻せませんので、ブックをセーブしてから実行されることをお勧めします。

回答No.1

kadakun1

Ａ列とＢ列の書式設定を文字列にすればいいです。
それでA1&B1で表示されるはず。