請問....word控制excel vba?

帖子: 117
主題: 34
精華: 0
積分: 155
點名: 0
作業系統: windows XP
軟體版本: OFFICE 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-19
最後登錄: 2025-11-17

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2010-10-25 22:42 | 顯示全部帖子

請問....word控制excel vba?

請問....我有個word檔用巨集轉成excel, 然後直接run excel內的巨集copy至另一個特定的excel(但檔名都不固定), 但在是再最後執行excel的巨集後有問題?可以幫我解一下嗎?謝謝~

123.rar (17.88 KB)

樓主熱帖

初學者color

帖子: 117
主題: 34
精華: 0
積分: 155
點名: 0
作業系統: windows XP
軟體版本: OFFICE 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-19
最後登錄: 2025-11-17

2^#

發表於 2010-10-26 11:00 | 顯示全部帖子

特定的活頁簿會先開,由於是用2010版,所以開啟時都會多一個personal 活頁簿, 所以特定的活頁簿會排在第2個

初學者color

帖子: 117
主題: 34
精華: 0
積分: 155
點名: 0
作業系統: windows XP
軟體版本: OFFICE 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-19
最後登錄: 2025-11-17

3^#

發表於 2010-10-26 15:55 | 顯示全部帖子

回復 4# et5323

謝謝回答~~~
1.所以....應該是無法以word執行excel的vba? 還是有其他更好的方法
2.筆誤.....不好意思~ ^^"

初學者color

帖子: 117
主題: 34
精華: 0
積分: 155
點名: 0
作業系統: windows XP
軟體版本: OFFICE 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-19
最後登錄: 2025-11-17

4^#

發表於 2010-10-26 16:49 | 顯示全部帖子

本帖最後由 color790 於 2010-10-26 22:11 編輯

回復 6# et5323

由於特定的excel檔,是由公司系統抓的,所以無法得知路徑.....
word與excel vba原來有通用.....我以為是word歸word, excel歸excel =.=||| 我再來試試好了

功力不夠,COPY進word 行不通 ....

初學者color

帖子: 117
主題: 34
精華: 0
積分: 155
點名: 0
作業系統: windows XP
軟體版本: OFFICE 2010
閱讀權限: 20
性別: 男
註冊時間: 2010-5-19
最後登錄: 2025-11-17

5^#

發表於 2010-10-28 11:20 | 顯示全部帖子

另外請問一下,以下為word的vba, 要怎麼改轉到excel後的字型及格式(格線,置中等....)
Sub test()
Dim xlWkApp As Object, xlWk As Object
Set xlWkApp = CreateObject("excel.application")
With xlWkApp
      .Visible = True
      Set xlWk = .Workbooks.Add
      xlWk.Sheets(1).Range("a1") = ThisDocument.Tables(2).Cell(2, 6)
      xlWk.Sheets(1).Range("a2") = ThisDocument.Tables(2).Cell(5, 6)
      End With
End Sub

初學者color