- 帖子
- 117
- 主題
- 34
- 精華
- 0
- 積分
- 155
- 點名
- 0
- 作業系統
- windows XP
- 軟體版本
- OFFICE 2010
- 閱讀權限
- 20
- 性別
- 男
- 註冊時間
- 2010-5-19
- 最後登錄
- 2024-8-29
|
請問......下面的巨集為什麼要寫在檔案裡的模組,而不能寫在normal裡的模組???
Sub test()
Dim xlWkApp As Object, xlWk As Object
Set xlWkApp = CreateObject("excel.application")
With xlWkApp
.Visible = True
Set xlWk = .Workbooks.Open("C:\book2.xls")
xlWk.Sheets(1).Range("a1") = ThisDocument.Tables(2).Cell(2, 6)
End With
End Sub |
|
發表於 2010-10-17 11:18
| 
