Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ブックのファイル形式を調べる（FileFormat プロパティ）

2015/11/30 2016/01/12

ブックのファイル形式を調べる（FileFormat プロパティ）

指定したブック（開いているブック）のファイルの種類（ファイル形式）を調べるには、FileFormat プロパティ を使用します。値の取得のみ可能で、XlFileFormat 列挙型 の定数を使用します。

【書式】

object.Fileformat

引数・戻り値

object ・・・対象となる Workbook オブジェクトを指定します。
戻り値・・・ XlFileFormat 列挙型の値（整数値）。

Fileformat プロパティ使用例

サンプルVBAソース

　
Sub Sample_FileFormat()

    
    Dim FilePathName As String
    Dim w As Workbook
    
    '保存するファイルのパスと名前
    FilePathName = CreateObject("WScript.Shell").specialfolders("Desktop") & "\Test"
    
    '新規ブック作成
    Set w = Workbooks.Add
    
    'CSV（カンマ区切り）のファイル形式で保存
    w.SaveAs Filename:=FilePathName, FileFormat:=xlCSV
    
    'ファイルの形式を表示
    MsgBox w.FileFormat
    
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

　

Sub Sample_FileFormat()

Dim FilePathName As String

Dim w As Workbook

'保存するファイルのパスと名前

FilePathName = CreateObject("WScript.Shell").specialfolders("Desktop") & "\Test"

'新規ブック作成

Set w = Workbooks.Add

'CSV（カンマ区切り）のファイル形式で保存

w.SaveAs Filename:=FilePathName, FileFormat:=xlCSV

'ファイルの形式を表示

MsgBox w.FileFormat

End Sub

　

実行結果

- ブック・シートの操作 FileFormat プロパティ, VBA基本, Workbook オブジェクト, XlFileFormat 列挙型, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: アクティブプリンタを変更（ActivePrinter プロパティ）

ActivePrinter プロパティ ActivePrinter プロパティを …

: 印刷設定（フッターに文字列を指定）LeftFooter,CenterFooter,RightFooter

PageSetup.LeftFooter プロパティ PageSetup.Lef …

: スクロールバーの表示・非表示（DisplayHorizontalScrollBar,DisplayVerticalScrollBar）

スクロールバーの表示・非表示の設定 Windows オブジェクトの Displ …

: 印刷範囲の設定・解除（PageSetup.PrintArea プロパティ）

PageSetup.PrintArea プロパティ印刷範囲を設定するには、Pa …

: 印刷設定（ヘッダーに画像を指定）LeftHeaderPicture, CenterHeaderPicture, RightHeaderPicture

ヘッダーに画像を表示するには LeftHeaderPicture プロパティ、C …

: 枠線の表示・非表示の設定（DisplayGridlines プロパティ）

枠線の表示・非表示の設定枠線の表示・非表示を設定するには、DisplayGri …

: 枠線を含めて印刷（PageSetup.PrintGridlines プロパティ）

PageSetup.PrintGridlines プロパティ PageSetup …

: 印刷実行前に総ページ数を取得（ExecuteExcel4Macro メソッド）

印刷の総ページ数を取得（ExecuteExcel4Macro メソッド） Exc …

: 背景に画像を表示（SetBackgroundPicture メソッド）

SetBackgroundPicture メソッド SetBackgroundP …

: ブックを別名で保存（SaveAs メソッド）

ブックを別名で保存（SaveAs メソッド）ブックの変更を保存したり、新規ブッ …

PREV: ブックを別名で保存（SaveAs メソッド）
NEXT: ブックの変更が保存されているかを確認する（Saved プロパティ）