änderen der Select-Formel

ein kleines Script soll die Select-Formel einer Ansicht ändern. Tut es auch, aber die Select-Formel wirkt erst, wenn ich die View einmal im Designer abgespeichert habe. Gibt es einen Trick, wie es ohne dieses Speichern klappt?

' view ... Ansicht, die geändert werden soll
' db ... Datenbank in der sich die Ansicht befindet
dim doc as NotesDocument
set doc = db.GetDocumentByUnID(view.UniversalID)
Call doc.ReplaceItemValue("$Formula","Form='Test'")
Call doc.save(True,True)

So sollte man zwar nicht vorgehen, aber ich würde mir das Editieren von ca 400 Ansichten ersparen.

Gruß
Dirk

habe ich probiert

set item = doc.GetFirstItem("$Formula")
doc.IsSigned = True

brachte leider nichts.
Habe jetzt entdeckt, dass irgendwie die Spaltenformeln mit darin stehen.

Habe auf dem Notes 6 Poster etwas gefunden, ausprobiert und geht.

view.SelectionFormula = "..."

Dann muss ich wohl mal von meinem Notes 5 lassen und Notes 6 verwenden.

Trotzdem vielen Dank für Deine Mühe.

Gruß
Dirk