Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel vba中对表格范围的引用_Excel_Vba - Fatal编程技术网

Excel vba中对表格范围的引用

Excel vba中对表格范围的引用,excel,vba,Excel,Vba,我想将数据从Excel导入SQL。我写了一些代码-当我使用Set rng=Application.Range“F5:H10”)。 但是,我想使用表,因为每次数据量都会发生变化。如何在代码的这一部分中使用Excel表 谢谢单向: Sub Table2Range() Dim rng As Range Set rng = ActiveSheet.ListObjects(1).Range MsgBox rng.Address(0, 0) End Sub 注意: 您可以获得标题

我想将数据从Excel导入SQL。我写了一些代码-当我使用
Set rng=Application.Range“F5:H10”)
。 但是,我想使用表,因为每次数据量都会发生变化。如何在代码的这一部分中使用Excel表

谢谢

单向:

Sub Table2Range()
    Dim rng As Range
    Set rng = ActiveSheet.ListObjects(1).Range
    MsgBox rng.Address(0, 0)
End Sub

注意:

您可以获得标题和数据体。

单向:

Sub Table2Range()
    Dim rng As Range
    Set rng = ActiveSheet.ListObjects(1).Range
    MsgBox rng.Address(0, 0)
End Sub

注意:


您可以获得标题和数据体。

如果不需要标题,可以使用
Set rng=Range(“Table1”)
。只需将
Table1
替换为表名。如果不需要标题,可以使用
Set rng=Range(“Table1”)
。只需将
Table1
替换为您的表名即可。还可以使用
ListObjects(1).DataBodyRange
仅获取数据范围。还可以使用
ListObjects(1).DataBodyRange
仅获取数据范围。