エクセルの学校：全文検索：Hyper Estraier：リンク

Results of 1 - 1 of about 6617 for リンク (0.004 sec.)

[[20080428235651]]: #score: 3108; @digest: 627a9ca71c4592036b874a9ad8ba9d9f; @id: 37608; @mdate: 2008-05-03T02:48:02Z; @size: 3310; @type: text/plain; #keywords: objword (46551), ド文 (12717), 括印 (11598), 肉付 (8452), グエ (8131), 力候 (6969), 定]→ (6375), グ中 (6244), 文書 (6214), 能) (5870), イパ (4570), テリ (4052), ーリ (3976), ル]→ (3705), 「di (3291), ハイ (3270), パー (2911), ー[ (2475), ス( (2235), ブセ (2116), のハ (2044), library (1959), ワー (1944), リン (1889), ンク (1856), 照設 (1636), クマ (1629), リセ (1550), 一括 (1548), ク先 (1531), 書を (1515), word (1372); 『複数のハイパーリンクの一括印刷』（わかめ）
初めて質問させていただきます。 EXCELのA列に300件ほどのハイパーリンクがあってそれぞれワード文書（ブックマーク）にリンクが張ってあります。今回そのリンクが張ってあるワード文書を一括印刷したいのです。複数のハイパーリンクのアクティブセルを選択し、リンク先のワード文書を一括印刷することは可能でしょうか。 ---- ワード文書（ブックマーク）の意味が分かっていません。 A列に C:¥Temp¥aaa.doc みたいにリンクがあり、その文書を（全頁）印刷したいということでしょうか? (1or8) 10:39修正 ---- VBAになると思います。他サイトですが、参考になると思います。ハイパーリンクしたワードの一括印刷 http://excelfactory.net/excelboard/excelvba/excel.cgi?mode=all&namber=108106&rev=0 (MARBIN) ---- 説明が拙く申し訳ありません。 A列には1.2.3…と入っていて、それぞれの番号のハイパーリンク先はワード文書（C:¥aa.doc、C:¥bb.doc、C:¥CC.doc・・・）に対応しています。今回そのリンク先のワード文書を一括印刷したいのですが…。まず複数のハイパーリンクのアクティブセルを選択しリンク先のワード文書を開くことは可能なんでしょうか。いろいろな本を見たのですがなかなか見つからなくて。ご教授いただければ幸いです。 ---- >複数のハイパーリンクのアクティブセルを選択しよく分かりません。アクティブセルは一つだけのはずですので・・・。 (MARBIN) ---- >いろいろな本を見たのですがなかなか見つからなくて。昔、「ちょっとテスト」的にやった経験しかありませんが、以下そのサンプルです。何かの足しになれば。。。 ※ ワードアプリケーションは、閉じている前提です。 ※ テストは、ハイパーリンクが1つか2つしか含まれないセル範囲を指定してやった方が無難です(6行目関連)。 ※ 印刷範囲をどうするのかとか、一気に150文書も印刷命令かけてトラぶらないかとかは、全然考慮しておりません。肉付けは、そちらの事情に合わせてください(私は深入りしません）。ちなみに、ワードにもマクロの記録機能があります。あと、エクセルのVBEで、VBEメニュー[ツール]→[参照設定]→[Microsoft Word xx.x Object Library]にチェックを入れ、サンプルの「Dim objWord As Object」を「Dim objWord As Word.Application 」に変更すればインテリセンス(コーディング中に入力候補が出てくれる機能)が使えるので少し楽かも。(デバッグエラーも減ります) Sub Macroword() Dim objWord As Object ' Word.Application Dim HL As Hyperlink Set objWord = CreateObject("Word.Application") 'ワードを開いて、参照を取得する objWord.Visible = True For Each HL In Range("A1:A4").Hyperlinks 'A1:A4←ハイパーリンクが入っているセル範囲を指定 HL.Follow 'ワード文書を開く objWord.PrintOut Range:=2 '印刷範囲の指定 (2はwdPrintCurrentPageの実体値。現在のページのみ印刷) objWord.ActiveDocument.Close '文書を閉じる Next objWord.Quit 'ワードを閉じて原状回復 End Sub (半平太) ---- 半平太さんありがとうございます。少し肉付けして何とか解決しました。あと、エクセルのVBEで、VBEメニュー[ツール]→[参照設定]→[Microsoft Word xx.x Object Library]にチェックを入れ、サンプルの「Dim objWord As Object」を「Dim objWord As Word.Application 」に変更すればインテリセンス(コーディング中に入力候補が出てくれる機能)が使えるので少し楽かも。(デバッグエラーも減ります) 大変参考になりました。またよろしくお願いします。 ...; https://www.excel.studio-kazu.jp/wiki/kazuwiki/200804/20080428235651.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ