Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Eingabe nur wenn

Eingabe nur wenn
07.12.2004 08:44:27
Lars
hallo zusammen
bin totaler newbie und benötige eure hilfe
brauche für ein projekt folgendes.
zellen A2:A5 sollen gesperrt sein wenn zelle A1 leer ist. steht in zelle A1 etwas können auch in diese etwas eingegeben werden.
wird nun der inhalt von A1 gelöscht sollen auch zellen B1:E1 leer werden.
gleiches soll für A7 mit D7:G7 und A17 mit D17:G17 gelten
ähliches problem hat auch vorher jemand gefragt allerdings noch kein ergebnis.
ich bedanke mich im voraus
lg lars
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Eingabe nur wenn
Volker
Hallo Lars,
kopier diesen Code in dein Tabellenblatt im VBA Editor

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("d1:g1")) Is Nothing And Range("A1") = "" Then
Range("d1:g1").ClearContents
Range("a1").Select
ElseIf Not Application.Intersect(Target, Range("d7:g7")) Is Nothing And Range("A7") = "" Then
Range("d7:g7").ClearContents
Range("a7").Select
ElseIf Application.Intersect(Target, Range("d17:g17")) Is Nothing And Range("A17") = "" Then
Range("d17:g17").ClearContents
Range("a17").Select
End If
End Sub

Kann es sein, dass Du dich, was Zelle A1 betrifft, vertippt hast.
Ich hab es jetzt mal so gemacht wie ich es verstanden hab.
Noch ein Tip für den Anfänger: Du kannst im Code Haltepunkte setzen, an denen die Ausführung stoppt. Mit F8 kannst Du dann schrittweise weitergehen und sehen was passiert.
Gruß
Volker
Anzeige
;

Forumthreads zu verwandten Themen

Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

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