Foxtable(狐表)用户栏目专家坐堂 → 有關DLL


  共有7755人关注过本帖树形打印复制链接

主题:有關DLL

美女呀,离线,留言给我吧!
catyin1989
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
有關DLL  发帖心情 Post By:2013/1/2 22:19:00 [显示全部帖子]

在外局引用加入了 Microsoft.Office.Interop.word.dll

命名空間為 Microsoft.Office.Interop.word.dll, 空間別名為 MSWord

然後在某窗口寫下代碼: Dim App As New MSWord.Application, 出現錯誤: 型別 MSWord.Application 未定義

 

是遺留了甚麼設定嗎?

 

dll是下載和參考這個帖子的: http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=14778&replyID=&skin=1


 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2013/1/3 21:55:00 [显示全部帖子]


 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2013/1/5 0:05:00 [显示全部帖子]

添加后重新打開, 然后引用, 再重新打開, 也不能用哦, 是因為我用的是試用版嗎? >.<

 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2013/1/5 0:57:00 [显示全部帖子]

已解決了, 謝謝~~ ><

 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2013/1/6 20:21:00 [显示全部帖子]

請問運用word的話, 有VBA的列表嗎?

例如EXCEL, 要列印就需要
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
WS.print

但是轉換成WORD的話, 這裡的MsExcel.WorkBook要換成MsWord.Document,
MSExcel.Worksheet應該換成甚麼?



 回到顶部
美女呀,离线,留言给我吧!
catyin1989
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:165 积分:1647 威望:0 精华:0 注册:2012/9/12 21:46:00
  发帖心情 Post By:2013/1/12 22:10:00 [显示全部帖子]

看不懂文呀... 試過以下的都不行... 有誰能幫幫忙把適合的代碼找出來嗎? >.<

Dim wdPrintOutPages1 As WdPrintOutPages = WdPrintOutPages.wdPrintAllPages

Dim Background As
				Object
				Dim Append As
				Object
				Dim Range As
				Object
				Dim OutputFileName As
				Object
				Dim
				From
				As
				Object
				Dim
				To
				As
				Object
				Dim Item As
				Object
				Dim Copies As
				Object
				Dim Pages As
				Object
				Dim PageType As
				Object
				Dim PrintToFile As
				Object
				Dim Collate As
				Object
				Dim FileName As
				Object
				Dim ActivePrinterMacGX As
				Object
				Dim ManualDuplexPrint As
				Object
				Dim PrintZoomColumn As
				Object
				Dim PrintZoomRow As
				Object
				Dim PrintZoomPaperWidth As
				Object
				Dim PrintZoomPaperHeight As
				Object
				Dim _Application1 As _Application
_Application1.PrintOut(Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)

 回到顶部