Excel VBA - 范围选择所有不空白的行和列

Question

给定一个表（n x m）如何在VBA中选择所有内容？

注意我可能希望将所有内容存储在一个变量中，因此选择我并不意味着突出显示但是抓住所有内容。图片只是我想要的数据的一个例子

Sub SelectAll()

ActiveWorkbook.Sheets("instance").Select


ActiveCell.CurrentRegion.Select

End Sub

如果之前有人问过这个问题，我很抱歉，我无法在本网站上找到解决方案，以便主持人可以关闭此问题或链接已解答的解决方案。

Answer 1

您可以从以下范围创建2D数组：

Sub SelectAll()

    Dim myTable As Variant

    myTable = Range("A1").CurrentRegion.Value

    '// myTable is now a 2D-Array that you can work with
    '// by using row/column indeces like so:

    Debug.Print myTable(1, 1) '// A1 value
    Debug.Print myTable(2, 1) '// A2 value
    Debug.Print myTable(3, 1) '// A3 value

    Debug.Print myTable(1, 2) '// B1 value
    Debug.Print myTable(2, 2) '// B2 value
    Debug.Print myTable(3, 2) '// B3 value

End Sub