いつも参考にさせて頂いてます。
下記の処理について自動処理を作製しているのですが
うまく処理することができません。

事前　複数のプロダクトを開いて作図、変更をする。
①本マクロを起動する。
②開いているプロダクト名を取得する
③それぞれのプロダクトを上書き保存する
④全ての画面を閉じる
です。
③の上書き保存の処理が上手く動きません（”名前を付けて保存”ではない）

マクロの記録では
Set productDocument1 = CATIA.ActiveDocument
productDocument1.Save
Dim specsAndGeomWindow1 As Window
Set specsAndGeomWindow1 = CATIA.ActiveWindow
specsAndGeomWindow1.Close
Set productDocument1 = CATIA.ActiveDocument
productDocument1.Close
にて処理可能なのですが

これを自作マクロに組み込もうとすると
productDocument1.Save
にてエラーストップしてしまいます。

アドバイスの程、宜しくお願いします。　

Re: 上書き保存のマクロについて　emily - 2008/12/04(Thu) 16:49 No.5148
＞productDocument1.Save
＞にてエラーストップしてしまいます。
だけで答えの出せる人はいないです

＞それぞれのプロダクトを上書き保存する
あたりのコードを提示されたら答えられる人がいるかも、です