Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Automatisches schüzen von Zellen

Forumthread: 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
Anzeige

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
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

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