デフォルトの形式がファイル拡張子と一致しない可能性があります。ファイル名とともにファイル形式を指定し、形式が拡張子と一致することを確認する必要があります。
With someWorkbook
.SaveAs "C:\someDirector\Awesome.xlsm", fileformat:=xlOpenXMLWorkbookMacroEnabled
End With
OTOH、.SaveAs ファイル名に拡張子がありません。プログラムでこれを行う場合は、1 つ指定する必要があるかもしれません。GUI インターフェースから拡張機能を提供する必要がないのは便利ですが、私たちプログラマーは明確なコードを書くことを期待されています。拡張子と一致する形式を追加することをお勧めします。ファイル形式のリストについては、この msdn ページを参照してください。正直なところ、私は説明をあまり認識していません。
xlExcel8 = 56 は .xls 形式です
xlExcel12 = 50 は .xlsb 形式です
xlOpenXMLWorkbook = 51 は .xlsx 形式です
xlOpenXMLWorkbookMacroEnabled = 52 は .xlsm 形式です
xlWorkbookDefaultも51 の値でリストされています。これは、デフォルトの形式を変更できると思っていたので、私を困惑させます。