こんにちは。誰か助けて下さい。
職場で、Accessを使用しシステムを作成しています。
昨日から、Excel出力時にエラーが出て、途中で止まってしまいます。
OS:XpPro、Office:XpProです。SQLServer2000を使用しています。
自分以外の端末では、通常通りに出力が出ます。
クエリーをそのままExcel出力することはできますが、特定のフォーマットに指示して出力することができなくなりました。
デバックでストップするところは、****の行です。
エラー内容は、【実行時エラー'430':クラスはオートメーションまたは予測したインターフェースをサポートしていません。】です。
長くなりますが、お願いいたします。
--抜粋--
'指定されたExcelシートに上書き
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open(FileName:=テンプレートファイル名)
Set xlSheet = xlBook.Worksheets("Data_Area")
sql = "SELECT * FROM tmp_tableA"
Set rst = CurrentDb.OpenRecordset(sql, dbOpenSnapshot, dbReadOnly)
xlSheet.Range("A3").Clear
'*********下行で止まります。**********
xlSheet.Range("A3").CopyFromRecordset rst
'*************************************
No.1ベストアンサー
- 回答日時:
>実行時エラー'430':クラス・・
WindowsXPでデバッグしているコンポーネントが適正にインストールされていない場合でるエラーですよね。
MDACが損傷している。バージョンがあっていない。
WindowsScriptが損傷しているためVBScript.dllが動いていない。
なにかのソフトがVBScriptの動きを止めてしまっている・・等
確認してみてください。
MDACのダウンロード(要バージョン確認)
http://www.microsoft.com/japan/msdn/data/downloa …
WindowsScriptのダウンロード
http://msdn.microsoft.com/library/default.asp?ur …
そうだったんですね。。。
朝みたら、回答がなかったので無理かなと思い、Officeの削除を行い再インストールしたんですが、かわらなかったんで、削除前に復元したんです。
そしたら、Officeが立ち上がらなくなって・・・
今日の10時ごろから、パソコンの再セットアップを始めたんですよ!!(実はまだ終了してないんですが。違う端末で、回答をみたんです。たった今)
はやく回答に気づけばよかった・・・。
どうもありがとうございました。
また、何かありましたらよろしくお願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) 【VBA】Excelの特定範囲のセルを画像で保存したい 2 2023/01/25 13:06
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/03/28 14:52
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Excel(エクセル) EXCELの外部データ取得ができない 1 2023/03/23 09:03
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
実行時エラー3001「引数が間違...
-
EXCEL VBAマクロ中断でデバッグ...
-
なぜこんな初歩的なVBAのIf文で...
-
プロシージャ名の取得
-
VBS実行時エラー オブジェクト...
-
アクセス 実行時エラー3265
-
マクロでオートシェイプ内の文...
-
ExcelVBA Range クラスの Page...
-
「実行時エラー3001」のポップ...
-
SQL文をVBAで流すと「型...
-
EXCEL/VBAで、自分のPCだけエラ...
-
VBAのコードがエラーになっ...
-
「コンパイルエラー:プロシー...
-
VBAでのMATCH関数の使用
-
ゴールシーク関数で、エラーを...
-
ADODB.Streamを使用してUTF-8を...
-
Application.ActiveInspectorで...
-
VBAがブレークモードになっ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
【Excel VBA】マクロをボタンに...
-
VBAでのエラー
-
マクロについて教えてください...
-
なぜこんな初歩的なVBAのIf文で...
-
VBAがブレークモードになっ...
-
実行時エラー3001「引数が間違...
-
ExcelVBA Range クラスの Page...
-
VBS実行時エラー オブジェクト...
-
EXCEL VBAマクロ中断でデバッグ...
-
Outlook.ApplicationをCreateOb...
-
VBSで変数の宣言はできないので...
-
VBAのコードがエラーになっ...
-
実行時エラー -'-2147417848
-
ADODB.Streamを使用してUTF-8を...
-
EXCEL/VBAで、自分のPCだけエラ...
-
OLEDB.NETで接続できない
-
プロシージャ名の取得
-
VB6+SQL サーバー 2000 で 実行...
おすすめ情報