Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
740to744
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
740to744
740to744
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

zellen bereich markieren und protecten

zellen bereich markieren und protecten
05.03.2006 16:58:19
mehmet
hallo forum,
ich moechte in einer tabelle (fri) ein zellbereich (b51:h51) protecten
d.h., wenn ich den inhalt in diesem bereich loeschen/formatieren moechte, soll ein msg-box kommen, dass dieser bereich bitte nicht zu loeschen ist mit ja/nein
bei ja soll protection aufgehoben werden (loesch bar) und bei nein nicht geloescht (alles soll so bleiben)
dank und gruss
mehmet

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

Betreff
Datum
Anwender
Anzeige
AW: zellen bereich markieren und protecten
05.03.2006 17:48:10
chris
Hallo wenn ich dich richtig verstanden habe meinst du es etwa so.
Den Code in das Modul des Tabellenblatten einfügen.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("b51:h51")) Is Nothing Then
cb = MsgBox("Änderung annehmen ? ", vbYesNo)
If cb = vbYes Then
Else
Application.EnableEvents = False
Application.Undo
Application.EnableEvents = True
End If
Else
End If
End Sub

AW: zellen bereich markieren und protecten
05.03.2006 18:04:15
mehmet
genau so chris
dank dir
gruss
mehmet
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige