

vba excel 2007 - modul triedy s tlačidlami v hárku
Prosím o radu:
V hárku mám vložených 31 ovládacích tlačítok formulára (prípadne ActiveX - Command button)
Nechcem každému tlačidlu priradovať vlastné procedúry, ale za pomoci modulu tried rozlíšiť, ktoré tlačidlo bolo stlačené, získať z toho parameter a ten spracovať jedinou udalostnou procedúrou SkupinaTlacitok_Click.
Pokiaľ by boli tieto tlačítka v užívateľskom formulári, nie je problém, ale má niekto skúsenosť s tým, že by sa to dalo aj s tlačítkami v hárku (t.j. bez užívateľského formulára)? Neviem nasimulovať čosi takéhoto (platné pre užívateľský formulár) pre prvky v hárku:
Dim Tlacitka(6) As New btnTrieda
Private Sub UserForm_Initialize()
Dim prvok As Control
CisTlac = 0
For Each prvok In Formular.Controls
CisTlac = CisTlac + 1
Set Tlacitka(CisTlac).SkupinaTlacitok = prvok
Next prvok
End Sub
Díky
R
...tak ak by to niekoho zaujímalo, dajú sa v module triedy ošetriť aj ovládacie prvky v hárku, musí však ísť o prvky ActiveX.
Podarilo sa mi to, hoci tie prvky zatiaľ neviem priradiť do skupiny cyklom, ale natvrdo:
Dim Tlac(31) As New btnTrieda
Set Tlacitka(1).SkupinaTlacitok = CommandButton1
Set Tlacitka(2).SkupinaTlacitok = CommandButton2
...
Set Tlacitka(31).SkupinaTlacitok = CommandButton31
Potom udalosť
SkupinaTlacitok_Click
reaguje na ktorékoľvek tlačidlo a vráti ľubovoľnú vlastnosť stlačeného tlačidla
P.S. Administrátor môže dotaz ukončiť
R