VBA - Spaltenende

Dieses Thema VBA - Spaltenende im Forum "Windows XP Forum" wurde erstellt von Remmes, 24. März 2005.

Thema: VBA - Spaltenende Hallo, hab in userform folgenden code um einträge in zellen zu übertragen: Private Sub CommandButton1_Click() '...

  1. 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