QueryTable.TextFileConsecutiveDelimiter プロパティ (Excel)

True の場合は、テキスト ファイルをクエリ テーブルにインポートするときに、連続する区切り記号が単一の区切り記号として処理されます。 既定値は False です。 値の取得と設定が可能なブール型 (Boolean) の値です。

構文

式。TextFileConsecutiveDelimiter

式QueryTable オブジェクトを表す変数。

注釈

このプロパティは、クエリ テーブルがテキスト ファイルのデータに基づいている場合 ( QueryType プロパティが xlTextImport に設定されている場合)、 および TextFileParseType プロパティの値が xlDelimited の場合にのみ使用します。

ユーザー インターフェイスを使用してデータをインポートすると、Web クエリまたはテキスト クエリのデータが QueryTable オブジェクトとしてインポートされ、他のすべての外部データが ListObject オブジェクトとしてインポートされます。

オブジェクト モデルを使用してデータをインポートする場合は、Web クエリまたはテキスト クエリのデータを QueryTable としてインポートする必要があります。一方、他のすべての外部データは ListObject または QueryTable としてインポートできます。

TextFileConsecutiveDelimiter プロパティは QueryTable オブジェクトにのみ適用されます。

例

この例では、最初のブックの最初のワークシートにあるクエリ テーブルで空白文字が区切り記号になるように設定してから、そのクエリ テーブルを最新の情報に更新します。 スペースが連続する場合は 1 つのスペースとして扱われます。

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 
 .TextFileSpaceDelimiter = True 
 .TextFileConsecutiveDelimiter = True 
 .Refresh 
End With

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。