摘要:
Private Sub GetTestSheets_Click() Dim fso Set fso = CreateObject("Scripting.FileSystemObject") Dim path As String path = ThisWorkbook.path & "\WorkBooks\" Dim folder Set folder = fso.GetFolder(p... 阅读全文
posted @ 2010-10-15 09:04
ntcosmos
阅读(233)
评论(0)
推荐(0)
浙公网安备 33010602011771号