摘要：
直接在返回目录下方添加链接代码 '添加超链接 strlianjie = str + "!A1" Cells(hang, 4).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _ strlia 阅读全文
摘要：
直接上代码 Private Sub casecount_Click() Dim str As String Dim hang As Integer Dim hang1 As Integer Dim hang2 As Integer Dim cellname As String Dim hangcel 阅读全文