|
本帖最後由 rockwell 於 13-9-1 12:30 編輯
Acer2266 發表於 13-9-1 11:22
上面是 第一個工作表內 所有資料內容
目前每個表分開按也有好處 就是 按好後會去細細"品嚐" 數據變化的 ...
所以ACER大現在就剩下由 Excel 匯出 txt 檔的問題嗎?
如果是的話,那匯出後是像我在 5F 的 CODE 的那種樣子嗎?
是的話,考慮到是從工作表中的儲存格提出數據,可能要注意更改的部分:
Sub VbaTest()
Open "D:\Acer2266.txt" For Output As #1
Print #1, "今日自營淨買超" & Sheets("自營").Cells(2, 1) & "張"
Close #1
End Sub
褐色字:檔案轉出位置名稱。
綠色字:工作表名稱,如ACER大要從「自營」那個工作表提出東西。
藍色字:儲存格位置,如要從2A提出數據。
紅色字:" " & sheets(" ").cells(2,1) & " "
" " & " " & " "
&像是文字連接符號,連接 " " " " " ",
只是中間的 sheets(" ").cells(2,1) 不是文字,算是一種代數,所以不需要 " " 來包。
舉例:
Print #1, "現在高雄"&"沒下雨"&"但地上還是濕的"
出來的文字其實就是「現在高雄沒下雨但地上還是濕的」
不知道有沒有幫到ACER大。還是太基礎了,我只是在班門弄斧。 |
|