Microsoft 製品に組み込まれている Visual Basic の実装。
goodwaveさん、こんにちは。
ご質問の内容から、開発者向けの<**Msdnフォーラム**>の方が情報が集まり易いと思います。
よろしければご利用になってみて下さいね。
このブラウザーはサポートされなくなりました。
Microsoft Edge にアップグレードすると、最新の機能、セキュリティ更新プログラム、およびテクニカル サポートを利用できます。
vb.netのformで差し込み印刷時のマクロを実行しようとしています。
'差し込み
Path = "C:\Users\・・・\Documents\My Data Sources"
wdApp = CreateObject("Word.Application")
With wdApp
'word文書を開く
.visible = True
.documents.open("C:\AtenaPrint" & Futou)
'差し込み
'ActiveDocument.MailMerge.MainDocumentType = wdFormLetters
wdApp.ActiveDocument.MailMerge.OpenDataSource(Name:=Path & Meibo, ConfirmConversions:=False, ReadOnly:=False, LinkToSource:=True, AddToRecentFiles:=False,
PasswordDocument:="", PasswordTemplate:="", WritePasswordDocument:="", WritePasswordTemplate:="", Revert:=False, Format:=0,
Connection:="Provider=Microsoft.ACE.OLEDB.12.0;User ID=Admin;Data Source=Path & Meibo;Mode=Read;Extended Properties=""HDR=YES;IMEX=1;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Engine Type=37;Jet OLEDB:Database" _
, SQLStatement:="SELECT * FROM Sheet1$", SQLStatement1:="", SubType:=2)
'.ActiveDocument.MailMerge.ViewMailMergeFieldCodes = wdToggle
End With
コードの最後の
'.ActiveDocument.MailMerge.ViewMailMergeFieldCodes = wdToggle
が「結果のプレビュー」をクリックしたマクロかな?と思って質問させていただきます。
vb.netで「開始」をして見ますと,wdToggle のところでエラーになりますが,対処法がわからずこまっています。
vb.netのformから実行する**「結果のプレビュー」をクリックしたマクロ**はどのように書くのでしょうか?お教え願います。
Microsoft 製品に組み込まれている Visual Basic の実装。
ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。