在行中查找上次使用的单元格地址

我使用VBA从数据库填充Excel表单中的行。我在Excel工作表中有超过50列，我想找到最后一个列地址来显示整个数据的总数。我该如何解决这个问题？在行中查找上次使用的单元格地址

2010-06-04 raam

来自http://www.ozgrid.com/VBA/ExcelRanges.htm的代码。你会发现有其他有用的潜艇在Excel中找到“最后”的东西，以及几个注意事项。

Sub FindLastColumn() 
Dim LastColumn As Integer 
If WorksheetFunction.CountA(Cells) > 0 Then 
    'Search for any entry, by searching backwards by Columns.' 
    LastColumn = Cells.Find(What:="*", After:=[A1], _ 
         SearchOrder:=xlByColumns, _ 
        SearchDirection:=xlPrevious).Column 
       MsgBox LastColumn 
End If 
End Sub

来源

2010-06-04 21:03:21

谢谢您的回复！我试试这个代码，它的工作，但是这个代码返回上次使用的列数即如果上次使用的柱是从左侧24细胞意味着它返回的细胞计数，但我需要确切（例如：如果最后使用的列范围是T4，那么我需要确切的T4作为结果）。现在我使用此代码 Range（“IV4”）。End（xlToLeft）.Select – raam 2010-06-09 13:02:46

在行中查找上次使用的单元格地址

回答

相关问题