次のスクリプトは現在の文書の「Quarterly Reports」というオブジェクトのハンドルを取得します。
Dim workspace as New NotesUIWorkspace Dim uidoc as NotesUIDocument Dim handle as Variant Set uidoc = workspace.CurrentDocument Set handle = uidoc.GetObject( "Quarterly Reports" )