#在超链接中防止完整超链接的副本

我已经制作了一个macros,通过超链接从一列复制到另一个。

macros工作正常,但是超链接在它们中间包含'#',所以可以说:

https://website.com/nu#somethingsomething 

这使macros观副本只是它的第一部分,即:

 https://website.com/nu 

任何想法如何使Excel忽略“#”(如果可能的话)并复制超链接的整个值

VBA代码:

 Sub MilestonesHyperlink() For i = 2 To 62 'Number of rows If Range("B" & i).Value <> "" And Range("A" & i).Value <> "" Then 'Copy from column B to A Dim newLink As String If Range("B" & i).Hyperlinks.Count = 1 Then newLink = Range("B" & i).Hyperlinks(1).Address Range("A" & i).Hyperlinks.Add anchor:=Range("A" & i), Address:=Range("A" & i) Range("A" & i).Hyperlinks(1).Address = newLink End If End If Next i End Sub 

尝试用以下newlinkreplace新newlink

 newLink = Range("B" & i).Hyperlinks(1).Address + "#" + Range("B" & i).Hyperlinks(1).SubAddress