エクセルのマクロについて教えてください。

下記のマクロを実行すると
セル「H5」をセル「L2」にコピペできます。
マクロを実行した時にセル「L2」に不特定の文字が先に表示されているときに
このマクロを実行しても「L2」に上書きされない方法があれば教えてください。
現状のマクロ
Sheets("受付").Range("L2").Value _
= Sheets("受付").Range("H5").Value
End Sub

以上となります。
宜しくお願い致します。

No.1 ベストアンサー 回答者： shut0325 回答日時： 2024/07/04 17:29

条件の言い方を変えれば「L2が空白だったならH5の値を入れる」となると思います。

加えて実行されたかどうかがわからないで心配ならメッセージボックスで表示するとよいかと思います。


IF　Sheets("受付").Range("L2").Value＝””　Then
Sheets("受付").Range("L2").Value = Sheets("受付").Range("H5").Value

msg="置き換えが完了しました。”

Else

msg="置き換えはしていません”

End IF

Msgbox(msg)

End Sub

でよいと思います。

この回答へのお礼

回答ありがとございます
詳しくコードを教えて頂きまして
感謝いたします
上手く行きました^ ^

お礼日時：2024/07/04 18:23