SaveAsでバージョンを指定して保存する方法が分かりません。
WINDOWS7
ACCESS2010のVBAから、EXCEL2000用のファイルとして保存するために、以下のようにしました
------------
Dim oApp As Object
Dim oWkb As Object
Dim oWks As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
oApp.DisplayAlerts = Flase '確認メッセージの非表示
Set oWkb = oApp.Workbooks.Open(filename:=CurrentProject.Path & "\" & MyFile, PassWord:="")
・
・
・
↓ここで「オブジェクトがありません」と言うエラー
oWkb.SaveAs CurrentProject.Path & "\" & MyFile, FileFormat:=xlExcel9795
どのようにしたら宜しいですか?
No.2ベストアンサー
- 回答日時:
あなたの書いた実際のコードを載せてほしいな~。
適当に端折って提示されてますので余計なことまで考えてしまいます。
MyFile の変数?に何処で値を入れてるのだろうとか、
False のタイプミスとか。
はっきり言えるのは、xlExcel9795 はExcelの定数なので
Accessは解釈できませんから
oWkb.SaveAs CurrentProject.Path & "\" & MyFile, FileFormat:=43
のようにします。
Excelのイミディエイトウィンドウで
?xlExcel9795 としてEnter で確認してください。
ただ、
43 だと後で見た時に「何じゃこりゃ?」になりますので
Const myExcel9795 = 43 とでもしといて
oWkb.SaveAs CurrentProject.Path & "\" & MyFile, FileFormat:=myExcel9795
ですね。
なお、Excelに参照設定しておいて
(Microsoft Excel 14.0 Object Library)
やれば、xlExcel9795 はそのまま使えます。
また、Access2010上での実行ですから、xlExcel9795 → xlExcel8 → 56
の方が。
No.1
- 回答日時:
FileFormatを「:=」で指定するなら、ファイル名も「:=」が要るんじゃないだろうか?(自信無し)
oWkb.SaveAs FileName:=CurrentProject.Path & "\" & MyFile, FileFormat:=Excel.XlFileFormat.xlExcel9795
参考URL:http://msdn.microsoft.com/ja-jp/library/ff841185 …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) エクセル VBA メール本文に指定セルに記載されているURLをリンクとして記載する方法 8 2022/08/08 07:50
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) VBA初心者です。 2 2022/10/10 11:52
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/03/28 14:52
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルVBAについて
-
VBAで、強制保存してブックを閉...
-
VBAでPDF作成をしたあと、指定...
-
Excel VBA で困っています。
-
N88 BASICで作成されたEXEのソ...
-
ExcelVBAでテキスト保存
-
ソースコードがぐちゃぐちゃ
-
EXCEL VBA SaveAsメソッドについて
-
html 保存できない
-
読み取り専用ファイルを上書き...
-
CImageのファイル名を指定して保存
-
コマンドプロンプトでデスクト...
-
vbaでIEの名前を付けて保存(A)...
-
pythonのプログラムを実行した...
-
保存をすると再開できる時とで...
-
VBAでIEの「ファイルのダウンロ...
-
VBSでHPを保存するにはど...
-
ファイルの保存ダイアログでデ...
-
onedriveで同期解除をしたら、...
-
Windowsファイルエクスプローラ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
読み取り専用ファイルを上書き...
-
Excel VBAでほかのアプリケーシ...
-
Corel Digital Studioの動画をS...
-
コマンドプロンプトでデスクト...
-
Excel VBAで作成したマクロをxl...
-
エクセルで「名前を付けて保存...
-
ExcelVBAでデスクトップのPATH...
-
VBA メモ帳の上書き保存がしたい
-
VBAで、強制保存してブックを閉...
-
irvineを利用してVBAからダウン...
-
VBScriptでのSaveAsについて
-
webページの特定の部分だけ消し...
-
VBScriptで日本語が変です
-
Pivot table で集計されたデー...
-
AccessVBAでレポートをPDFで出力
-
vbaでIEの名前を付けて保存(A)...
-
ファイルのダウンロード保存先...
-
エクセル:マクロ:保存時に連...
-
htmlから取り込んだ を消...
-
VBAでPDF作成をしたあと、指定...
おすすめ情報