< Public Function LinkTo (URL As String, Text As String, Optional WrapInTag As String = "") (?)
Comments
Public Function LinkTo (URL As String, Text As String, Optional WrapInTag As String = "")
LinkTo = "<a href=" & Quotes & URL & Quotes & ">" & _
Text & _
"</a>"
If WrapInTag <> "" Then _
LinkTo = "<" & WrapInTag & ">" & _
LinkTo & _
"</" & WrapInTag & ">"
End Function