2017-06-09 5 views
0

ExcelタグにExcel、Word、またはNumbersハイパーリンクを変換しようとしています。ExcelまたはNumbers(mac)ハイパーリンクをhtmlタグに変換する

たとえば、私は[linkName]があり、 <a href='URL'>[linkName]</a>が必要です。

アイデア?ありがとうございました。

+0

それぞれ同じURLまたは異なるURLを使用していますか?それぞれの場合のURLと同じリンク名ですか? – Doc

+0

いずれの場合もURLが異なります。場合によっては、1つのセルにつき2つのリンクを使用します。 –

答えて

0

ハードリサーチの結果、答えが見つかったので、言葉で言えば、新しいマクロを作成して後で実行することができます。

は、マクロを作成するには、新しいものを作成する「表示 - >マクロ」に行くと、このコードを貼り付けます。

Sub AddHREF() 
' Turn Word hyperlinks into <a href...> HTML tags 
Dim i As Integer 
For i = ActiveDocument.Hyperlinks.Count To 1 Step -1 
    With ActiveDocument.Hyperlinks(i) 
    If InStr(1, .Address, "http://www.gaebler.com", 1) Then 
     .Range = "<a href=""" & Replace(.Address, "http://www.gaebler.com", "") & """>" _ 
     & Replace(Replace(.TextToDisplay, "<strong>", ""), "</strong>", "") & "</a>" 
    Else 
     .Range = "<a href=""" & .Address & """ target=""_blank"" rel=""nofollow"">" & _ 
     Replace(Replace(.TextToDisplay, "<strong>", ""), "</strong>", "") & "</a>" 
    End If 
    End With 
    Next i 
End Sub 

は、それからちょうどマクロを実行し、魔法が表示されます!

関連する問題