VBA - Spaltenende

Hallo,

hab in userform folgenden code um einträge in zellen zu übertragen:

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)
SelectTaskField Row:=0, Column:=Name
SetTaskField Field:=Name, Value:=TextBox4.Value
SelectTaskField Row:=0, Column:=Dauer
SetTaskField Field:=Dauer, Value:=TextBox3.Value * TextBox2.Value
SelectTaskField Row:=0, Column:=Ressourcennamen
SetTaskField Field:=Ressourcennamen, Value:=Mitarbeiter Sägen; & Maschine Sägen
Unload Me
Biegen.Show
End With

End Sub


Wie muss ich den Code ändern, damit der neue Eintrag automatisch am Ende einer Spalte generiert wird.

Arbeit mit MSP 2002

Vielen Dank