实际操作中,更换下操作文件的名称就好fullname哪一行
Subcaozuo(x)Dimfullname$,i&,s$fullname=”C:\Users\DELL\Desktop\d\demo2\”&xOpenfullnameForInputAs#1i=1DoWhileCells(i,1)<>””i=i+1LoopDoWhileNotEOF(1)LineInput#1,sCells(i,1)=si=i+1LoopClose#1EndSub
时间:2019-05-06 03:57:04
实际操作中,更换下操作文件的名称就好fullname哪一行
Subcaozuo(x)Dimfullname$,i&,s$fullname=”C:\Users\DELL\Desktop\d\demo2\”&xOpenfullnameForInputAs#1i=1DoWhileCells(i,1)<>””i=i+1LoopDoWhileNotEOF(1)LineInput#1,sCells(i,1)=si=i+1LoopClose#1EndSub