ウェブブラウザでテキストを開くようにExcelを強制するには？

Question

私はグーグルで検索の多くを実行する必要があり、私は単にGoogleのリンクにテキストを挿入するExcelドキュメントを作った：

「ジョン」AND「サッカー」OR「スポーツ」

「アンドレ」をAND "サッカー"または "スポーツ"

たとえば、セルA1に「John」という名前を付けて、次のリンクに挿入します。

https://www.google.nl/search?newwindow=1&q=%22& A1% 22 + AND +％E2％80％9CSoccer％E2％80％の9D + OR +％E2％80％9CSport％E2％80％の9D + & OQ =％22 & A1 ％22 + AND +％E2％80％9CS％E2％80％9D + OR +％E2％80％9CSport％E2％80％9D + & gs_l = serp.3 ... 7614.32351.0.32567.17.17.0.0.0.0.345.1828 .8j6j0j1.15.0 .... 0 ... 1c.1.64.serp..2.3.379 ... 30i10k1.vLZ-hcrrdgg

そして、それは次のように出てくる：

https://www.google.nl/search?newwindow=1&q=%22John%22+AND+%E2%80%9CSoccer%E2%80%9D+OR+%E2%80%9CSport%E2%80%9D+&oq=%22John%22+AND+%E2%80%9CSoccer%E2%80%9D+OR+%E2%80%9CSport%E2%80%9D+&gs_l=serp.3...7614.32351.0.32567.17.17.0.0.0.0.345.1828.8j6j0j1.15.0....0...1c.1.64.serp..2.3.379...30i10k1.vLZ-hcrrdgg

私は単にそれを下にドラッグすることで、すべての名前のためにこれを作りました。そして、これらは実際に私が欲しいページに私を送るすべてのリンクです。しかし、私ができないことは、 "CLICK ON THEM"です。何を試しても、それらのセルをクリック可能なハイパーリンクにすることはできません。

次のステップは、Amyuni PDFを使用して印刷/保存したいということです。 （これは現時点で最大の懸念事項ではありません）

ブラウザでテキストを開くように強制する方法はありますか？たとえばVBAを使用します。

これを実行する簡単な方法がわかっていれば、私もそれを聞きたいと思います。

親切！

Answer 1

あなたが欲しいのリンクがA5である場合は、マイクロソフトからこの例を持ってHyperlink() Function

=HYPERLINK(link_location, [friendly_name]) 

Answer 2

使用する必要があります。

Sub test() 

With Worksheets(1) 
.Hyperlinks.Add Anchor:=.Range("a5"), _ 
Address:="http://example.microsoft.com", _ 
ScreenTip:="Microsoft Web Site" 

End With 
End Sub 

あなたが住所を変更することができます= ...によるとセルの内容