- 締切済み
EXCEL VBAのオートメーションエラーについて
セル入力されたファイル名を順番に開いてファイル名の書いてあるファイルのデータを開いたファイルにコピーしていくもの作ったのですが、これだけをコマンドボタンから起動してもエラーは出ません。でも、3つのコマンドボタンがあり、最後の段階のボタンなので、段階をおってすすめると、実行時エラーで、「オートメーションエラーです。起動されたオブジェクトはクライアントから切断されました。」のメッセージが表示されます。その後はフリーズしてしまいます。 パソコンの空き容量などの影響なのか、それとも構文にまちがいがあるのかわからず困っています。 ファイルの内容がうまく説明できないのですが回答よろしくお願いします。
- moon623
- お礼率46% (6/13)
- オフィス系ソフト
- 回答数1
- ありがとう数5
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- kbonb
- ベストアンサー率51% (254/492)
こんにちは 以下のページがご参考になるのでは？ [XL2000] オートメーションでセルの値の取得やコピーを繰り返すとハングアップ http://support.microsoft.com/default.aspx?scid=kb;ja;JP414107
関連するQ&A
- オートメーションエラーについて
こんにちは。palbanです。 現在VBからACCESSにデータを保存するシステムを作成しています。 VBからACCESSの接続にはADOを使用しています。 バージョンはVB6.0SP5,ACCESS2002です。 このシステムをAPI関数のSENDMESSAGEを使用して終了させているのですが、システム終了後以下のような メッセージがでます。 実行時エラー'-2147417848(80010108)': オートメーションエラーです。 起動されたオブジェクトはクライアントから 切断されました。 このエラーの回避方法をご存知の方ご教授願います。 私の方でも調査しましたが修正方法がどうしても わかりません。 宜しくお願いします。
- ベストアンサー
- Visual Basic
- エクセルでのオートメーションエラー
たびたびお世話になっております。 excel2000のVBAでユーザーフォームを作成し、ユーザーフォーム上のコマンドボタンで処理を実行しています。処理はワークシート上の計算を実行したり、メールに添付し送信したり・・・です。この実行後にもう一度ユーザーフォームを開こうとすると、（ユーザーフォーム.show）まず、パス名が無効です、のエラー。ワークブックを保存し閉じようとすると（これもユーザーフォームのコマンドボタン）、オートメーションエラーです、となります。ユーザーフォームを閉じ、excelを終了しようとすると、EXCELは終了できません。となってしまいます。 なぜ？どーして？チンプンです。 ちなみにその後、もう一度同じワークブックを開こうとすると、使用中になり、 読取専用でしか開けません。 どうか、教えてください。
- ベストアンサー
- オフィス系ソフト
- オートメーション エラーです
win7 エクセル2010です。 ************************************************* Dim objIE As InternetExplorer Sub Sample1() Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True objIE.navigate "http://www.goo.ne.jp/" Call wait1 Set objIE = Nothing End Sub ************************************************* Sub wait1() Const READYSTATE_COMPLETE As Long = 4 Do Until objIE.readyState = READYSTATE_COMPLETE Loop Do While objIE.Busy = True DoEvents Loop End Sub ************************************************* だと うまく行きますが、 URLの部分の社内のURLにすると 実行時エラー-2147417848(80010108) 「オートメーションエラーです。起動されたオブジェクトはクライアントから切断されました」 になります。 社内のＵＲＬの拡張子は、aspxです。 ウォッチウインドウでobjIEをウォッチ式に登録すると objIE.navigate を過ぎると 中身が、<オートメーション エラーです。> になります。 これは社内のシステムの方でプロタクトがかかっているのでしょうか？
- ベストアンサー
- Excel（エクセル）
- オートメーションエラー
サーバ１：Oracle11g サーバ２：Oracle12c クライアント１：パソコン Win7 32bit Oracle11g クライアント２：タブレット Win10 64bit Oracle12c クライアント１，２ともにoffice2010という構成です。 excelマクロによりサーバからデータを抽出するソフトを使用しています。 現状サーバ１とクライアント１の組み合わせです。 クライアント１では、抽出先サーバが１でも２でも正しくデータ抽出できます。 しかしながらクライアント２では、抽出先サーバ１、２ともに下記エラーが発生します。 実行時エラー'-2147024770(8007007e)': オートメーションエラーです。 指定されたモジュールが見つかりません。 デバッグボタンを押すと、 Set OraSession = CreateObject("OracleInProcserver.XOrasession") の行が黄色く表示されています。 コマンドプロンプトでの確認は、クライアント２にて、 >sqlplus ”ユーザ名"/"パスワード"@"サーバ１用サービス名" で Oracel Database 11gRelease 11.2.0.1.0 - Production に接続されました >sqlplus ”ユーザ名"/"パスワード"@"サーバ２用サービス名" で Oracel Database 12c Standard Edition Release 12.1.0.2.0 - 64bit Production に接続されました と表示されるので、サーバとの接続は問題ないと思っています。 クライアント２では、 osqleditというサーバのテーブルデータ内容を把握可能なツールも正しく動作します。 サーバ１、サーバ２ともに確認できます。 クライアント２では、11gで動作したexcelツールが動作しない状況です。 何が原因なのでしょうか？
- ベストアンサー
- Oracle
- MSDEでオートメーションエラー
環境：Ms Windows2000 sp1/Ms SQL Server2000/Ms Vb6.0/ ActiveReports Ver1.0J +Ver1.5J差分 上記の環境で作成したPGをMSDEの環境で実行したら「オートメーションエラー、起動したオブジェクトはクライアントから切断されました」のエラーが発生しました。 PGの内容は以下のとおり ・frmMainフォームから印刷範囲指定のfrmPrintをCALLし、 PrtRepというレポートを表示。 ・frmMain、frmPrint、PrtRepはクラスオブジェクト「CSeisanWk」をCALL ・「CSeisanWk」は「CSeisan」をCALLし、データベース にアクセスしている。 ・frmMain、frmPrint、PrtRepは「Esc」キーを押すと Unload Meでフォームまたはレポートを閉じる ・1回目にfrmMainからfrmPrintを起動し、範囲指定後、 PrtRepを表示。PrtRepをEscキーで閉じ、frmPrintを Escキーで閉じる ・2回目にfrmMainからfrmPrintを起動し、範囲指定後、 PrtRepを表示。PrtRepをEscキーで閉じると、オートメーショ ンエラーが発生。 ・この状態で，PrtRepを範囲指定を変更して何度でも表 示可能。 ・ただし、frmPrintをESCキーにて閉じるとPGが終了してしまう（frmMainが閉じている） ・記述を「Unload frmMain、Unload frmPrint、Unload PrtRep」に変更しても状況は変わらず。 ・クラスオブジェクトの開放の問題とおもい、オブジェクトの開放、DB切断、これらの記述をコメント化しても状況は 変わらず。 ・frmMainで「form KeyUp」イベントにブレイクポイントを置いて みたが止まらず。 ・MSDEでない環境ではこのエラーが起きない。 めちゃくちゃわかりにくい記述で申し訳ないのですが、 どなたかいい知恵を貸してください。
- 締切済み
- Visual Basic
- オートメーション
LP 432:オートメーションの操作中にファイル名またはクラス名を見つけられませんでした。 というエラー？がでます。 OK をクリックすると消えますが しばらくすると又出てきます。 これが出ている状態だとＰＣを終了できず、ＯＫをクリックして表示が消えている間だと終了できます。 これは 何なのでしょうか？
- ベストアンサー
- その他（インターネット・Webサービス）
- EXCEL VBA UserFormで困っています。
EXCEL VBA UserFormで困っています。 VBAプログラミングで以下のような現象が起こります。 開発環境 WinXP , EXCEL2003 ブックを起動するとメニューが表示され、そこからボタンを押すとuserform1が表示されるというプログラムなんですが、そのボタンを押してuserform1を起動しようとすると『問題が発生したため、 Microsoft Excel Windowsを終了します。・・・ エラー報告を送信する 送信しない』のメッセージが出て起動できない。 UserForm1.Showのステップで一旦止めてステップモードで続行すると正常に動作します。 過去に似た質問を見つけ、そのアドバイスを元に以下を試してみました。 http://okwave.jp/qa/q2001805.html ・エラーの発生行の特定 userform1.showの前に、userform1.label.visible=falseのように、表示、非表示を切り替える命令を出しており、どうやらその表示命令の行でつまづいている事がわかりました。 表示命令を全て消去し実行したところ、現在までは問題なく起動できています。 ・on timeメソッドで時間差をつける ラベルやボタンの表示、非表示命令行をまとめて、 Application.OnTime Now + TimeValue("00:00:01"), "ラベルボタン表示設定" userform1.show といった形で時間差をつけてみました。 結果として、userform1自体は立ち上がるようになったのですが、時間差で実行される"ラベルボタン表示設定"の実行時に「オートメーションエラーです。起動されたオブジェクトはクライアントから切断されました。」と出てくるようになってしまいました。 ラベルはまだ良いのですが、コマンドボタンの表示、非表示は、誤操作を防ぐ手段として非常に重要です。なんとかエラーを出さずにコード通りに起動する方法はありませんでしょうか。
- ベストアンサー
- Visual Basic
- F8でステップインするとエラーになる理由
F5だとエラーにならないのに、F8でステップインするとエラーになる理由を教えてください。 わざとエラーを発生させているのですが、 Option Explicit Sub test() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.Application") objIE.Quit '敢えて閉じる objIE.Navigate "http://www.ocn.ne.jp/" End Sub のコードを、Ｆ５で一気に実行するとエラーになりませんが、 Ｆ８で１行ずつ実行すると、 「実行時エラー'-2147417848(80010108)' :オートメーションエラーです。 起動されたオブジェクトは、そのクライアントから切断されました。」 になります。 なぜＦ５だとエラーにならないのでしょうか？ それが不思議です。
- ベストアンサー
- オフィス系ソフト
- VBA エラーと対策
実行時エラー '1004' RangeクラスのSortメソッドが失敗しました。 と出ます。 With Worksheets("データ") .Range("A2:N" & .Cells(.Rows.Count, 1).End(xlUp).Row).sort _ Key1:=Range("E3"), Order1:=xlAscending, Key2:=Range("C3"), _ Order2:=xlAscending, Key3:=Range("A3"), Order3:=xlAscending End With E列、C列、A列で昇順で並び替えしようと思っております。 前まで使えていたのですが、ソートできなくなり、何が原因かわからないため、質問しました。 また、もう一つエラーがあります。 実行時エラー'-2147417848(80010108)' オートメーションエラーです。 起動されたオブジェクトはクライアントから切断されました。 と表示されます。 http://okwave.jp/qa/q8452163.html range("A1").resize(ubound(a),1) = application.transpose(a) 上記部分でエラーがでます。 上記内容で、どういった原因が考えられますか？ どちらか片方でも分かる方いらっしゃいましたら、回答よろしくお願い致します。
- ベストアンサー
- Excel（エクセル）
- エクセル2010のvbaとコマンドボタンについて
vbaで押されたコマンドボタンの （ActiveXコントロールのイメージやラベルなど） 名前を取得することはできますか？ ActiveControl.NameはSheets(1)をつけると オブジェクトは、このプロパティまたはメゾットをサポートしていません とエラーが出て、Sheets(1).を取るとオブジェクトが必要です とエラーが出て上手くいきません フォームコントロールのボタンは右クリックできないので ActiveXコントロールのコマンドボタンを使用しています 回答お願いします
- ベストアンサー
- その他MS Office製品
お礼
回答ありがとうございます。 まだ解決はしていないのですが、原因がわかり助かりました。 これからも教えて頂いた、URLは活用できそうです。