proměnlivé určení názvu volaného prvku ve formuláři

[m.niki]

Dobrý den, řeším velice zapeklitý (pro mě) problém.

Ve formuláři VBA potřebuji pracovat s různými prvky textbox a combobox, je jich hodně moc, ale určité skupiny mají stejnou část názvu, lyší se jen číslem, které je někdy na začátku, někdy uprostřed, někdy na konci.....

potřebuji udělat něco takovéhoto:

Kód: Vybrat vše

("Popis"&cislo.value).value = b.value

prostě, aby název prvku, se kterým chci pracovat byl určen hodnotou textboxu který se jmenuje "cislo"

výše uvedený kód je nefunkční, VB mě jaksi nechce dovolit závorku ani uvozovky na začástku, ale snad podle něj někdo pochopí, co potřebuji.

díky moc za rady, Michal

[Reklama]

[Poki]

Pokud vim, tak neexistuje samostatna kolekce pro napr. textboxy - je nutne pouzit kolekci vsech ovladacich prvku formulare Controls a z nich pak podminkou vybrat pouze ty, ktere odpovidaji jmenem.

Napr. takto:

Kód: Vybrat vše

Private Sub UserForm_Initialize()
 Dim i As Long
 
For Each Box In Me.Controls
 For i = 1 To 10
  If Box.Name = "TextBox" & i Then
   MsgBox Box.Name
  End If
 Next i
Next Box

End Sub