返回列表 上一主題 發帖

word vba表格貼到excel再取回

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-7-27 14:32 | 只看該作者

word vba表格貼到excel再取回

大家好
我想問一下如何在word  vba環境下
開啟excel 然後將word的表格貼到excel的sheet1中的c5中
然後再將d5、e5中的內容貼回word中

在麻煩大家了

謝謝大家~
收藏 分享

IQ2008

帖子
28 
主題
8 
精華
0 
積分
52 
點名
0  
作業系統
WIN XP 
軟體版本
EXCEL 2003 
閱讀權限
20 
註冊時間
2011-6-9 
最後登錄
2016-12-26 
2#
發表於 2014-7-28 16:19 | 只看該作者
在word和excel都要寫 vba, word部份如下:

Sub XLTest()

     Dim XL as Object

     Set XL = CreateObject("Excel.Application")

     XL.Workbooks.Open "C:\My Documents\ExcelFile.xls"


     '
     ' XL.Run "Module1.TestMacro"
     '
     '
     XL.Run "TestMacro"

End Sub

TOP

        靜思自在 : 做該做的事是智慧，做不該做的事是愚癡。
返回列表 上一主題