我刚开始在Excel 2011 for MAC上使用VBA。我已经在Windows上顺利运行了以下代码,但在Mac上得到了错误75。任何帮助,不胜感激:
Sub cr_acc()
Dim rdata() As String, idxData As Long
Open "\Volumes\SMALL 1\1.txt" For Input As #1
rdata = Split(Input(LOF(1), #1), ";")
Close #1
idxData = 1
Do While idxData < UBound(rdata)
Debug.Print rdata(idxData)
Loop
End Sub
我没有将Mac用于VBA,但我确实记得由于操作系统的差异,指定文件路径是不同的。
从内存中,您必须使用冒号分隔符指定路径,在其中包含硬盘名称并在路径中包含用户名。添加您自己的MyName
并尝试类似的方法:
MyPath = "Macintosh HD:Users:MyName:Desktop:TestFolder:MyFile.xlsx"
。
这未经测试,但应通过此链接为您提供一个起点。
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句