摘要: 以下代码实现在工作薄开头插入一张新的工作表,内容为每个工作表的超链接。 工程->插入->模块Sub CreateLink()Dim i As IntegerSheets.Add Before:=Sheets(1)For i = 2 To Worksheets.CountActiveSheet.... 阅读全文
posted @ 2015-10-07 01:37 yzhming 阅读(605) 评论(0) 推荐(0) 编辑