For Each hl In Range("C:C").Hyperlinks . что это означает ("C:C"). ?

Sub test()
Dim hl As Hyperlink, strOld As String, strNew As String
strOld = "C:\"
strNew = "G:\"
For Each hl In Range("C:C").Hyperlinks
With hl
.Address = Replace(.Address, strOld, strNew)
.TextToDisplay = Replace(.TextToDisplay, strOld, strNew)
End With
Next hl
End Sub

коипилируется , но ничего не меняется. Такое ошущения , что гиперрсылок, с такими буквами нету. Они там хоть завались.

Это моя модификация

Sub Macro3()
Dim hl As Hyperlink, strOld As String, strNew As String

strOld = "C:\"
strNew = "G:\"
For Each hl In ActiveSheet.Hyperlinks


With hl
.Address = Replace(.Address, strOld, strNew)
.TextToDisplay = Replace(.TextToDisplay, strOld, strNew)
End With
Next hl

End Sub

он заменяет дисплай нэйм на нужную букву, но адресс нет.

И еще когда гиперссылка ссылается на физически жестки диск , то эксель показывает путь начиная с буквы диска. Ну типа C:\......

а если это замапленный сетевой драйв , то так \\SKYZMO040FIL\nwdata\Common\Phone Book\E-mail address Book.xls. Здесь даже не видно на какой драйв ссылаеться.