2020年3月9日
批量 取文件目录，浏览器中打开
摘要： '在第8列中不为空的清空下，从第一列中的超链接中，去目录，放在对应第二列中Sub ChangeDocumentLinkToFolderLink() On Error Resume Next Dim a As String With ActiveSheet rowmax = .Cells(104857 阅读全文
posted @ 2020-03-09 10:34 Sundance8866 阅读(214) 评论(0) 推荐(0) 编辑