Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Fehlermeldung - Toggle Button

Fehlermeldung - Toggle Button
14.02.2008 16:42:49
Wrobel
Hallo Excelprofis,
habe in einem Tabellenblatt ein Schutz aktiviert. Pass: pw
Wenn ich jetzt den Togglebutton ausführe, gibt Excel mir die Fehlermeldung "Anwendungs- oder objektdefinierter Fehler".
Kann man dies umgehen, z.B. wenn man den Schutz vorher deaktiviert und später wieder automatisch aktiviert?
Gruß
André
Option Explicit

Private Sub ToggleButton1_Click()
Range("Q10").Value = 2 + ToggleButton1.Value
ToggleButton1.Caption = IIf(ToggleButton1.Value, "Preisanfrage", "Bestellung")
End Sub



Private Sub ToggleButton2_Click()
Range("Q" & ActiveCell.Row).Value = 2 + ToggleButton1.Value
ToggleButton1.Caption = IIf(ToggleButton1.Value, "Preisanfrage", "Bestellung")
End Sub


1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung - Toggle Button
14.02.2008 18:23:00
Peter
Hallo Wrobel,
so sollte es gehen:

Private Sub ToggleButton1_Click()
ActiveSheet.Unprotect Password:="Hugo"
Range("Q10").Value = 2 + ToggleButton1.Value
ToggleButton1.Caption = IIf(ToggleButton1.Value, "Preisanfrage", "Bestellung")
ActiveSheet.Protect Password:="Hugo"
End Sub


Gruß Peter

Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige