< návrat zpět

MS Excel


Téma: Přepínač rss

Zaslal/a 20.1.2020 17:30

Je nějaká možnost, aby při vybrání jedné ze tří možností (přepínač), které jsou ve skupinovém rámečku, aby po klepnutí na jednu už nešlo vybrat jinou možnost? Zkoušel jsem to přes OptionButton a OptionButton1.Locked = TRUE, ale nějak se mi to nedaří.

Zaslat odpověď >

Strana:  « předchozí  1 2
#045691
Stalker
Přidáním
obj.Object.Value = False

Tedy:

Sub Reset()
Application.ScreenUpdating = False
Dim obj As OLEObject
For Each obj In List1.OLEObjects
If TypeOf obj.Object Is MSForms.OptionButton Then
obj.Enabled = True
obj.Object.Value = False
End If
Next
Application.ScreenUpdating = True
End Sub
citovat
#045692
avatar
Ještě jednou DÍKY! Jak to zapsat, když budou 2 (a více) otázky? Nakoukl jsem do VBA nedávno a dost se mi to líbí. 1citovat
#045693
Stalker
Netvrdím, že je to nejlepší řešení, ale je to to první co mě napadlo.
Věřím, že někdo z kolegů by to napsal jinak (lépe).

Každý z OptionButtonů je přířazen do skupiny (Vlastnosti -> GroupName) aby bylo možno vybírat ze 3 možností v rámci otázky.
Název této skupiny je předán makru Writeoption, kde dojde ke zpracování.

PS:
V modulu je přidán kód Reset2, má tu samou funkci jako Reset, jen je použit jiný způsob zápisu kódu.
Příloha: zip45693_optionbutton_excel.zip (33kB, staženo 27x)
citovat

Strana:  « předchozí  1 2

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