【マクロ】アクティブセルの行のデータをクリアするマクロについて

【やりたい事】
アクティブセルとなっている行のデータを全てクリアするマクロを
作りたいです

マクロが保存しているファイルと行のデータをクリアするファイルは
別です

ご存じの方、教えて下さい


【行データをクリアしたいファイル】
"C:\Users\2020\OneDrive\マクロ\vlookup.xlsm"



【マクロが保存してあるファイル】
"C:\Users\2020\OneDrive\マクロ\コントロールファイル\いろいろあり転記元.xlsm"




【最終行のデータをクリアするコード】

Sub iroiro()


Dim filePath As String
filePath = "C:\Users\2020\OneDrive\マクロ\vlookup.xlsm"

Dim wb As Workbook

Dim LASTROW As Long

Set wb = Workbooks.Open(filePath)

Set ws = wb.Worksheets("反映先")

LASTROW = Cells(Rows.Count, "A").End(xlUp).Row

ws.Rows(LASTROW).Clear


End Sub

No.1 回答者： んけー 回答日時： 2024/06/12 07:07

マクロファイルを開き、マクロを記録するボタンを押したあと

操作対象のファイルに行って、そのセルの内容を消す
マクロファイルに戻って記録を停止
マクロファイルのソースコードに
さっきの操作内容のコマンドが記述されているのでそれを元にコードを組み立てる。

この回答へのお礼

アドバイスありがとうございます

お礼日時：2024/06/12 09:10