返回或设置与要导入到查询表中的文本文件中字符) (列宽度相对应的整数数组。 有效的宽度为 1 到 32767 个字符。 读/写 Variant。
语法
表达式。TextFileFixedColumnWidths
表达式 表示 QueryTable 对象的变量。
备注
仅当查询表基于文本文件中的数据时， (QueryType 属性设置为 xlTextImport) ，并且仅当 TextFileParseType 属性的值为 xlFixedWidth 时，才使用此属性。
必须指定一个有效的非负值列宽。 如果指定的列超出了文本文件的宽度，则会忽略那些值。 如果文本文件的宽度大于指定的列的总宽度，则文本文件的余额将导入到其他列中。
如果使用用户界面导入数据，则来自 Web 查询或文本查询的数据将作为 QueryTable 对象导入，而所有其他外部数据将作为 ListObject 对象导入。
如果使用对象模型导入数据，则必须将来自 Web 查询或文本查询的数据导入为 QueryTable，而所有其他外部数据可以导入为 ListObject 或 QueryTable。
TextFileFixedColumnWidths 属性仅适用于 QueryTable 对象。
示例
本示例向第一个工作簿中第一张工作表上的新查询表中导入一个固定宽度的文本文件。 该文本文件的第一列为五个字符宽度，作为文本导入。 第二列为四个字符宽度，被跳过。 该文本文件的剩余部分被导入第三列，并对其应用常规格式。
Set shFirstQtr = Workbooks(1).Worksheets(1)
Set qtQtrResults = shFirstQtr.QueryTables _
.Add(Connection := "TEXT;C:\My Documents\19980331.txt", _
Destination := shFirstQtr.Cells(1, 1))
With qtQtrResults
.TextFileParseType = xlFixedWidth
.TextFileFixedColumnWidths = Array(5, 4)
.TextFileColumnDataTypes = _
Array(xlTextFormat, xlSkipColumn, xlGeneralFormat)
.Refresh
End With
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。