一、利用编辑方式添加的超链接
（一）VBA

Function GetAddress(HyperlinkCell As Range)
             GetAddress = Replace _

      (HyperlinkCell.Hyperlinks(1).Address, "mailto:", "")
End Function
（二）Python直接提取：

利用xlrd中的hyperlink_map功能
import xlrd


mainData_book = xlrd.open_workbook("IEsummary.xls", formatting_info=True)


mainData_sheet = mainData_book.sheet_by_index(0)


for row in range(1, 101):  

     link = mainData_sheet.hyperlink_map.get((row, col))#row和col分别为要提取超链接信息的单元格行和列

     url=link.url_or_path

二、对于利用公式生成的超链接
如C1单元格的内容为=HYPERLINK("http://snap.windin.com/ns/bulletin.php?id=88214874&type=1", "宏辉果蔬:关于2017年第三季度使用部分闲置自有资金购买理财产品的公告")，则无法利用上述方法进行提取。可以先提取公式文本，再对文本进行提取