Schau mal da...
http://www.dominoforum.de/modu…t_id=89537#forumpost89537
Kannste bisschen verändern und deine User erziehen...
LG, Laura
Danke das geht soweit so gut
leider bleibt der focus nicht im corpus delicti feld...logisch hab ja keinen code dafür 
dafür evtl noch nen tip?
OK, das ist das komplette Code für das kritische Feld.
User kann das Feld nicht verlassen, wenn er die leere Zeilen nicht löscht.
Sub Exiting(Source As Field)
Dim ws As New NotesUIWorkspace
Dim doc As notesdocument
Dim uidoc As NotesUIDocument
Dim xWert As String
Set uidoc = ws.CurrentDocument
Set doc=uidoc.Document
'Prüfung, ob es in diesem Feld leere Zeilen gibt
Set uidoc = ws.CurrentDocument
Set doc=uidoc.Document
xWert = uidoc.FieldGetText("Feldname")
If Textfeld_Kontrolle_Leere_Zeilen (xWert) = 1 Then
Msgbox "Bitte löschen Sie leere Zeilen in diesem Feld!",64, "Warnung! In diesem Feld sind leere Zeilen nicht erlaubt!!!"
uidoc.GoToField ("Feldname")
Else 'Textfeld_Kontrolle_Leere_Zeilen (xWert) = 1
doc.Feldname = Trim(doc.Feldname(0)) 'Leerzeichen werden auch gelöscht
End If 'Textfeld_Kontrolle_Leere_Zeilen (xWert) = 1
End Sub(Für die Prüfung auf 42 Zeichen baust du am besten eine Extra-Function, die auch 1 liefert, wenn die Länge > 42 ist.)
danke,
das mit den >42 Zeichen hab ich schon fertig ( is ja eh nur ne kleine abweichung ) aber auf das "gototfield" bin ich echt nicht gekommen
vielen dank schönen feierabend