[算表] 如何將某個sheet上 某個range 寫入txt檔
軟體:
Office Excel
版本:
2003
問題如何某sheet某個range的內容寫入txt
Private Sub test_output()
Dim FileNo As Integer
Dim Filename As String
Filename = "d:\data.txt" ' Define file name
FileNo = FreeFile ' Establish free file handle
Open Filename For Output As #FileNo ' Open file (writing mode)
Print #FileNo, Sheet1.Range("a2:c5").Text
Close #FileNo ' Close file
End Sub
===
這樣寫出來會是null，
請問有沒有除了要用for的一個一個cell寫入的寫法
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.251.168.25
→
10/10 01:50, , 1F
10/10 01:50, 1F
Office 近期熱門文章
PTT數位生活區 即時熱門文章
