VBA.Mania

vbamania.pl

Dziś jest poniedziałek, 13 maja 2024 roku.

Ustaw jako stronę startową

Ulubione

Napisz

Powrót

Powrót do serwisu

Regulamin

RSS

	tytuł wątku:
Wątki dyskusji	Problem z obsługą aktywacji/dezaktywacji przycisków otwarty rozpoczął: remunen postów: 3

napisał: remunen postów: 3 umieszczony: 14 kwietnia 2011 22:30
	Dzięki Trebor! Działa lepiej niż poprawnie :)))

napisał: Trebor postów: 1209 umieszczony: 14 kwietnia 2011 18:10
	Widzę w tym fragmencie kodu rękę Caro liny. Po każdym uruchomieniu procedury musisz sprawdzić stan przycisków: With ThisWorkbook.Worksheets("POCZTA") If .Shapes("Button 1").ControlFormat.Enabled = False And _ .Shapes("Button 2").ControlFormat.Enabled = False And _ .Shapes("Button 3").ControlFormat.Enabled = False And _ .Shapes("Button 4").ControlFormat.Enabled = False Then MsgBox "Jakaś procedura" End If End With Jeśli w arkuszu są tylko przyciski, które sprawdzasz, procedurkę można trochę uprościć, ale przepaści nie będzie.

napisał: remunen postów: 3 umieszczony: 14 kwietnia 2011 06:33
	Mam problem, jak poradzić sobie z zapisem kodu obsługującego przyciski umieszczone w arkuszu Excela o nazwie "POCZTA". Opiszę dokładnie, w czym rzecz: 1) Mam 4 przyciski: od "Button 1" do "Button 4". 2) Po kliknięciu na każdy z przycisków wykonywana jest pewna procedura. Po wykonaniu procedury dany przycisk jest dezaktywowany. Wykorzystałem w tym celu polecenia: Call ButtonEnabled(ThisWorkbook.Worksheets("POCZTA").Shapes("Button 1"), False) Za pomocą jakiej procedury mogę osiągnąć efekt, aby po dezaktywacji ostatniego z tych czterech przycisków (nie jest ważne, którego) zapoczątkowana będzie kolejna procedura (np. ukrycie wierszy, w których umieszczone są przyciski).

wstecz 1 dalej

wszystkich stron: 1