xls2003形式をxlsx形式(2007以降形式)でファイル保存する【ExcelVBA】

xls2003形式をxlsx形式(2007以降形式)でファイル保存する
xls2003形式をxlsx形式(2007以降形式)で保存するサンプルコード
注意点
関連記事

xls2003形式をxlsx形式(2007以降形式)でファイル保存する

エクセル2003形式(.xls)のファイルをエクセル2007形式(.xlsx)のファイルに保存したい場合があります。
SaveAs の際、FileFormat:=xlWorkbookDefaultを指定するだけです。
指定忘れると、ファイルを開くと以下エラーが表示されます。
————————–
～.xlsxを開くことができません。ファイル形式またはファイル拡張子が正しくありません。ファイルが破損しておらず、ファイル拡張子とファイル形式が一致していることを確認してください。
————————–

xls2003形式をxlsx形式(2007以降形式)で保存するサンプルコード

Public Sub sample()
    
    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs Filename:="C:\vba\sample.xlsx" , FileFormat:=xlWorkbookDefault
    Application.DisplayAlerts = True

End Sub