Excel 2010 でも 2007 でも 2003 でも 2003以前形式で保存するVBA
以前のバージョンと互換性を持つファイル形式で保存するコード
Workbooks(1).SaveAs FileName:=FileName, FileFormat:=xlExcel8
をExcel 2003 で実行するとエラーになります。
xlExcel8 という定義は、2003以前という定義で2003にはわからないようです。
2003では、xlExcel9795という定義を使います。
以下のサイトの説明が分かりやすかったです。
http://blog.livedoor.jp/akf0/archives/51172335.html
そのサイトのソースをそのまま紹介させていただきます。
以下のコードで、Excel 2010 でも 2007 でも 2003 でも 2003以前形式で保存できます。
・
Dim FileName As String
FileName = "C:\テスト.xls"
If Application.Version < 12 Then
Workbooks(1).SaveAs FileName:=FileName, FileFormat:=xlExcel9795
Else
Workbooks(1).SaveAs FileName:=FileName, FileFormat:=xlExcel8
End If
End Sub