Excel Sheet 中的问题清除单元格

Question

下面的代码用于清除 Excel 中 A15:H 单元格的值：

'Set TargetSheet and clear the previous contents
targetSheet = "Lägg in Ärende"
tRow = 15
lastRow = Sheets(targetSheet).Range("A" & Rows.Count).End(xlUp).Row
Sheets(targetSheet).Range("A15:H" & lastRow).ClearContents

当单元格 A15:H 中存在值时，它可以正常工作。

但是当 A15:H 中的单元格为空并且您仍然运行宏时，A2、A9 和 A14:H14 中的所有单元格都会被删除。有人知道为什么吗？

Answer 1

这对你有帮助。

targetSheet = "Lägg in Ärende"
lastRow = Sheets(targetSheet).Range("A" & Rows.Count).End(xlUp).Row

IF lastRow<15 THEN lastRow=15
Sheets(targetSheet).Range("A15:H" & lastRow).ClearContents

Excel Sheet 中的问题清除单元格

Issues clearing cells in Excel Sheet

excel

vba