
こんにちは。誰か助けて下さい。
職場で、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で質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
【マクロ】エラー【#DIV/0!】が...
-
VBAがブレークモードになっ...
-
ADODB.Streamを使用してUTF-8を...
-
EXCEL VBAマクロ中断でデバッグ...
-
カーソルオープンでエラー(ORA...
-
なぜエラーになるのでしょうか...
-
AccessVBAでExcelを起動し、罫...
-
エクセルでURLに特定文字が含ま...
-
Debug.exe実行時にWinMainCRTSt...
-
VBからAccessへの接続でエラー
-
Invalid procedure call or arg...
-
ACCESSのエラーで困っています
-
エクセルエラー13型が一致しま...
-
エクセルVBA、フリーフォームで...
-
psapi.dllのGetModuleBaseName...
-
トランスポートレベルのエラー
-
Excelの条件式について
-
【VBA】ボタンに登録したマクロ...
-
VB2010 CreateMailslot失敗
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
VBAがブレークモードになっ...
-
【マクロ】エラー【#DIV/0!】が...
-
実行時エラー -'-2147417848
-
実行時エラー3001「引数が間違...
-
実行時エラー48発生時のDLL特定...
-
【Excel VBA】マクロをボタンに...
-
マクロについて教えてください...
-
なぜこんな初歩的なVBAのIf文で...
-
VB6+SQL サーバー 2000 で 実行...
-
OLEDB.NETで接続できない
-
EXCEL/VBAで、自分のPCだけエラ...
-
ExcelVBA Range クラスの Page...
-
Invalid procedure call or arg...
-
VBAでのエラー
-
AccessVBAでExcelを起動し、罫...
-
[Delphi] データセットは閉じて...
-
VBAで実行時エラー'424' オブジ...
-
なぜエラーになるのでしょうか...
-
ADODB.Streamを使用してUTF-8を...
おすすめ情報