< návrat zpět

MS Excel


Téma: Jak zrušit všechny zaškrtnuté políčka? rss

Zaslal/a 7.11.2012 7:26

Ahoj, mám teď v Excelu list s desítkami zaškrkávacích políček. Při práci v dokumentu si zaškrtám políčka a vyjedu výstup.
Napadlo mě, jestli existuje příkaz do VBA, který by všechny zaškrkávací políčka změnil jako nezaškrtnuté (rozuměj prázdné)?
Budu vděčný za radu :) Nejsem žádný expert přes VBA nebo Excel, ale přijde mi, že by takový příkaz mohl existovat (?)

Zaslat odpověď >

icon #010244
avatar
Bude trochu záležať na tom, či tie políčka sú v nejakom formulári, alebo priamo na liste. Bolo by asi lepšie, keby si priložil vzor, ona sa určite nejaká dobrá duša, ktorá Ti ten kód napíše, potom nájde :)citovat
icon #010267
eLCHa
Mno nejjednodušší trik, který mne napadá, je propojit checkboxy s oblastí (skrytých) buněk a těm pak najednou přiřadit hodnotu NEPRAVDA. Není třeba VBA.

Pokud chcete použít VBA, pak bych všechny checkboxy přejmenoval, aby začínaly stejně (např. _checkboxXXX) pak lze použít shapes

for each o in activesheet.shapes
if left(o.name,9) = "_checkbox" then o.value = false
next o
citovat
#010281
Stalker
Tak pokud by se jednalo o zaškrtávací políčka z ovládacích prvků ActiveX - checkbox a na listu nejsou použité žádné jiné ovládací prvky, stačilo by toto:
Sub VycistiCheckbox()

Dim chbox As OLEObject
For Each chbox In Worksheets("List1").OLEObjects
chbox.Object.Value = False
Next
End Sub
citovat
#049422
Fantasyk
Po mnoha letech...

A když se jedná o UF ? nevíte někdo ?

Díkycitovat
#049423
Stalker

Fantasyk napsal/a:

Po mnoha letech...

A když se jedná o UF ? nevíte někdo ?

Díky


Stejně jako na listu.

Edit: soubor
Příloha: zip49423_reset-checkbox.zip (17kB, staženo 24x)
citovat
#049424
Fantasyk
Děkuji mnohokrátcitovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Relativní cesta - zdroje Power Query

Alfan • 25.4. 10:49

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 10:47

Relativní cesta - zdroje Power Query

Alfan • 25.4. 10:40

Relativní cesta - zdroje Power Query

Alfan • 25.4. 9:44

Relativní cesta - zdroje Power Query

elninoslov • 25.4. 9:02

Vynásobit hodnoty kurzem - Power Query

elninoslov • 25.4. 8:40

Relativní cesta - zdroje Power Query

Alfan • 25.4. 8:04