Hallo Hallo,
ich habe eine Maske mit 20 gleichen Eingabefeldern, die jeweils bei Änderungen bestimmte Berechnungen nach sich ziehen sollen...
Nun habe ich eine Funktion, die die Berechnung macht, die ich über call Funktion(Feldname) aufrufe.
Mein Problem: Ich muß die Feldnamen hartkodieren, da ich bisher keine Möglichkeit sehe an den Feldnamen des verlassenen Feldes zu gelangen. Ich habe:
ZitatAlles anzeigenDim ws As New NotesUIWorkspace
Dim fieldname As String
Dim Fieldvalue As String
Dim uidoc As notesuidocument
Set uidoc=ws.CurrentDocument
fieldname=uidoc.currentfield
Fieldvalue=Right(fieldname,Len(fieldname)-Instr(fieldname,"_")+1)
Call HoursChange(Fieldvalue)
probiert, aber ich erhalte immer den Feldnamen, des Feldes in das ich gewechselt bin, nicht den Namen des Feldes, aus dem ich komme.....
Habt Ihr irgendwelche Tipps????