隨手記錄

【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 相關文章🔍