其實(shí)并不難，excel的vba功能可以幫你實(shí)現(xiàn)，代碼如下

實(shí)際操作中，更換下操作文件的名稱就好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