- ベストアンサー
ActiveX コンポーネントを作成できません
- ExcelVBAでPDFを操作するコードを作成したところ、ActiveX コンポーネントを作成できませんというエラーが発生します。
- 現在使用している環境はExcel2007 WinVista32ビットで、Adobe Reader 9 Ver9.5.5です。
- いくつかの宣言ディレクティブの変更を試みましたが、エラーを解消することができませんでした。PFDファイルのページ数を取得するためには別の解決策を見つける必要があります。
- rei230
- お礼率92% (153/166)
- Excel（エクセル）
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (1)
- tsubu-yuki
- ベストアンサー率46% (179/386)
型宣言が通っているようなので、参照設定はされているものとして。 細かいところですが、 > (1)Dim aaa As new Acrobat.CAcroAVDoc ↓ Dim aaa As new Acrobat.AcroAVDoc ついでに > aaa = CreateObject("AcroExch.AVDoc") ↓ Set aaa = CreateObject("AcroExch.AVDoc") うまく続けばいいですが。
お礼
回答いただきありがとうございました。 ご回答通り修正しましたが結果は同じでした。 Set aaa = CreateObject("AcroExch.AVDoc") のところで同じエラーが出ます。参照設定もしてあります。
関連するQ&A
- CreateObject関数について
VisualBasic2005でPDFを操作するプログラムを作ろうとしています。 その際に以下のようなプログラムでCreateObject関数を使用しているのですが、※印の行で 「ActiveX コンポーネントを作成できません。」 のエラーが出てしまっています。 Dim AcroExchAVDoc As Acrobat.CAcroAVDoc Dim AcroExchPDDoc As Acrobat.CAcroPDDoc Dim avPageView As Acrobat.CAcroAVPageView Dim pdPage As Acrobat.CAcroPDPage AcroExchAVDoc = CreateObject("AcroExch.AVDoc") ※ 現在使用しているのは Adobe Reader 8 Adobe Acrobat 8 Professional ですが、原因として何が考えられますでしょうか？ この作業で足止めをくらっており、大変困っています。 誰かご助言をお願いします。
- 締切済み
- Visual Basic
- ActiveXコンポーネントはオブジェクトを作成できません・・・っていわれても・・・
初心者のつまずきですので、簡単な質問かもしれませんが おつきあいください。 練習のため、以下のファイルを作り実行しました。 <HTML> <HEAD> <TITLE>簡単な例</TITLE> </HEAD> <SCRIPT LANGUAGE="VBScript"> <!-- Set fs = CreateObject("Scripting.FileSystemObject") --> </SCRIPT> </HTML> このファイルを実行すると（HTML形式） IEのステイタスバーの左端に びっくりマークが表示され エラーメッセ字を表示させると ライン７ 文字１ エラー ActiveXコンポーネントはオブジェクトを作成できません。 'Scripting.FileSystemObject' コード０ と表示されます。 ここで質問です。 １．このエラーを回避するためにはどうしたらいいのでしょうか。 ２．ActiveXとはいったい何なんでしょうか。簡単に説明してもらえないでしょうか。 ちなみに現在使っているIEは Version6.0.2800.1106.xpsp2.030320-1720 更新バージョンSP1 と表示されるものです。 よろしくお願いします。
- ベストアンサー
- HTML
- エクセルVBAでPDF/実行時エラー
以下はネットで検索して見つけたPDFのプリント用VBAですがやってみるとSet acroApp = CreateObject("AcroExch.APP")のところで実行時エラー「インターフェイスがサポートされていません」になります。 Adibe Acrobat 10.0 Type Liblaryも参照設定しました。 Windows11でエクセルは2019です。Acrobat Readerも入っています。 どうすればいいのでしょう？ https://ziomatrix18.blog.fc2.com/blog-entry-406.html Sub test01() Dim ret As Integer Dim filePath As String filePath = "C:\Temp\Test.pdf" Dim acroApp As CAcroApp Dim pdDoc As CAcroPDDoc Dim avDoc As CAcroAVDoc Set acroApp = CreateObject("AcroExch.APP") Set pdDoc = CreateObject("AcroExch.PDDoc") Set avDoc = CreateObject("AcroExch.AVDoc") ret = acroApp.Show ret = avDoc.Open(filePath, "") Set pdDoc = avDoc.GetPDDoc() Dim numPage As Long numPage = pdDoc.GetNumPages ret = avDoc.PrintPages(0, numPage - 1, 2, 0, 0) ret = avDoc.Close(False) acroApp.Exit Set avDoc = Nothing Set pdDoc = Nothing Set acroApp = Nothing End Sub
- ベストアンサー
- Excel（エクセル）
- suzuka ActiveXコンポーネントはオブジェクトを作成できません。
suzukaについて質問です。 ホームページにかいてある全部のものをダウンロードし、その通りに入れたのにも 関わらず「実行時エラー'429': ActiveXコンポーネントはオブジェクトを作成できません。」と 出てしまいます。一体なにが違うのかよくわかりません。 ちなみにParaFlaも同じ状況に見舞われてます。 一体なにがたりないのでしょう？ 環境はvistaです。
- ベストアンサー
- その他（インターネット・Webサービス）
- ActiveXコンポーネントはオブジェクトを作成できない！？
『ActiveXコンポーネントはオブジェクトを作成できません。（429）』というエラーがカラオケキングのマイ歌本を押すと、出ます。当ソフトを導入後、ＯＳの再インストールをしたので、何かのファイルが、ないって事かなー。と素人考えで、思っていますが、セットアップファイルをバックアップしとけば、よかったのですが、ソフトのフォルダだけを、バックアップしてたもので(^^ゞこの訳と対処がお分かりでしたら、何卒よろしくお願いします。OSはWIN98seです。
- ベストアンサー
- Windows 95・98
- ActiveX → VB を起動するとCreateObjectできない。
初めまして。 2003Server+IIS6.0の環境でASP内のActiveXからShell関数でvbのexeを実行させる処理を作成しております。 サーバーから直接exeを実行させると正常に動くのですが、Web上からasp→ActiveX→exeを起動させるとテキストに書き込む処理はできるのですが、「CreateObject」文で「ActiveX コンポーネントはオブジェクトを作成できません」というエラーが返ります。 VB内でなぜ「CreateObject」が出来ないのかご存知の方はいますでしょうか。 宜しくお願いいたします。
- ベストアンサー
- Visual Basic
- 起動時に「ActiveXコンポーネントはオブジェクトを作成できません。」
PCを起動すると「実行時エラー'429'：activeXコンポーネントはオブジェクトを作成できません。」というエラーメッセージが出ます。 他の方の質問を見て、Windows script 5.6というものをダウンロード、実行、再起動をしてみたのですが、駄目でした。 他に試してみることはありますでしょうか？
- ベストアンサー
- Windows XP
- Acrobatのツールボタンの消し方
いつもお世話になっております。 現在、Windows2000(SP4)、Visual Basic6.0(SP6)を使って開発中です。 今回、Form上にAcrobat Readerを使って、PDFファイルを表示させたいのですが、デフォルトで表示されるAcrobatのツールボタンのうち、「Yahoo!」、「Web検索」、「電子メール」のボタンを非表示にしたいと思っています。 インターネットで調べたところ、下記の方法で出来そうなのですが、 ------------------------------------------------------ Dim AcroApp As Object Set AcroApp = CreateObject("AcroExch.App") AcroApp.hideToolbarButton("Save") ←ここでは上書きボタンを消す ------------------------------------------------------ 実際には、2行目でエラーが出てしまいます。 何がいけないのか、分かる方がいましたら教えて下さい。 ちなみに、Acrobat Readerは7がインストールしてあります。 よろしくお願いします。
- 締切済み
- Visual Basic
- エクセルＶＢＡでＰＤＦを開く
以下のような記述でアクロバットリーダーは立ち上がるのですが、 「この文書を開くときにエラーが発生しました。このファイルが見つかりません」 と出てきてしまいます。 どのようにしたら開いてくれるのでしょうか？ Sub test3() Dim P As String P = "\\C:\AAA\sample.PDF" Shell "C:\Program Files\Adobe\Reader 11.0\Reader\AcroRd32.exe" & " " & P, vbNormalFocus End Sub
- ベストアンサー
- Excel（エクセル）
- Excelで「エラーコード 429 "ActiveXコンポーネント～」
EXCELでMOUSの勉強をしているのですが、いつも問題途中にエラーコード 429 "ActiveXコンポーネントはオブジェクトを作成できません。"とでてきて、先へ進めません。何が原因なのでしょうか？毎度毎度強制終了で、うんざりです。 なんとか出ない方法を教えてください。よろしくお願いします。
- 締切済み
- オフィス系ソフト
- 質問者は、ブラザー製品のDCP-J982Nを使用してPDFファイルを印刷する際に、実際のサイズより小さく印刷されるというトラブルに遭遇しています。
- 以前は問題がなかったが、コンビニのプリンターでは正確なサイズで印刷ができるため、原因がお使いの環境や設定にある可能性が高いです。
- お使いの環境はWindows10で無線LAN接続しており、関連するソフト・アプリとしてAR CADを使用しています。また、質問者の電話回線はひかり回線です。
お礼
度々、ご回答いただきましてありがとうございました。 ご指定のサイトのコードを動かしましたが、 'Acrobatがエラーメッセージを表示するルーチンに入りました。 バージョンの問題なんでしょうかね？