※ 引述《sorry0920 (do something right)》之銘言：
: 軟體:
: EXCEL VBA
: 版本:
: 2003
: 各位高手想請問一下 我想要在VBA中新增一個檔名為開啟中檔案的txt檔
: 程式如下:
: Dim tt as string
: tt= Application.ActiveWorkbook.Name
: Open ThisWorkbook.Path & "\" & "tt.txt" For Output As #1
: Close #1
: 我這樣執行出來檔名還是tt，如果tt設成整數就會有錯誤，麻煩各位高手幫我解答一下
: 感激不盡~~
應該是因為你把tt也包含在雙引號裡面，他被視為固定的名稱tt。
如果把它改成：
Open ThisWorkbook.Path & "\" & tt & ".txt" For Output As #1
應該可以解決。你可以試試看。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 210.209.139.10