VBA - ovládacie prvky v cykle

Programovacie jazyky, rady, poradňa...
usvit
Amateur
Amateur
Príspevky: 13
Registrovaný: 24 jan 2006, 14:45

VBA - ovládacie prvky v cykle

Príspevok od používateľa usvit »

Prosím o pomoc s týmto problémom:
mám textboxy, ktoré plním údajmi z tabuľky

Kód: Vybrať všetko

TextBox1=Sheets("A").Cells(i,j)
TextBox2=Sheets("A").Cells(i,j)
TextBox3=Sheets("A").Cells(i,j)
.
.
TextBoxX=Sheets("A").Cells(i,j)
Potreboval by som to dať do cyklu

Kód: Vybrať všetko

For K=1 to X
TextBoxK=Sheets("A").Cells(i,j)
Next K
Neviem, či niečo také je možné.Poradí mi niekto?

Ďakujem!
c-ice
Medium Star
Medium Star
Používateľov profilový obrázok
Príspevky: 475
Registrovaný: 04 mar 2008, 15:18
Kontaktovať používateľa:

Re: VBA - ovládacie prvky v cykle

Príspevok od používateľa c-ice »

o VBA neviem nic ale s principu by tam mohli existovat polia takze si tie text boxy mozes hodit do pola ? a potom ...textBoxy[K]=...
usvit
Amateur
Amateur
Príspevky: 13
Registrovaný: 24 jan 2006, 14:45

Re: VBA - ovládacie prvky v cykle

Príspevok od používateľa usvit »

Podarilo sa mi to vyriešiť:

Kód: Vybrať všetko

Private Sub CommandButton1_Click()
For i = 1 To 4
frm1.Controls("TextBox" & CStr(i)) = i
Next i
End Sub
po stlačení tlačidla do textboxov TextBox1....Textbox4 vloží čísla 1 - 4
Napísať odpoveď