我选择的列中第一个使用的行

Question

我想清除工作表中从所选列中第一个使用的行到最后使用的行的所有单元格，但首先我必须知道所选列中第一个使用的行。如何找到“X”列中的第一行？(X 可以 = {A, B, C, ...})

Answer 1

尝试

firstUsedRow = Worksheets("Sheet1").Cells(1, 1).End(xlDown).Row

其中第二个参数Cells(1, 1)是列号（例如，A=1、B=2 等）。Sheet1是相关工作表的工作表名称。

尽管在您的情况下不太可能，但第一行可能是第 1 行。在这种情况下，上面的代码实际上将选择已使用范围的最后一行。作为这种情况下的安全措施，请识别最后一行并确保第一行是 1 或由上述代码生成的行。所以

finalRow = Worksheets("Sheet1").Cells(Worksheets("Sheet1").UsedRange.Rows.Count, 1).End(xlUp).Row
if finalRow = firstUsedRow then
    firstUsedRow = 1
End If

全部一起

firstUsedRow = Worksheets("Sheet1").Cells(1, 1).End(xlDown).Row
finalRow = Worksheets("Sheet1").Cells(Worksheets("Sheet1").UsedRange.Rows.Count, 1).End(xlUp).Row
if finalRow = firstUsedRow then
    firstUsedRow = 1
End If