Excel VBA设置从单元格到具有值的最后一列的范围

Excel VBA设置从单元格到具有值的最后一列的范围,excel,vba,Excel,Vba,我已经设置了从单元“U7”到“HV7”的范围。 此范围的目的是计算其中的值 当前代码正在运行,但我希望通过选择“到最后一个值”来避免值超出HV列的可能性 Dim countRange As Range Set countRange = Range("U7:HV7") Dim rowcount As Long rowcount = Application.WorksheetFunction.CountA(countRange) @超对称性为我提供了理想的解决方案 Set c

我已经设置了从单元“U7”到“HV7”的范围。 此范围的目的是计算其中的值

当前代码正在运行,但我希望通过选择“到最后一个值”来避免值超出HV列的可能性

Dim countRange As Range
Set countRange = Range("U7:HV7")

Dim rowcount As Long
rowcount = Application.WorksheetFunction.CountA(countRange)

@超对称性为我提供了理想的解决方案

Set countRange = Range("U7", Cells(7, Columns.Count).End(xlToLeft)

我的表格中的值格式正确,因此我可以使用此解决方案从单元格U7中选择所有值,直到右边的最后一个值。

是否要在计数中包含HV以外的值(如果存在)?如果是这样,请尝试设置countRange=Range(“U7”,Cells(7,Columns.Count).End(xlToLeft))@supersymetry这正是我想要做的,只是不知道如何设置它。