2013-01-07 59 views
0

我需要帮助与页面设置对话框.. 有没有什么办法,我可以通过使用vb.net的单词中的openpagedialog一些值。MS Word页面设置对话框

我的代码是

Dim dialog As Word.Dialog = Globals.ThisAddIn.Application.Dialogs(Word.WdWordDialog.wdDialogFilePageSetup) 
      dialog.DefaultTab = WdWordDialogTab.wdDialogFilePageSetupTabPaper 

      dialog.Show() 

我需要自动选择纸盘时,此对话框打开...

回答

0

我不知道,如果这个工程或不是因为我的打印机只有一个纸盒。 让我知道如果这是正确的

.... 
Dim wd as Word.Application = new Word.Application() 
Dim doc As Word.Document = wd.Documents.open("yourdoc.doc") 
doc.PageSetup.FirstPageTray = Word.WdPaperTray.wdPrinterMiddleBin 
wd.Visible = true 
Dim dialog As Word.Dialog = wd.Dialogs(Word.WdWordDialog.wdDialogFilePageSetup) 
dialog.DefaultTab = Word.WdWordDialogTab.wdDialogFilePageSetupTabPaper 
dialog.Show() 
.... 

基本上我把托盘上的当前文档的PAGESETUP。当我打开对话框时,从当前文档数据中选择纸盒。

+0

它非常接近。唯一我不明白的是,doc.PageSetup.FirstPageTray = Word.WdPaperTray.wdPrinterMiddleBin 正在选择自动托盘,但我需要选择托盘1 ...任何帮助请?????谢谢 –

+0

检查此页http://msdn.microsoft.com/en-us/library/office/microsoft.office.interop.word.wdpapertray(v=office.11​​).aspx – Steve