Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1196to1200
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
Inhaltsverzeichnis

WorkSheet Change: Komplizierte Überwachung

WorkSheet Change: Komplizierte Überwachung
Holger,
Guten Morgen Forum,
Ich möchte im WorkSheet_Change Ereignis einige Überwachungen einbauen.
(Blattschutz kommt aufgrund von MultiUserEditing nicht infrage)
Leider so viele, dass ich nicht weiss, wie ich es umsetzen kann.
1 Änderungen dürfen nur im Bereich B15 bis N40 erfolgen
2 B9 bis B14: Hier sind fixe Werte vorgegeben, wenn Änderungen, würde ich den jeweiligen Wert einfach wieder reinschreiben.
3 C7 bis N14: Hier sind fixe Werte vorgegeben, wenn Änderungen, würde ich den jeweiligen Wert einfach wieder reinschreiben.
Wie kann man sowas umsetzen ohne total den Überblick zu verlieren?

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: WorkSheet Change: Komplizierte Überwachung
18.01.2011 10:29:08
Rudi
Hallo,
Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Range("B15:N40")) Is Nothing Then
With Application
.EnableEvents = False
.Undo
.EnableEvents = True
End With
End If
End Sub

Gruß
Rudi
Die Eleganz des Codes ...
18.01.2011 10:38:03
Holger,
Guten Morgen Rudi,
Ok, sehr elegant, kann ich so Eingaben zurücknehmen.
Also eigentlich habe ich so alles erschlagen.
Hm, wirklich extrem elegant, Danke Dir!
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige