我有一批大约100,000个文本文件,我希望使用vba作为字符串提取这些文件。在过去,我一直这样做,没有问题:
Sub Main()
Dim PathAndName As String
Dim TextFile As Integer
Dim TextString() As String
Redim TextString(100000)
For i = 1 To 100,000
PathAndName = "C:\File_" & i & ".ext"
TextFile = 1
Open PathAndName For In