摘要: 本工作簿所在的文件夹里所有xlsx文件列到A列并形成超链接 Sub Sample() Dim MyName As String, MyPath As String Dim i As Long MyPath = ThisWorkbook.Path & "\" MyName = Dir(MyPath & 阅读全文
posted @ 2022-01-21 15:54 熬肥妖 阅读(96) 评论(0) 推荐(0) 编辑