EXCEL urlを一括で開く方法とは?
- excelで複数のセルにurlデータが入っていますが、それらを選択した分だけ一度にブラウザで開く方法を知りたいです。
- ハイパーリンク付きのセルならマクロで一括オープンできる方法がありますが、ハイパーリンクのついてないurlデータ入りセルにハイパーリンクを付ける方法がわかりません。
- HYPERLINK()を使って間接的に取得したハイパーリンクデータからマクロ等で一括でurlを開く画期的な方法があれば教えてください。
- ベストアンサー
EXCEL urlを一括で開きたい
excelで、複数のセルにurlデータが入っています。 それらを選択した分だけ一度にブラウザで開きたいです。 いわば、ハイパーリンクをクリックしてウェブページを1つ開く方法の複数同時版です。 元データは、ハイパーリンクのついてないurlデータ入りセルが多数です。 ネット検索すると、ハイパーリンク付きのセルならマクロで複数一度に開く方法がのってました。 ところが、多数のすっぴんurl入りセルにハイパーリンクを付ける方法がわからず、代替案としてHYPERLINK()関数で隣列にざっとハイパーリンクを作りましたが、それだとネット検索で書かれているような、マクロで一括オープンの方法、例えばhttp://www.excel.studio-kazu.jp/kw/20091105204156.htmlなどです。他の似たようなコードも試しました。が起動しませんでした。直でセルにハイパーリンクをつけてないとネット検索の方法は無効でした。 このような状況です。つまり、 「多数のすっぴんurl入りセルにハイパーリンクを直接一度に付ける方法」 もしくは 「HYPERLINK()をかませて間接的に取得したハイパーリンクデータからマクロ等で一括でurlを開く画期的な方法」 があれば、この問題は解決するといった状況ではないかと思います。 EXCELのプロのみなさん、アドバイスをよろしくお願いします。
- 1temarikartis
- お礼率44% (15/34)
- その他MS Office製品
- 回答数2
- ありがとう数3
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
#「EXCELのプロ」ではありませんが。。。 Sub macro1() Dim myLnk As Range For Each myLnk In Selection On Error Resume Next ActiveWorkbook.FollowHyperlink myLnk.Text On Error GoTo 0 Next End Sub でもできそうですが、PCのスペックやインターネットキャッシュの状態によっては、意図しただけのウィンドウが開かないようですので、以下でいかがでしょうか? Sub Macro2() Dim objIE As Object Dim myLnk As Range Set objIE = CreateObject("InternetExplorer.Application") objIE.Visible = True For Each myLnk In Selection objIE.navigate2 myLnk.Text, 2048 Next objIE.Quit Set objIE = Nothing End Sub
その他の回答 (1)
- keithin
- ベストアンサー率66% (5278/7940)
とりあえず簡単のため、「URL」は「httpから始まる文字列」とします。 sub macro1() dim c as range dim c0 as string set c = cells.find(what:="http*", lookin:=xlvalues, lookat:=xlpart) if c is nothing then exit sub c0 = c.address do activeworkbook.followhyperlink address:=c.value set c = cells.findnext(c) loop until c.address = c0 end sub #そこに「URL」が(文字列として)あるのですから。わざわざハイパーリンクを埋め直すとか回り道せず、直接そのURLを開きます。
関連するQ&A
- EXCEL上URLデータに一括ハイパーリンク
他のデータベースからEXCEL2003シートに移した URLデータが2万件ほどあります。 現状では、そのURLの入った2万個のセルがハイパーリンク化 されていません。 すべてのセルを一括でハイパーリンク化する方法はないでしょうか。 入力オートフォーマットの設定で、 現在は、一旦1件ずつ入力状態にしたあとエンターすると 自動でハイパーリンク化するのですが、 件数が多いのでとてもやりきれないのです。 (ハイパーリンクを一括で外す方法は見つかったのですが、 その逆がわかりません・・・)
- ベストアンサー
- オフィス系ソフト
- EXCELからのWEBの自動起動
EXCELのシートでセルに検索ワードなどを含めてurlを自動生成しています。 URLを含むセルにHYPERLINKを設定していますが、各セルへのダブルクリックが必要です。 一つの操作で多数のセルのurlを自動起動したいのですが、マクロの知識がないためできません。 マクロのプログラムをどう書けばよいのか教えてください。 プラウザはFirefoxでEXCELは2000を使用しています。
- ベストアンサー
- その他MS Office製品
- エクセル、ワードでハイパーリンクを一括で設定する方法について
現在CSVファイルにURLを編集するようなアプリを作成しています。 URLを編集したCSVファイルをエクセルで表示した場合、URLにハイパーリンクが はられていません。また、URLをクリックしてもURLの画面を表示できない状態です。 URLをクリックした時にURLの画面を表示するには、エクセルのHYPERLINK関数を使用する事で 対処しました。但し、URLに下線が表示されていない状態です。 ●URLに下線をつける方法はないでしょうか? また、エクセル内で、一度そのセルを編集すればURLに下線が張られますが、 ●一括で全てのURLの下線をつける方法は無いでしょうか? また、エクセルで表示している状態でセルをコピーし、 ワードに貼り付けた場合も、URLに下線が張られていません。 ●コントロールキーを押した状態でクリックすると、URL
- 締切済み
- その他([技術者向] コンピューター)
- エクセルで画像のハイパーリンクを一括表示させる方法
エクセルに貼り付けた画像にハイパーリンクをしています。 過去の質問を調べ、セルの文字に張ったハイパーリンクのURLを一括で読み取る方法はわかったのですが、画像に張ったハイパーリンクを一括で読み取る方法はありますか? もし、ありましたら教えて下さい。 よろしくお願いします 参考にした過去の質問 http://oshiete1.goo.ne.jp/qa1545446.html
- ベストアンサー
- オフィス系ソフト
- エクセルのURLリストで、一度にリンクを設定・解除したい
エクセルにURLがたくさんあります。 ひとつひとつダブルクリックすると、自動的に同じURLにハイパーリンクが設定されます。 設定されたセルを右クリックして、メニューから「ハイパーリンクの削除」を押すとリンクが解除されます。 これを一度に複数のセルで行うことは可能ですか? 沢山あるので、いちいち手動でやっていると大変です。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ハイパーリンクのURLを隣のセルに表示する
EXCELのシートの縦一列のセルにハイパーリンクの設定のある文字があります。 (1)この列の隣の列にそれぞれのハイパーリンクのURLを表示する。 (2)この列の文字表示を全てURLに一致させる。 (1)または、(2)は手作業でも出来ますが、できれば一括処理したいのですが、関数または、マクロでいい方法がありましたら教えてください。 よろしくお願いします。
- ベストアンサー
- Visual Basic
- Excelシート上のハイパーリンクの一括削除
Excelシート上にあるハイパーリンクの一括削除はできるのでしょうか? 現在、ある列にハイパーリンクされたデータがあります。 これを、列全体を一括でリンク解除したいのです。 セル毎に、右クリック→ハイパーリンク(H)→ハイパーリンクの削除 で一つずつ解除出来ますが、これを列単位で一括して行いたいです。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセル2003でハイパーリンクのセルからURLアドレスを取得する関数はありますか?
エクセル2003でハイパーリンクのセルからURLアドレスを取得する関数はありますか? ハイパーリンクを作成する関数は、=HYPERLINK("URLアドレス", "表示名称")で可能ですが、この逆で、"URLアドレス"を取得する関数を探しています。 例えばこのセルが、A1にあったとして、B1に =A1とすると、B1には「表示名名称」が表示されます。 C1に「URLアドレス」を表示させるVBAでなく関数が知りたいです。 無ければ、VBAでも構いません。 よろしくお願いいたします。
- ベストアンサー
- オフィス系ソフト
- エクセルでハイパーリンクを一括設定
エクセルでハイパーリンクをしたいのですが、セルにフルパス(写真の)で文字列を一括で貼付け、そのパスを一括でハイパーリンクの設定をしたいのですが。まとめて設定をするとどのセルも同じものが表示されてしまいます。よろしくお願いします。
- 締切済み
- SE・インフラ・Webエンジニア
- リンクを一括で開く方法
10個ずつをまとめて1度にタブで開きたいリンクが500個あります。 そのハイパーリンクのURLはエクセルに貼り付けてあるんですが、エクセルに限らず何かの方法で10個ずつ開きたいのですがよい方法はありますか?ちなみにマクロとかは全然わかりません。 今私がやろうとして失敗した例を書くのでアドバイスがあればよろしくお願いします。 クロムとファイアフォクスのアドオンの一括オープンをやろうとした→エクセルとワードをブラウザ形式で開いたがクロムが一括オープンをしない。 テキストエディタに貼り付けてhtml形式で保存したが、500個のURLをまとめてハイパーリンクにさせる方法がわからない。 最悪の場合、エクセルにはすでにハイパーリンクの状態で貼り付けてあるので500回クリックをすればいいのですが、10個ずつひらければ申し分ないです。 アドバイスをよろしくお願いします。 XP Office2003
- ベストアンサー
- Windows XP
お礼
お礼がおくれました。とても参考になりました。