Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1616 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【6272】プリンタ情報を取得できません junjun 05/9/13(火) 14:26 質問[未読]
【6275】Re:プリンタ情報を取得できません 小僧 05/9/13(火) 16:14 発言[未読]
【6282】Re:プリンタ情報を取得できません Gin_II 05/9/13(火) 18:27 回答[未読]
【6286】Re:プリンタ情報を取得できません junjun 05/9/14(水) 9:47 お礼[未読]
【6272】プリンタ情報を取得できません
質問  junjun  - 05/9/13(火) 14:26 -
引用なし
パスワード
   ACCESSを駆使しております。
どうにもわからなくなってしまったので、どなたか助けてください(T-T)

レポートを開こうとすると（プレビュー・デザイン共に）、
「[ポート]の[プリンタ名]のプリンタ情報を取得できませんでした。
このオブジェクトは、現在、使用できないプリンタに送信されました。」
というエラーが出てしまい、レポートが開きません。
Microsoftのサポートにて調べましたところ、
1.コンピュータの地域の設定が破損
2.プリンタに無効なネットワーク名が設定されている
3.プリンタドライバが破損
の原因が考えられるとのことでしたので、全て試みましたが、ダメでした。
また、メモリも多少関係していると聞きましたので、ACCESS以外のアプリケーションは
全て閉じた状態で試みましたが、これもダメでした。

その他のアプリケーションではプリンタは問題なく使えます。
ACCESSのレポートのみ、エラーが出ます。
おわかりになる方がいらっしゃいましたら、エラーの回避方法をお教えください。

OS:Windows2000
使用バージョン：ACCESS2000
プリンタ：FujiXerox DocuPrint C2220
プリンタはネットワークではなく、ローカルプリンタです

よろしくお願いします。
【6275】Re:プリンタ情報を取得できません
発言  小僧  - 05/9/13(火) 16:14 -
引用なし
パスワード
   ▼junjun さん：
こんにちは。

まず確認なのですが、

>ACCESSのレポートのみ、エラーが出ます。

「全ての Access 」なのか、他の Access なら大丈夫なのかを
試して頂けると解決に近くなるかもしれません。

(該当の Access のみでしたら全てのレポートなのかどうかも…)

あと、ヘルプの例文そのままですが、
現在の Access が保持しているプリンタ情報の確認です。

Sub 既定のプリンタ名取得()
　　With Application.Printers(0)
　　　　MsgBox "デバイス名 : " & .DeviceName & vbCr _
　　　　　　& "ドライバ名 : " & .DriverName & vbCr _
　　　　　　& "ポート : " & .Port
　　End With　　
End Sub

適当なモジュールに貼り付けて実行させ、
メッセージボックスの値が期待通りになっているかを
確認されてみるのはいかがでしょうか。
【6282】Re:プリンタ情報を取得できません
回答  Gin_II  - 05/9/13(火) 18:27 -
引用なし
パスワード
   こんにちは。
ちょっとつっこみを ^^;

>現在の Access が保持しているプリンタ情報の確認です。
>
>Sub 既定のプリンタ名取得()
>　　With Application.Printers(0)
>　　　　MsgBox "デバイス名 : " & .DeviceName & vbCr _
>　　　　　　& "ドライバ名 : " & .DriverName & vbCr _
>　　　　　　& "ポート : " & .Port
>　　End With　　
>End Sub

> 使用バージョン：ACCESS2000
だと、使えないと思います。


なんとなく、特定のレポートが破損しているような気はしますね。
【6286】Re:プリンタ情報を取得できません
お礼  junjun  - 05/9/14(水) 9:47 -
引用なし
パスワード
   小僧さん
Gin_IIさん

ご回答いただき、ありがとうございますm(_ _)m
小僧さんのご回答に沿って試してみました。
実はご回答をいただく前に、プリンタポートがあやしいと思い、
再インストール（最新版をDLL）などを試しておりましたところ、
全てのレポート（該当のAccess以外も全て）が開かなくなり、
パニクっておりました(^^;)

プリンタ情報の取得コードも、試してみました。
が、ヘルプの例文ではうまく取得できず、
Microsoftのサイトに掲載されていたコードを利用してみました。
正しい情報が認識されておりました・・・。
でも、同じエラーが出てしまっていました。

一夜あけまして、一度最初の状態に戻そうと思いまして
最新版ではなく、旧版（私のはDiskですが）のプリンタポートを
再インストールしまして、
試したところ、なんと全てが復活し、
「プリンタ情報を取得できません」エラーも出なくなりました！

私の見解なのですが、
最新版を再インストールした時に「プリンタ名」が自動で表示され、
その後旧版を再インストールした時は、最新版を消さずに行ったため、
「プリンタ名（１）」という名前が自動でつきました。
この（１）を既定のプリンタとしたため、
全てがうまくいったのではないかと。
（その他、ポートやデバイスなどは全く同じなので・・・。）
どこかで、「プリンタ名」を記憶しているのかもしれないですね。
正式な「プリンタ名」に（１）がつくことで、
再認識してもらえたのではないかと、思っています。

また、Gin_IIさんのご意見通り、特定のレポートが破損しているのかと
思い、もう一度一から作り直す覚悟もしておりました(^^;)
が、プリンタ名を変更したことで、全て開くことができるように
なりました。

小僧さん、Gin_IIさん、ありがとうございました。
これで仕事に取り掛かることができます、
本当にどうもありがとうございましたm(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1616 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1078245
(SS)C-BOARD v3.8 is Free