Excel小技巧
如果有Excel中既提供有网站名称,也提供有网址,如何快速的、批量的创建超级链接呢?
刚刚回答了个同样的问题:
按ALT+F11,然后选你的工作表,把下面的代码粘贴进去,然后回到EXCEL中按ALT+F8,执行宏Content即可
Sub Content()
'创建目录
'
Set NewSheet = Sheets.Add(before:=Sheets(1), Type:=xlWorksheet)
NewSheet.Name = "Content"
NewSheet.Cells(1, 1).Value = "Content"
For i = 2 To Sheets.Count
NewSheet.Cells(i, 1).Value = i - 1
With Worksheets(1)
.Hyperlinks.Add Anchor:=.Cells(i, 2), Address:="", _
SubAddress:=Sheets(i).Name & "!A1", TextToDisplay:=Sheets(i).Name
End With
Next i
End Sub
这是直接用表名创建目录的,记得先把的你的Sheet2、Sheet3等表名改成四川、重庆等样子
314064076,具体说,你给出的条件也就只能一个一个添加.没有任何指向性