Excel makro-stejný příkaz pro více objektů Vyřešeno

[Fanatig]

Dobrý den,
měl bych otázečku,jestli je možné provést stejný příkaz pro více objektů najednou.Lepší bude příklad jak to myslím.

For i=1 To 100
Label & i.visible=False
Next i

zkoušel jsem tento příklad,ale nijak nefunguje.Myslíte že by to nějak šlo udělat ať to nemusím vypisovat po jednom?

[Reklama]

[Azuzula]

Dobrý den,
ano, jde to, jenže změna vlastností popisku nelze zapsat takto jednoduše.
Makro bude vypadat takto:

Kód: Vybrat vše

For i = 1 To 100
ActiveSheet.Shapes.Range(Array("Label " & i)).Visible = False
Next i

Pokud bude popisků méně než vašich udaných 100, tak cyklus hodí chybu až se dostane za poslední objekt.

[Fanatig]

Zapomněl jsem dodat, že bych to potřeboval použít ve VBA oknech, tak to musím upravit jak?

[Azuzula]

Máte na mysli Formuláře? A potřebujete skrývat všechny popisky nebo jen některé?

[Fanatig]

JJ formulář a potřebuji jen některý.A po zaškrtnutí CheckBox se zase objeví.

[Azuzula]

Váš zápis je logický, bohužel to tak nefunguje :( a objekty jako je Label se nejspíš musí používat přímo, tudíž dá se jimi naplnit pole a pak s tím jde pracovat v cyklu. Udělala jsem funkčí řešení viz příloha.

[Fanatig]

Mno sice to není ono, ale dá se to z části použít.Jinak děkuji za rady:)