投稿日	： 2004/05/13(Thu) 11:04
投稿者	： shi
Ｅメール	：
ＵＲＬ	：
タイトル	： 花ちゃんさん、ありがとうございます＾＾

> > VBからWordを呼び出して印刷設定でヘッダー部に指定の文字を
> > 表示させたいのですが、うまくいきません。
> どこまでできて、どこがどのようにうまくいかないのでしょうか？

ワードを起動させるところまではできているのですが、
印刷設定の方法がわからず、質問させていただきました。

> > どなたか、VBからWordの印刷設定を行う関数等ご存知のかた
> > 教えていただけませんでしょうか。
>
> 知りたい操作をマクロに記録して、そのマクロを見てみましたか？
>
> Private Sub Command1_Click()
>     Dim wdApp   As Word.Application
>     Dim wdDoc   As Word.Document
>     Set wdApp = New Word.Application
>     Set wdDoc = wdApp.Documents.Add
>     wdApp.Visible = True
>    
>     wdDoc.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
>     wdApp.Selection.TypeText Text:="ヘッダーを記入します"
>     wdDoc.ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
>        
>     '終了は Word から行って下さい。
>     Set wdDoc = Nothing
>     Set wdApp = Nothing
> End Sub

この方法で一度試してみます。
あいまいな表現ですみませんでした。
花ちゃんさんありがとうございました。

★ - VBからwordの印刷設定を - shi 05/12-20:39No.8941
• Re: VBからwordの印刷設定を - 花ちゃん 05/12-22:04 No.8943
  • 花ちゃんさん、ありがとうございます＾＾ - shi 05/13-11:04 No.8951
    • 何度ももうしわけありません。 - shi 05/13-15:13 No.8957
      • Re: 何度ももうしわけありません。 - nanashi 05/13-16:19 No.8959
      • Re: 何度ももうしわけありません。 - 花ちゃん 05/13-17:16 No.8960
        • ありがとうございました。 - shi 05/14-10:33 No.8965