UserForm - Werte aus TextBox in Zelle übernehmen
24.03.2005 07:38:34
Remmes
in meiner UserForm befinden sich 3 Eingabefelder, deren Werte nach einem Klick auf "Weiter" automatisch in bestimmte Zellen einer bestimmten Ansicht eingetragen werden sollen.
Wie ist dafür der Code? Meiner Funktioniert nicht so ganz:
Private Sub CommandButton1_Click()
' Button Weiter zu Biegen
Dim frm As ASägen
' Auswahl der Ansicht + Infos speichern
Set frm = ASägen
With frm
ViewApply Name:="Balkendiagramm (Gantt)"
[b] 'SelectTaskField Row:=0, Column:="Name", .Value:="Sägen"
'SelectTaskField Row:=0, Column:="Dauer", Value:=TextBox1.Value * TextBox2.Value
'SelectTaskField Row:=0, Column:="Anfang"[/b]
Unload Me
Biegen.Show
End With
End Sub
Der markierte Teil ist die Problemzone.
Für das zweite Feld "Dauer" sollen die Werte aus TestBox1 und TextBox2 miteinander multipliziert werden.
Zelle drei ist erstmal noch nicht in gebrauch.
Nutze MSP 2002
Vielen Dank für die Info.
Christian