如何在Excel中過濾超鏈接？

Question

我有一些行超鏈接，沒有超鏈接 我只想過濾超鏈接數據。謝謝。

Answer 1

這將複製與鏈接到塔B爲你的超鏈接在評論部分中提到：

Sub Macro1() 
    cnt = 1 
    For Each cell In Range("A:A") 
     If cell.Hyperlinks.Count > 0 Then 
      Range("B" & cnt) = cell 
      ActiveSheet.Hyperlinks.Add Range("B" & cnt), cell.Hyperlinks(1).Address 
      cnt = cnt + 1 
     End If 
    Next 
End Sub 

Answer 2

高光（選擇）要過濾（不包括標題行）和運行該小宏小區列A：

Sub HyperPicker() 
    Dim r As Range 
    For Each r In Selection 
     If r.Hyperlinks.Count = 0 Then 
      r.EntireRow.Hidden = True 
     End If 
    Next 
End Sub