vba新建txt文件并輸入內(nèi)容 Excel VBA,輸出為txt文檔,一個(gè)很簡(jiǎn)單的問(wèn)題?
Excel VBA,輸出為txt文檔,一個(gè)很簡(jiǎn)單的問(wèn)題?您好,代碼已更改為此打開“D:新建.txt“輸出為#1打印#1,右(第1頁(yè))。細(xì)胞(1,1)。值,2)關(guān)閉#1Excel數(shù)據(jù)導(dǎo)出成txt.文件的
Excel VBA,輸出為txt文檔,一個(gè)很簡(jiǎn)單的問(wèn)題?
您好,代碼已更改為此
打開“D:新建.txt“輸出為#1
打印#1,右(第1頁(yè))。細(xì)胞(1,1)。值,2)
關(guān)閉#1
Excel數(shù)據(jù)導(dǎo)出成txt.文件的VBA代碼?
excel將每行數(shù)據(jù)導(dǎo)出為TXT。文件的VBA代碼:
步驟1將外接程序宏的安全性設(shè)置為中或低,步驟2插入模塊ALT F11 open VBA editor open Sub daochu()dim I as integer,j as long,RW as long for I=1 toActiveSheet.UsedRange.Columns文件.計(jì)數(shù)打開此工作簿。路徑& “”&;單元格(1,I)& “.txt”,輸出為1表示J=2到單元格(65536,I)。結(jié)束(3)。行打印#1,單元格(J,I)。值Next J close 1Next imsgbox“數(shù)據(jù)導(dǎo)出完成!“,vbokonly,”export successful”End Sub
第3步:保存后關(guān)閉excel,第4步:再次測(cè)試,打開excel,按Ctrl-Shift-p完成導(dǎo)出。該文件位于磁盤D的根目錄中。如果要將其放在另一個(gè)目錄中,請(qǐng)打開“D:”&將amp;中的D更改為所需的目錄,但該目錄不能有中文字符