Question

我正在尝试获取嵌入在用户表单中的电子表格中的最后一行和最后一列。

我一直把它当作常规电子表格（参考单元格，范围......等）处理它并且它一直工作得很好，直到我试图得到最后一行或列。知道语法是否正确？

我最终得到运行时错误'91'

LastRow = Hold_Summary_UserForm.Spreadsheet1.Sheets("Sheet1").Cells.Find("*", SearchOrder:=xlByRows, LookIn:=xlValues, SearchDirection:=xlPrevious).Row

Answer 1

如果工作表没有内容，您的代码将失败：您应该将其拆分为多个步骤

Dim f As Range, LastRow As Long

Set f = Hold_Summary_UserForm.Spreadsheet1.Sheets("Sheet1").Cells.Find("*", _
          SearchOrder:=xlByRows, LookIn:=xlValues, SearchDirection:=xlPrevious)

If Not f Is Nothing Then
    LastRow = f.Row
Else
    'no content...
End If

获取嵌入在用户窗体中的电子表格中的最后一行

1 个答案: