[リストへもどる]
一括表示
投稿時間：2004/06/16(Wed) 11:05
投稿者名：にに
Ｅメール：
ＵＲＬ　：
タイトル：Word2003での差し込み印刷のマクロについて
> [OSのVer]：Windows 2000　　　[VBのVer]：VB 6.0　　
>
>
> いまWordを使って差し込み印刷を行っているのですが
> Word2000,2002では動いていたのですが2003になったらエラーになってしまいました。
> 今、記述しているコードは以下のようになっています。　
>
>     With ActiveDocument.MailMerge
>         .Destination = wdSendToNewDocument
>         .MailAsAttachment = False
>         .MailAddressFieldName = ""
>         .MailSubject = ""
>         .SuppressBlankLines = True
>         With .DataSource
>             .FirstRecord = wdDefaultFirstRecord
>             .LastRecord = wdDefaultLastRecord
>         End With
>         .Execute Pause:=True
>     End With
>     ActiveDocument.PrintPreview
>
> この中の.Destinationの部分でオブジェクトが見つかりません。というエラーで落ちてしまいます。
> いろいろと探してみたのですが、解決策が見つかりませんでした。
> なぜ、このようになってしまうのか、また解決策を知っている方がいたら
> ぜひ、ご教授のほどをよろしくお願いします。

投稿時間：2004/06/16(Wed) 11:25
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: Word2003での差し込み印刷のマクロについて
質問でしょうか？　投稿に失敗されたのでしょうか？
どこかの掲示板に投稿されたのをこちらへペーストされたのでしょうか？
メニューのはじめにお読み下さいと掲示板の[注意事項]や[使い方]をお読み下さい。

投稿時間：2004/06/16(Wed) 11:47
投稿者名：にに
Ｅメール：
ＵＲＬ　：
タイトル：Re^2: Word2003での差し込み印刷のマクロについて
すいません。質問です。
先ほど間違えて.NETのほうに書き込んでしまったので
それをコピーペーストしたのでこうなってしまったのでしょうか・・・。

投稿時間：2004/06/16(Wed) 16:26
投稿者名：花ちゃん
Ｅメール：
ＵＲＬ　：
タイトル：Re: Word2003での差し込み印刷のマクロについて
With ActiveDocument.MailMerge

では、だめだと思うのですが、With wdApp.Documents(1).MailMerge のように
オブジェクトを指定しないと内部的にエラーが発生するかと思います。
2000 から 2002 にかけては変更があったようですが 2002 から 2003 にかけては
変更はないように思うので、上記の設定あたりが原因かと思います。
ここのExcel & Word のWord2002の差し込み印刷機能を使って「宛て名ラベル」を印刷するは
ご覧になられましたでしょうか？　あれでも同様にエラーが発生しますか？
私は、2003 をもっていないので未確認ですが、少なくても 2002 と 2000 では共通の
プログラムではエラーが発生しましたよ。
下記も一度ご覧下さい。

　http://support.microsoft.com/?kbid=285332