verileri textboxa toplu halde girme

[kaktus1]

yapmak istediğimi örnekleyecek olursam sayfa 1deki sabit üretim hızına göre planlama butonuna tıkladığımda karşıma gelen userformda istem değerlerininin girildiği textboxta kaç tane değer girilicekse tek tek girip kayıt etmek gerekiyor. ama benden istenen mesela o textboxa 5 tane değer giriceksem hepsini de bir anda girip o şekilde kayıt etmem.

dosya ektedir

 

[Haluk]

*.rar uzantılı dosyaları açamadığım için eklediğiniz dosyayı göremedim.

Ancak, anladığım kadarıyla şöyle bir şey deneyin...

UserForm üzerinde TextBox1 ve CommandButton1 nesneleri varsa, TextBox1'e verileri girerken aralarında ";" (noktalıvirgül) olacak şekilde girin.

Örneğin Ahmet;Veli;Mehmet;..... gibi

Private Sub CommandButton1_Click()
    x = Split(TextBox1, ";")
    For i = 0 To UBound(x)
        MsgBox x(i)
    Next
End Sub