fieldset{padding:10px;}
vba写txt文件用vba往txt文件中写东西，怎么样能从空白行开始写？不覆盖原来txt文件中存在的东西
vba ——解决方案——————————————————–
Subtest1111()Dimfso,sFileDimstr,filepath,filenameAsStringDimlinecountAsIntegerfilepath="d:\"filename="1.txt"ConstForReading=1,ForWriting=2,ForAppending=8,TristateFalse=0'ForAppending从文件末尾追加Setfso=CreateObject("Scripting.FileSystemObject")Iffso.FileExists(filepath&filename)=TrueThenSetsFile=fso.OpenTextFile(filepath&filename,ForAppending,TristateFalse)sFile.Write("Helloworld!")'sFile.Writeline("Helloworld!")sFile.CloseEndIfSetfso=NothingSetsFile=NothingEndSub
如果你希望成功，以恒心为良友，以经验为参谋，以小心为兄弟，以希望为哨兵。