【EXCEL】- VBA - EXCEL欄位內容存成文字檔

【EXCEL】- VBA - EXCEL欄位內容存成文字檔

⬛ 問題:EXCEL - VBA - EXCEL欄位內容存成文字檔 要如何做到?

 


 


 

⬛ 回答:

一直以來在使用EXCEL時,完全沒有使用過它的存檔功能。也就是要將EXCEL 欄位中的文字,另外存成文字檔 *.txt 或 *.bat

所以將程碼式記錄下來,下次要用時,可以使用copy過去使用。

紅用字體的部分,即為儲存檔案的相關部分。

 

Sub SAVE2BAT()

   Dim I As Integer
   Dim N As Integer
    

   Dim RAWDATA As String
   Dim SAVENAME As String
   
   
SAVENAME = ActiveWorkbook.Path & "\" & "Time_modify.BAT"
   
 
 Open SAVENAME For Output As #1 
   
   I = ActiveSheet.Range("A2").End(xlDown).Row  

   Range("F2").Select

   For N = 2 To I
    
       RAWDATA = ActiveCell.Text & Chr(10) & "timeout /t 1" & Chr(10)                    
       
Print #1, RAWDATA          
       ActiveCell.Offset(1, 0).Select
    
    
    Next N
   
   
Close #1


End Sub

 


 


 

延伸閱讀

■ EXCEL VBA 相關文章🔍


arrow
arrow
    全站熱搜

    News123 發表在 痞客邦 留言(0) 人氣()