QueryTable.PreserveFormatting プロパティ (Excel)

True の場合、先頭の 5 行のデータに共通する書式をクエリ テーブルの新しい行のデータに適用します。 未使用のセルは書式設定されません。 このプロパティが False の場合、クエリ テーブルに最後に適用したオートフォーマットがクエリ テーブルの新しい行のデータに適用されます。 既定値は True です。

構文

式。PreserveFormatting

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

注釈

データベース クエリ テーブルの場合、既定の書式設定設定は xlSimple定数です。

The new AutoFormat style is applied to the query table when the table is refreshed. PreserveFormatting が False に設定されている場合、AutoFormat は None にリセットされます。 As a result, any AutoFormat that's set before PreserveFormatting is set to False and before the query table is refreshed doesn't take effect, and the resulting query table has no formatting applied to it.

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

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

PreserveFormatting プロパティにアクセスするには、ListObject の QueryTable プロパティを使用します。

例

次の使用例は、ワークシート 1 のピボットテーブル レポートの書式を維持します。

Worksheets(1).PivotTables("Pivot1").PreserveFormatting = True

次の使用例は、PreserveFormatting プロパティに False を設定すると、オートフォーマットの書式に指定した xlRangeAutoFormatColor1 の代わりに xlRangeAutoFormatNone が設定されてしまうことを示しています。

With Workbooks(1).Worksheets(1).QueryTables(1) 
 .Range.AutoFormat = xlRangeAutoFormatColor1 
 .PreserveFormatting = False 
 .Refresh 
End With

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

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