所以我有这个代码
Dim fpath As String
fpath = "D:\stats.csv"
Open fpath For Append As #fw
但是,当我尝试运行它时,出现运行时错误“ 52”:文件名或数字错误。
我不知道我在做什么错,也许是我不知道的Office 2016 / Windows 10故障。
在此先感谢您的帮助
您需要fw
提供一个有效的文件标识号。为此,请从函数获取标识符FreeFile
:
Dim fpath As String, fw As Long
fw = FreeFile ' <--------- get a valid file identifier
fpath = "D:\stats.csv"
Open fpath For Append As #fw
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句