Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
752to756
752to756
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blattschutz verhindert VBA ausführung

Forumthread: Blattschutz verhindert VBA ausführung

Blattschutz verhindert VBA ausführung
18.04.2006 00:14:31
Armin
Hallo schon wieder eine Frage,
in meiner Tabelle ist ein VBA welches auch funktioniert, dank Tasso.
Es geht leider nur so lange ich den Blattschutz nicht anschalte, der ist aber dringend Notwendig.Bin VBA Anfänger :-))
Beispieltabelle:
https://www.herber.de/bbs/user/32942.xls
gruss Armin
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Blattschutz verhindert VBA ausführung
18.04.2006 00:40:42
Matthias
Hallo Armin,
in "DieseArbeitsmappe":

Private Sub Workbook_Open()
Sheets("Tabelle1").Protect Password:="123", UserInterfaceOnly:=True
End Sub

Das Kennwort natürlich anpassen.
Gruß Matthias
AW: Blattschutz verhindert VBA ausführung
18.04.2006 00:46:35
Tassos
Hallo Armin,
Mal eine Variante:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dein Code...
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True 'nur Beispiel
End Sub



Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row < 5 Or Target.Row > 1000 Then Exit Sub ' anpassen
If Target.Column < 5 Or Target.Row > 112 Then Exit Sub ' anpassen
ActiveSheet.Unprotect
End Sub

Gruss
Tassos
Anzeige
AW: Blattschutz verhindert VBA ausführung
18.04.2006 11:53:19
Armin
Hallo erst mal Danke für die Bemühungen,
leider gehen alle drei Möglichkeiten nicht, oder hab ich einen Fehler
bei der übernahme in meine TAbelle gemacht.
Fehlermeldung entweder: Laufzeitfehler 1004 oder es lassen sich Werte eingeben aber Hintergrund bleibt weiß.
gruss Armin
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige