Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
272to276
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
272to276
272to276
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Automatisches schüzen von Zellen

Automatisches schüzen von Zellen
01.07.2003 15:26:06
Olaf
Hallo zusammen,
Ich habe eine Datenbank, in der jeder reinschreibt, jedoch nichts bereits geschriebenes ändern soll. Besteht die Möglichkeit, ausgefüllte Zellen automatisch schreibzuschützen?
Besten dank im voraus
Olaf

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisches schüzen von Zellen
01.07.2003 16:05:26
Matthias G.
Hallo Olaf,
hier ein grober Entwurf ohne Blattschutz:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.EnableEvents = False
Set T = Target
c = Target.Count
v = Target.Value
Application.Undo
On Error GoTo weiter
If c = 1 And T.Value = "" Then T.Value = v
weiter:
Application.EnableEvents = True
End Sub

im Workbook-Code einzufügen.
Wenn die Benutzer auch Formeln eingeben sollen, müsste noch was geändert werden.
Aber vielleicht hilft Dir das schon weiter.

Anzeige

156 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige