Excel VBA教程:TextFileSemicolonDelimiter属性

如果向查询表中导入文本文件时使用分号作为分隔符,且TextFileParseType属性为 xlDelimited,则该值为 True。默认值为 False。Boolean 类型,可读写。

说明

只有当查询表是基于文本文件中的数据(QueryType属性设置为 xlTextImport)时,才使用本属性。

Excel VBA教程:TextFileSemicolonDelimiter属性·示例

本示例将第一个工作簿中第一张工作表上的查询表的分隔符设置为分号,然后刷新该查询表。


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 = xlDelimited
    .TextFileSemicolonDelimiter = True
    .Refresh
End With

上页:Excel VBA教程:TextFilePromptOnRefresh属性 下页:Excel VBA教程:TextFileSpaceDelimiter属性

Excel VBA教程:TextFileSemicolonDelimiter属性

Excel VBA教程:TextFileSpaceDelimiter属性 Excel VBA教程:TextFileStartRow属性
Excel VBA教程:TextFileTabDelimiter属性 Excel VBA教程:TextFileTextQualifier属性
Excel VBA教程:TextFileThousandsSeparator属性 Excel VBA教程:TextFileTrailingMinusNumbers属性
Excel VBA教程:TextFrame属性 Excel VBA教程:TextShape属性
Excel VBA教程:TextToDisplay属性 Excel VBA教程:TextureName属性
Excel VBA教程:TextureType属性 Excel VBA教程:ThisCell属性
Excel VBA教程:ThisWorkbook属性 Excel VBA教程:ThousandsSeparator属性
Excel VBA教程:ThreeD属性 Excel VBA教程:ThrottleInterval属性
Excel VBA教程:TickLabelPosition属性 Excel VBA教程:TickLabels属性
Excel VBA教程:TickLabelSpacing属性 Excel VBA教程:TickMarkSpacing属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号