絕大部分網(wǎng)頁都會存在列表认境,但是有時候我們需要的只是鏈接而不是標(biāo)題聘萨,怎么辦? 小 Q 這里就有一個用 excel 快速獲取列表鏈接的方法朦促,方法如下:
首先膝晾,打開有你需要的列表網(wǎng)頁,新建一個 excel务冕,把列表中的內(nèi)容直接復(fù)制粘貼到 excel 里面血当,貼完之后,接下來禀忆,我們在 excel 中按下 Alt+F11臊旭,在彈出的對話框中選擇 “插入”→“模塊”
在插入的模塊里面輸入如下代碼:
代碼:
Function GetActAddress(HlinkCell)
Application.Volatile True
With HlinkCell.Hyperlinks(1)
GetActAddress = IIf(.Address = "", .SubAddress, .Address)
End With
End Function
輸入完畢就可以把這個對話框關(guān)掉了。
好了箩退,現(xiàn)在我們在右邊的單元格(如第一個數(shù)據(jù)在A1)輸入如下函數(shù):
=GetActAddress(A1)
回車离熏,看看結(jié)果吧,標(biāo)題的鏈接已經(jīng)出來了戴涝,這時候你只需要繼續(xù)往下拉滋戳,所有的鏈接就都獲取到了