0

セル M22 を使用して最後の列に移動するダイナミック レンジをクリアしようとしていますが、最後の列の使用がうまくいきません。

ありがとう

Sub clear()
Workbooks.Open Filename:=ThisWorkbook.path & "\..\Master Info Page.xlsx"


  With Sheets("Sheet1")
    lastCol = .Cells(13, .Columns.Count).End(xlToLeft).Column
    Lastrow = .Cells(.Rows.Count, lastCol).End(xlUp).Row
  End With

Sheets("Sheet1").Range(Cells(M22, 13), Cells(Lastrow, lastCol)).Clear

End Sub
4

1 に答える 1

3

あなたはただできませんでした:

With Sheets("Sheet1")
    .Range("M22", .Cells(.Rows.Count, .Columns.Count)).Clear
End With
于 2013-08-19T20:22:29.567 に答える