共用方式為


QueryTable.TextFileFixedColumnWidths 屬性 (Excel)

傳回或設定整數陣列,該陣列對應至您要匯入查詢表格之文字檔中 (字元) 直欄寬度。 可使用的寬度為從 1 到 32767 個字元。 讀取/寫入的 Variant

語法

表達。TextFileFixedColumnWidths

代表 QueryTable 物件的變數。

註解

只有當您的查詢資料表是以 QueryType 屬性設定為 xlTextImport) 的文字檔 (中的資料為基礎,且只有在 TextFileParseType 屬性的值為 xlFixedWidth 時,才使用此屬性。

必須指定一個可使用的非負值欄寬。 如果指定的行超出了文字檔的寬度,則會略過那些值。 如果文字檔的寬度大於您指定的直欄總寬度,則會將文字檔的餘額匯入到其他直欄中。

如果您使用使用者介面匯入資料,則來自 Web 查詢或文字查詢的資料會匯入為 QueryTable 物件,而所有其他外部資料都會匯入為 ListObject 物件。

如果您使用物件模型匯入資料,則必須將 Web 查詢或文字查詢中的資料匯入為 QueryTable,而所有其他外部資料都可以匯入為 ListObjectQueryTable

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 支援與意見反應