スクリプトでフォームを保存せずに、同一文書を開き直したいのですが、「保存しますか?」のメッセージがでます。 どうしたらいいのでしょうか? これをやる経緯として、ビューの選択文書に対して処理を行いエラーがあった場合は、そこで処理を中止します。 このあと、ビューに戻って再度処理をしようとした際に、選択文書が解除されていないため、同じ選択文書に対してまた処理がされます。 これを回避するために、一旦ビューにもどり選択を解除してエラー文書を開き直します。 既にある表示文書に対する処理に、数件纏めて処理できるように手を加えているものです。 unid = Doc.UniversalID Set ndoc = db.GetDocumentByUNID(unid) If ndoc Is Nothing Then 'unidに一致する文書が存在しない場合 Msgbox "文書の開き直しができません。" Exit Sub End If '文書を開き直す Call ws.EditDocument(False, ndoc) 'ノーセーブで閉じる doc.SaveOptions = 0 Call uidoc.Close 以上