- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:エクセルのマクロで特定の文字があるときだけコピーできるようにしたい)
エクセルのマクロで特定の文字があるときだけコピーできるようにする方法
このQ&Aのポイント
- エクセルのマクロを使って特定の文字がある場合にコピーする方法について説明します。
- 具体的には、B列に「*」以外の文字がある場合にその左のセルを下のセルにコピーし、右のセルを指定したセルにコピーする処理を繰り返します。
- この作業を「ココマデ」と書いているセルまで繰り返すことで、特定の条件の時にのみコピーが行われるマクロを作成することができます。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
A列に連番、B列にアルファベット又は*、C列に数値が 入力されているという事でよいでしょうか。 その場合 Sub Macro1() COUNTER = -1 For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row If Range("B" & i) <> "*" Then COUNTER = COUNTER + 2 Cells(50, COUNTER) = Range("A" & i) Cells(51, COUNTER + 1) = Range("C" & i) End If Next End Sub で出来ると思います。