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

SelectionChange(

Forumthread: SelectionChange(

SelectionChange(
27.11.2006 11:38:01
egres
Hallo Leute
ich möchte mit Private Sub Worksheet_SelectionChange(oder ähnlich)
das wenn in der Zelle "Auswahl" TO geschrieben wird, das Makro nach Zelle "eingabe" geht und dessen Inhalt löscht!
Gruss un Danke
Egres
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: SelectionChange(
27.11.2006 11:45:37
UweD
Hallo
hier ein Beispiel.
Überwacht wird der Bereich A1 bis A10.
Das Feld Eingeabe darf dabei aber Nicht in diesem Bereich liegen..

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
If Target.Value = "TO" Then
Range("Eingabe").ClearContents
End If
End If
End Sub

Gruß UweD
(Rückmeldung wäre schön)
Anzeige
Danke!
28.11.2006 08:08:00
Egres
Hallo Uwe
ich konnte nicht schneller reagieren, da ich abwesend war!
Du hast mir geholfen, ich habe es angepasst und es klappt.
Danke und Gruss
Egres
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige