- 帖子
- 4
- 主題
- 1
- 精華
- 0
- 積分
- 6
- 點名
- 0
- 作業系統
- Windows 7
- 軟體版本
- OFFICE 2016
- 閱讀權限
- 10
- 註冊時間
- 2017-8-23
- 最後登錄
- 2021-12-1
|
[發問] 關於VBA將EXCEL分頁另存為文字檔的問題
目的是將EXCEL分頁的每一頁都另存為一個文字檔
但只要文字內容有半形逗號
則該欄內容前後會被加上""
例如EXCEL內容為：
ABC
ABC,
ABC,}
另存為文字檔後內容變成
ABC
"ABC,"
"ABC,}"
請問各位大大，是否有方式可以另存為文字檔之後，還能保持內容不變呢?
感謝回答- Dim theName As String
- Dim i As Integer
- Sub SaveSheetsAsTXT()
- On Error GoTo Line1
- For i = 1 To 2
- ThisWorkbook.Sheets(i).Copy
- theName = ThisWorkbook.Sheets(i).Name & ".txt"
- ActiveWorkbook.SaveAs Filename:="D:\" & theName, FileFormat:=xlUnicodeText
- ActiveWindow.Close
- Next i
- Line1:
- End Sub
|
|
發表於 2021-11-19 20:46
| 
