VBA - opakujici se parametry
Napsal: 26 kvě 2017 00:11
Ahoj, potreboval bych poradit, nebo alespon nasmerovat. Stale pridavam do tabulky nove funkce pres VBA, ale cim jich je vice, tim vice mam i radku kodu, ktery bych potreboval zredukovat, protoze se stava neprehlednym a nenabizi moznost hromadne upravy. Pro predstavu napisu o co presne mi vlastne jde. Kuprikladu je potreba pri inicializaci nastavit nekolik parametru pro nektere prvky:
Private Sub UserForm_Initialize()
Label1.BackColor = RGB(255, 255, 255)
Label1.Enabled = True
...
Labeln.BackColor = RGB(255, 255, 255)
Labeln.Enabled = True
End sub
Takhle je to relativne prehledne a vcelku i rychle upravitelne, kdyz je ale potreba pridat IF a vse se zacne vetvit, zacina uz byt kod znacne neprehledny a tezce upravitelny. Existuje nejaka moznost, jak vse definovat drive a pak jen urcit, podle ceho se maji prvky nastavit? Nevim, jestli to uz neni dneska vulgarismus, ale drive se neco takoveho nastavovalo v CSS u HTML, kdy se predepsaly parametry a pak se jen odkazalo do CSS na konkretni styl. Neco v tomhle smyslu:
Styl 1 = ...
Styl n = ...
Predem dekuji za odpoved
Private Sub UserForm_Initialize()
Label1.BackColor = RGB(255, 255, 255)
Label1.Enabled = True
...
Labeln.BackColor = RGB(255, 255, 255)
Labeln.Enabled = True
End sub
Takhle je to relativne prehledne a vcelku i rychle upravitelne, kdyz je ale potreba pridat IF a vse se zacne vetvit, zacina uz byt kod znacne neprehledny a tezce upravitelny. Existuje nejaka moznost, jak vse definovat drive a pak jen urcit, podle ceho se maji prvky nastavit? Nevim, jestli to uz neni dneska vulgarismus, ale drive se neco takoveho nastavovalo v CSS u HTML, kdy se predepsaly parametry a pak se jen odkazalo do CSS na konkretni styl. Neco v tomhle smyslu:
Styl 1 = ...
Styl n = ...
Predem dekuji za odpoved