看板 Visual_Basic 關於我們 聯絡資訊
※ 引述《Lohasal (生命奇蹟小狐狸)》之銘言: : 改用VBA寫入txt file或許能解決你的問題 : 不是用你指定的方法 @@ : open thisworkbook.path & "\" & "text.txt" for output as #5 ^^^^^^^^^^^^^^^^^^^^^^ : for i = 1 to 20 : print #5 ,worksheets("sheet1").range(cells(i,"A"),cells(i,"D")).value ^^^^^^^^^^^^^^^ 不好意思 這兩行的意思是啥 我在VBA裡面沒看過這玩意 可以解釋一下嗎? : -------------------- : : ex. : : Sub Shelltxt() : : Shell "F:\WINDOWS\system32\notepad.exe" : : End sub : : 沒錯 這樣是能打開 exe檔 但我後續要做的動作是 : :   將Sheet1的Range("A1: D20") 複製貼到 txt檔中 : : 然後再將txt檔存檔存到某一個我指定的路徑 (ex. C:\temp ) ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ 如果在我成功複製內容到TXT檔後 要怎樣做上述動作? (存檔..) 感謝!!! : : 請問該如何操作呢? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.104.11.110