Excelで外部Webサイトへのホットリンクを作成するためのVBSスクリプティング

Question

VisualBasicを使用して実行するファイルを作成し、Excelスプレッドシートを作成するルーチンがあります。この方法は比較的単純ですが、私は外部のウェブサイトへのクリック可能なURLを作成しようとする問題にぶつかってきました。ここでは、コードの抜粋です：

xlApp.Cells(14,1).Value="3. Here is some valid sample text:" 
xlApp.Cells(14,1).WrapText=True 
xlApp.Cells(14,1).Font.FontStyle="Plain" 
xlApp.Cells(14,1).HorizontalAlignment=-4131 
xlApp.Cells(14,1).IndentLevel = 3 

***これは xlApp.Cells（15,1）が動作しない部分である.Select xlApp.ActiveSheet.Hyperlinks.Addアンカー=選択、住所は、 ：= _ "http://www.testedu.edu/"、TextToDisplayは= "www.testedu.edu"

---

xlApp.Cells(16,1).WrapText=True 
xlApp.Cells(16,1).Font.FontStyle="Plain" 
xlApp.Cells(16,1).HorizontalAlignment=-4131 
xlApp.Cells(16,1).IndentLevel = 3 
xlApp.ActiveWorkbook.Saved=True 

私が作成したアクティブなURLを取得するためにさまざまなオプションを試してみましたが、私は得るように見えることはできません構文が正しい。私は、= HYPERLINK構文を使用してみましたが、成功していない、すべての種類の他のものを試しましたが、キーを見つけることができません。問題を特定して私を真っ直ぐにすることができる人がいることを願っています。

ありがとうございます！それは使うべきとき

マイク

Answer 1

ハイパーリンクを追加するにはあなたのコードは、「=」を使用しています「：=」。これを試して。

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="http://www.testedu.edu/", TextToDisplay:="www.testedu.edu" 

スティーブ