【先着1,000名様!】1,000円分をプレゼント!

お世話になります。
ACCESSのテーブルにハイパーリンクを貼り付けている状態なのですが、クエリで抽出しデータのみを一括印刷は可能でしょうか。分からず調べていたのですが分らなかった為、教えてください。また、下記に同じ質問をした方がいたのですが、回答リンクがきれていました。参考に貼り付けておきます。よろしくお願いいたします。
http://detail.chiebukuro.yahoo.co.jp/qa/question …

このQ&Aに関連する最新のQ&A

URL 抽出」に関するQ&A: URL抽出

A 回答 (2件)

最初の回答は、AKI78さんの主旨とずれてしまいましたね。

どうもすみません。
以下にヒントとなるWebページを紹介します。その上で手順をよく読み込んで、創意工夫の上、組み合わせて取り組んでみて下さい。

1 ウインドウズコマンドとして、アドベリーダを呼び出して印刷させる命令文の説明
http://pdf-file.nnn2.com/?p=222
この中の path の部分を変数にして、繰り替え処理の中で次々に入れ替えて印刷させます。

2 ウインドウズコマンドの繰り返しプログラムの説明
http://www.atmarkit.co.jp/fwin2k/operation/comma …
この繰り返し処理の中に、1のAcroRd32.exe の命令文(AcroRd32.exeがアドベリーダのファイル名で、所在フォルダまで正確に指定する必要があります。)を入れます。この際にpathを%pdfBasho などと変数化して次々と入れ替えます。

この技術を組み合わせた上に、アクセスで抽出したURLをテキストファイルにエクスポートして、このテキストファイルを繰り返し読むバッチファイルを作り、このバッチファイルを実行します。
バッチファイルはメモ帳で作れます。そして、バッチファイルの実行は、ファイル名を指定して実行するか、このバッチファイルをダブルクリックするかすれば実行できます。

pdfを操作したい以上、アクセスの技術だけではできませんので、以上のような点をヒントに取り組んでみて下さい。スキルアップを祈ります。
    • good
    • 0
この回答へのお礼

自分には難しい内容でしたが、親切に教えて頂き有難うございました。

お礼日時:2013/01/20 10:50

一覧表レポートは、テーブルからだけではなく、選択クエリからも作成できます。


おそらくクエリはできていることでしょうから、レポートウィザードでそのクエリを指定して、一覧表レポートを作り、形式をデザインすればできるでしょう。

また、もとのテーブル用の一覧表レポートのレポートプロパティのフィルタに条件を指定することで、レコードを絞り込むこともできます。(これはよく埋め込みっぱなしにしていることを忘れて、思ったデータが出てこずに焦る原因になります。)
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q【EXCEL-VBA】PDFファイルを開いて印刷したい

お世話になります。
以前、以下のリンク先の質問でA1セルに入力されたファイル名(フルパスの)を取得し
PDFを開くマクロを頂きました。
※ご解答頂いたWindFallerさん、maiko0333さん、ありがとうございました。
このマクロはすごくシンプルで使いやすいので今でも仕事で使っております。

で、、、今回、これをカスタマイズして「印刷もしたい」と思ったのですが、
印刷するためのコードの追加方法がわかりませんでした。

このコードに固執してないので、別の方法でもかまいません。
ですが、ネットで調べたところ複雑なコードばかりでした。
リンク先のようなシンプルなコードでPDFファイルを開いて
印刷することって出来ないのでしょうか?

すいませんが詳しい方、説明の上手な方、
直接、コードで説明できる方、マクロでPDFファイルを開いて印刷するための
コードを教えて下さい。よろしくお願いします。


リンク先:PDFファイルを開くマクロ
「PowerShellを使って関連付けられたアプリケーションでファイルを開く時のエラー」
https://oshiete.goo.ne.jp/qa/9338065.html

追記
1)開いたPDFファイルを閉じる必要はありません。
開けっ放しでOKです

2)前述していますし、リンク先を見て頂ければわかると思いますが、
A1セルに入力するファイル名はフルパスです。
※詳細はリンク先の説明、画像をご覧ください

3)PDFファイルはどれも1枚だけです。
※複数ページのPDFはありません。

以上です。すいませんがよろしくお願いします。

お世話になります。
以前、以下のリンク先の質問でA1セルに入力されたファイル名(フルパスの)を取得し
PDFを開くマクロを頂きました。
※ご解答頂いたWindFallerさん、maiko0333さん、ありがとうございました。
このマクロはすごくシンプルで使いやすいので今でも仕事で使っております。

で、、、今回、これをカスタマイズして「印刷もしたい」と思ったのですが、
印刷するためのコードの追加方法がわかりませんでした。

このコードに固執してないので、別の方法でもかまいません。
ですが、ネットで調...続きを読む

Aベストアンサー

こちらを参考にして
https://www.moug.net/tech/acvba/0130005.html
こんな感じで動きました。(Windows7 64ビット , Excel2010 32ビット)

Option Explicit

Declare Function ShellExecute Lib "SHELL32" Alias "ShellExecuteA" (ByVal hwnd&, ByVal lpOperation$, ByVal lpFile$, ByVal lpParameters$, ByVal lpDirectory$, ByVal nShowCmd&) As Long

Public Sub PrintPDF()
 Dim strPath As String

 strPath = Range("A1").Value
 ' 現在の位置とサイズで表示 5(SW_SHOW)
 Call ShellExecute(Application.hwnd, "open", strPath, vbNullString, vbNullString, 5)
 ' 印刷
 Call ShellExecute(Application.hwnd, "print", strPath, vbNullString, vbNullString, 5)
End Sub

こちらを参考にして
https://www.moug.net/tech/acvba/0130005.html
こんな感じで動きました。(Windows7 64ビット , Excel2010 32ビット)

Option Explicit

Declare Function ShellExecute Lib "SHELL32" Alias "ShellExecuteA" (ByVal hwnd&, ByVal lpOperation$, ByVal lpFile$, ByVal lpParameters$, ByVal lpDirectory$, ByVal nShowCmd&) As Long

Public Sub PrintPDF()
 Dim strPath As String

 strPath = Range("A1").Value
 ' 現在の位置とサイズで表示 5(SW_SHOW)
 Call ShellExecute(Applica...続きを読む

Qエクセル 印刷時にハイパーリンク部分反転させずに印刷する

エクセルについての質問です。
ハイパーリンクを設定して、それを利用してサイトなどへ行くと色が変わりますよね(反転というんでしたっけ)。印刷するときに、その色が反転しない状態に戻して印刷することは可能でしょうか?
一度ファイルを閉じてまた開けば反転していない状態になっていますがそれだと手間がかかります。他に何か方法をご存知の方がいらっしゃいましたらよろしくお願いいたします。

Aベストアンサー

こんにちは。 #1です。

>元の色に一括で戻せる
回答した操作を印字前に行う事で、一括で「表示済みハイパーリンク」
で指定した色にできます。

操作が面倒なら以下のマクロを定義して実行しても一括変換できます。
Sub FollowedHyperlinkColor()
ActiveWorkbook.Styles("Followed Hyperlink").Font.ColorIndex = 5
End Sub

※保存には、注意が必要です。

>印刷のときは自動で元の色
できないと思います。


人気Q&Aランキング