Vba 无法将所选范围存储到变量中

Vba 无法将所选范围存储到变量中,vba,Vba,我有以下代码选择所有使用的单元格,从指定的单元格开始 Dim sht As Worksheet Dim LastRow As Long Dim LastColumn As Long Dim StartCell As Range Dim ranged_select As Range Set sht = Worksheets("Worksheet1") Set StartCell = Range("C2") 'Find Last Row and Colum

我有以下代码选择所有使用的单元格,从指定的单元格开始

Dim sht As Worksheet
Dim LastRow As Long
Dim LastColumn As Long
Dim StartCell As Range
Dim ranged_select As Range

Set sht = Worksheets("Worksheet1")
Set StartCell = Range("C2")

'Find Last Row and Column
  LastRow = sht.Cells(sht.Rows.Count, StartCell.Column).End(xlUp).Row
  LastColumn = sht.Cells(StartCell.Row, sht.Columns.Count).End(xlToLeft).Column

'Select Range
  sht.Range(StartCell, sht.Cells(LastRow, LastColumn)).Select
但是为什么最后一行呢
sht.Range(起始单元格、短单元格(最后一行、最后一列))。选择
我不能将其分配给变量?我希望变量是一个范围。我已尝试将此变量
Dim used_ranged指定为Range
,但它给了我“运行时错误”91:'

这是数据,以及当我运行代码时它的样子,代码只选择从C2开始的数据

将sht变暗为工作表
最后一排一样长
将最后一列变长
暗淡的StartCell As范围
变暗范围\选择作为范围
设置sht=工作表(“工作表1”)

设置StartCell=sht.Range(“C2”)”
Set StartCell=sht.Range(“C2”)
,否则它将默认为活动表中的任何内容。如果您希望变量中的范围,则需要删除
。选择
,因为这不会返回您可以分配给变量的任何内容。感谢您的回复,我已进行了两次更改,但仍然会弹出相同的错误代码。