Rij met cellen laten vullen door Userform

Status
Niet open voor verdere reacties.

276159

Gebruiker
Lid geworden
2 jan 2009
Berichten
22
Ik wil in mijn excel bestand een bepaalde range in RIJ A laten vullen dmv een userform. Nu ben ik al zo ver dat ik dit allemaal gemaakt hebt, maar ik heb geen idee hoe ik de data die ik in dit userform gebruik kan gaan valideren in een macro die deze range voor mij vult.

In de bijlage zie je bijv dat in de range ("A3:A29") een 1 is ingevuld en de range ("A30:A39") een 2.

Kan iemand mij helpen ?Bekijk bijlage voorbeeld.xls
 
Om het weg te schrijven naar de juiste rijen, en userform verbergen.
Code:
Private Sub CommandButton1_Click()
Range(Cells(TextBox1.Value, 1), Cells(TextBox2.Value, 1)) _
= ComboBox1.Value
UserForm2.Hide
End Sub
Om de textboxen te legen en de combobox te vullen bij het aanroepen.
Ps: De .additem code van jouw verwijderd.
Code:
Private Sub UserForm_Initialize()
TextBox1.Text = ""
TextBox2.Text = ""
 Dim i
    For i = 1 To 31
      ComboBox1.AddItem i
    Next
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan