
excel
在
excel中,当打开时会自动加载一个名为"logg"的文件夹下所有以.txt为后缀的文件,并将其导入到Sheet1中。以下是一个示例代码:Sub Workbook_Open()Dim folderPath As String, fileExtension As StringfolderPath = "F:logg"fileExtension = "*.txt"Dim file, i, jFor i = 1 To Dir(folderPath & fileExtension, vbNormal)file = folderPath & ii = i + 1ReDim items(1 To 5) As Stringj = 1Do While j