こんにちは。 ボッチさんのプログラムでは、 Set doc =uidoc.Document←でｴﾗｰになると思われます。 詳細はNotesUIDocumentのヘルプを参照してください。 削除する前にフォーム名の確認をしているようですが、複数フォームの内容を表示するビューなんでしょうか？ 特にフォーム名をチェックしなければ簡単にできそうな感じなんですが・・・。