人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

質問です
エクセルのSheet1のB列の1行目からデータがあります
Sheet2のA列の1行目から参照データがあります

Sheet2のA列の参照データをみてSheet1のB列データの中に同じものがあれば
Sheet1のB列の同じ文字を,カンマと置き換えるマクロか関数をおねがいします。

Sheet1
B列
aaaaaaaaaaあああ01110111
bbbbbbbbbbい1011011110

Sheet2
A列




答え
Sheet1
B列
aaaaaaaaaa,,,01110111
bbbbbbbbbb,1011011110



●質問者: inosisi
●カテゴリ:コンピュータ インターネット
✍キーワード:エクセル データ マクロ 関数
○ 状態 :終了
└ 回答数 : 1/1件

▽最新の回答へ

1 ● きゃづみぃ
●100ポイント ベストアンサー
Sub Macro1()

 a1 = "sheet1"
 a2 = "sheet2"
 
 If Worksheets(a2).Range("A2") = "" Then
 b = 1
 Else
 b = Worksheets(a2).Range("A1").End(xlDown).Row
 End If


 For c = 1 To b
 Worksheets(a1).Columns("B:B").Replace What:=Worksheets(a2).Cells(c, "A"), Replacement:=",", LookAt:=xlPart, _
 SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
 ReplaceFormat:=False
 Next c
End Sub
◎質問者からの返答

早速ありがとうございます

参照データを作って試してみます

テストではOKです

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ