Excel 輸出 txt，多餘空白行

yenwang

大家好
目前要將工作部的欄位A的數據，輸出到文字檔txt中，再給其他程式執行使用
程式碼主要如下，但會有個問題就是輸出完成後的txt檔案中
實際上末端會有一個空白行
這導致其他程式執行時會出錯
想請問是否有辦法讓excel輸出時，可以避免有這空白行
謝謝

1. torget = folderPath & "javainput.txt"
   
2. Open torget For Output As #1
   
3. 
   
4.     For i = 1 To filledCellsCount
   
5. 
   
6.         outputinfo = Trim(ActiveSheet.Cells(i, 1).Value)
   
7.         Print #1, outputinfo
   
8.         
   
9.         
   
10.     Next i
    
11. 
    
12. Close #1

複製代碼

下載 (16.29 KB)

2024-1-10 10:09

yenwang

回復 2# quickfixer


萬分感謝
成功了:D