如何在同一Excel工作簿跨标签页引用表格非连续特定列？

无需VBA的实现方案 #

Excel原生结构化引用语法确实不支持直接用逗号/分号分隔选择不相邻列，但可以通过以下两种函数方法达成需求：

• CHOOSE函数组合法：
  用CHOOSE将目标列按顺序组合，示例公式：

  =CHOOSE({1,3,5}, Table1[Column1], Table1[Column3], Table1[Column5])
  

  其中{1,3,5}对应你要提取的列在表格中的位置序号，后面依次跟上每列的结构化引用。旧版Excel输入后按Ctrl+Shift+Enter触发数组输入，新版Excel会自动将结果溢出到相邻单元格区域。

• INDEX函数数组法：
  借助INDEX的数组参数指定列号，示例公式：

  =INDEX(Table1, , {1,3,5})
  

  第三个参数传入列号数组，即可提取对应不相邻列，结果同样支持自动溢出或组合键触发数组输入。

Power Query的正确操作路径 #

你之前遇到的Power Query无法跨表选数据，是操作路径有误：

1. 点击数据>获取数据>自文件>自工作簿，选择当前打开的工作簿；
2. 在导航器窗口中，找到目标工作表里的结构化表格并勾选；
3. 进入Power Query编辑器后，右键点击不需要的列选择删除，仅保留所需的不相邻列；
4. 点击关闭并上载，将处理后的表格加载到指定位置，后续源表格更新时可一键刷新同步。

关于结构化引用的限制 #

你尝试用逗号、&等分隔符无效，是因为Excel结构化引用语法本身仅支持[ColA]:[ColB]这种连续列选择方式，没有直接指定不相邻列的语法，这是设计上的限制，并非操作遗漏。

VBA方案（可选） #

如果上述方法无法满足自动化需求，可以用简单VBA代码提取指定列，示例：

Sub ExtractNonAdjacentColumns()
    Dim srcTable As ListObject
    Dim destRange As Range
    Dim colNames As Variant
    Dim i As Integer
    
    ' 定义源表格与目标区域
    Set srcTable = ThisWorkbook.Worksheets("源工作表").ListObjects("Table1")
    Set destRange = ThisWorkbook.Worksheets("目标工作表").Range("A1")
    
    ' 指定要提取的列名
    colNames = Array("Column1", "Column3", "Column5")
    
    ' 复制列标题
    For i = LBound(colNames) To UBound(colNames)
        destRange.Offset(0, i).Value = colNames(i)
    Next i
    
    ' 复制列数据
    For i = LBound(colNames) To UBound(colNames)
        srcTable.ListColumns(colNames(i)).DataBodyRange.Copy _
        destRange.Offset(1, i)
    Next i
End Sub

运行该宏可将指定列批量复制到目标区域，适合需要重复批量操作的场景。

内容的提问来源于stack exchange，提问作者Kevin L