ファイル形式

ファイルを保存する時に名前を付けて保存をすると、ファイルの種類が決まっています。

下図はExcel2016です。

 

既定のファイルの種類は、[ファイル]>[その他]>[オプション]>[保存]>[ファイルの保存形式]で設定できます。

Excelからファイル
その他からオプション
保存

 

これをVBAでやってみます。

既定のファイルの種類の取得、設定には「DefaultSaveFormat」プロパティを使います。

< スポンサーリンク >





構文

Applicationオブジェクト.DefaultSaveFormat = XlFileFormat

ファイルを保存するときの既定の形式を取得または設定します。Long型です。

【XlFileFormat】

名前説明拡張子 
xlAddIn18Microsoft Excel 97-2003 アドイン*.xla 
xlAddIn818Microsoft Excel 97-2003 アドイン*.xla 
xlCSV6CSV*.csv 
xlCSVMac22Macintosh CSV*.csv 
xlCSVMSDOS24MSDOS CSV*.csv 
xlCSVUTF862UTF8 CSV*.csvExcel2013にはなし
xlCSVWindows23Windows CSV*.csv 
xlCurrentPlatformText-4158現在のプラットフォームのテキスト*.txt 
xlDBF27Dbase 2 形式*.dbf 
xlDBF38Dbase 3 形式*.dbf 
xlDBF411Dbase 4 形式*.dbf 
xlDIF9DIF ファイル*.dif 
xlExcel1250Excel バイナリ ブック*.xlsb 
xlExcel216Excel バージョン 2.0 (1987)*.xls 
xlExcel2FarEast27Excel バージョン 2.0 far east (1987)*.xls 
xlExcel329Excel バージョン 3.0 (1990)*.xls 
xlExcel433Excel バージョン 4.0 (1992)*.xls 
xlExcel4Workbook35Excel バージョン 4.0 ブックの形式 (1992)*.xlw 
xlExcel539Excel バージョン 5.0 (1994)*.xls 
xlExcel739Excel 95 (バージョン 7.0)*.xls 
xlExcel856Excel 97-2003 ブック*.xls 
xlExcel979543Excel バージョン 95 およびバージョン 97*.xls 
xlHtml44HTML 形式.htm。.html 
xlIntlAddIn26International Add-Inファイル拡張子なし 
xlIntlMacro25International Macroファイル拡張子なし 
xlOpenDocumentSpreadsheet60OpenDocument スプレッドシート*.ods 
xlOpenXMLAddIn55XML アドインを開く*.xlam 
xlOpenXMLStrictWorkbook61 (&H3D)XML ファイルを厳密に開く*.xlsx 
xlOpenXMLTemplate54XML テンプレートを開く*.xltx 
xlOpenXMLTemplateMacroEnabled53マクロを有効にした XML テンプレートを開く*.xltm 
xlOpenXMLWorkbook51XML ブックを開く*.xlsx 
xlOpenXMLWorkbookMacroEnabled52マクロを有効にした XML ブックを開く*.xlsm 
xlSYLK2シンボリック リンク形式*.slk 
xlTemplate17Excel テンプレート形式*.xlt 
xlTemplate817テンプレート 8*.xlt 
xlTextMac19Macintosh テキスト*.txt 
xlTextMSDOS21MSDOS テキスト*.txt 
xlTextPrinter36プリンター テキスト*.prn 
xlTextWindows20Windows テキスト*.txt 
xlUnicodeText42Unicode テキストファイル拡張子なし。*.txt 
xlWebArchive45Web アーカイブ.mht。.mhtml 
xlWJ2WD114Japanese 1-2-3*.wj2 
xlWJ340Japanese 1-2-3*.wj3 
xlWJ3FJ341Japanese 1-2-3 形式*.wj3 
xlWK15Lotus 1-2-3 形式*.wk1 
xlWK1ALL31Lotus 1-2-3 形式*.wk1 
xlWK1FMT30Lotus 1-2-3 形式*.wk1 
xlWK315Lotus 1-2-3 形式WK3 
xlWK3FM332Lotus 1-2-3 形式WK3 
xlWK438Lotus 1-2-3 形式*.wk4 
xlWKS4Lotus 1-2-3 形式*.wks 
xlWorkbookDefault51ブックの既定*.xlsx 
xlWorkbookNormal-4143ブックの標準*.xls 
xlWorks2FarEast28Microsoft Works 2.0 far east 形式*.wks 
xlWQ134Quattro Pro 形式*.wq1 
xlXMLSpreadsheet46XML スプレッドシート*.xml 

 

既定のファイル形式を取得してメッセージで表示してみます。

Sub test()
    MsgBox Application.DefaultSaveFormat
End Sub

ファイル形式
ファイル形式

51がメッセージで表示されているので、xlWorkbookDefault(*.xlsx)が設定されています。

 

文字コードがUTF-8のcsv形式に設定してみます。

Sub test()
    Application.DefaultSaveFormat = xlCSVUTF8
End Sub

ファイル形式
ファイル形式

 

< スポンサーリンク >