oder Du erstellst das neue Dokument in Deinem Button, schreibst Deine Daten in das neue Dokument rein und öffnest es dann mit NotesUIWorkspace.EditDocument
Ich glaube das ist der Beste weg, der vielleicht nicht richtig verstanden wurde.
'also in LS ein neues document anlegen
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
'deine form eintragen
doc.Form = "FormName"
'Felder die übernommen werden sollen
doc.Feldname = "Dein Text"
doc.ComputeWithForm( False, False )
Call doc.Save( True, True )
'document zum bearbeiten öffnen
Set uidoc = workspace.EditDocument( True,doc )
Call uidoc.GotoField( "erste Feld" )
Gruß Micha