首页 文章

宏以查找结束数据并将所有选定的数据转换为数字格式

提问于
浏览
0

我的数据总是从单元格E2开始,并且在未确定的行数量和未确定的列数量下降 . 我想要一个宏来查找包含数据的最后一行,最后一列包含数据,并从E2突出显示数据的末尾,并将其全部转换为数字格式 .

我已经找到了如何在行和列中找到包含数据的最后一个单元格 . 但我不知道如何选择从E2到最后一个数据范围的数据范围 .

2 回答

  • 0

    如果 Rng 是你的最后一个单元格,那么

    Range(Range("E2"), Rng)).Select
    
  • 0

    很确定有一个更简单的方法,但这个工作:

    Dim i As Integer
    i = 2
    
    While ActiveWorkbook.ActiveSheet.Range("E" & i).Value <> ""
     i = i + 1
    Wend
    
    ActiveWorkbook.ActiveSheet.Range("E2:E" & (i - 1)).Select
    

    如果你只记录它就更简单:

    Range("E2").Select
    Range(Selection, Selection.End(xlDown)).Select
    

相关问题