Supportnet / Forum / Tabellenkalkulation
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Frage
Hallo an alleee,
habe ein Problem. Nach langer Zeit versuche ich mal wieder etwas in VBA zu erstellen. Soweit so gut, jedoch merke ich dass man mit dem Alter auch vieles schneller verlernt... ;)
Also, mein Problem ist (nur schematisch), wenn sich in meinem Worksheet der Wert einer Zelle aendert, so soll gleichzeitig auch etwas im gleichen Blatt gelöscht werden. Sieht eigentlich recht einfach aus, jedoch aus dem oben genannten Gründen für mich net machbar...
#304;ch weiss, dass ich das über "Private Sub Worksheet_SelectionChange(ByVal Target As Range)" machen muss, jedoch habe ich es net geschafft. eventuell liegt es daran, dass der Target eine Liste ist, welches mit Validation (Leider arbeite ich mit der englischen Version und kann leider net den deutschen Ausdruck nennen!) erstellt wurde. Das heisst, wenn ich in der genannten DropDown-Zelle eine andere Firma aussuche, so soll in diesem Worksheet etwas in einer anderen Zelle gelöscht werden.
#304;ch hoffe, dass ich mein Problem ei#351;nigermassen verstaendlich rübergebracht habe...
Mit der Bitte um eine Antwort
viele Grüsse aus dem sonnigen #304;stanbul
Oguz
Antwort 1 von coros
Hi Oguz,
nachfolgender Code löscht Dir den Wert aus Zelle D1, wenn in Zelle C1 etwas geändert, bzw. eingetragen wird. Der Code gehört in das VBA Projekt der Tabelle, in der die Daten eingegeben und gelöscht werden sollen.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
nachfolgender Code löscht Dir den Wert aus Zelle D1, wenn in Zelle C1 etwas geändert, bzw. eingetragen wird. Der Code gehört in das VBA Projekt der Tabelle, in der die Daten eingegeben und gelöscht werden sollen.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Address = "$C$1" Then Range("D1").ClearContents
End Sub
Wenn der Code nicht reicht, musst Du schon etwas konkreter werden, was Zellebezeichnungen der zu löschenden Werte usw. angeht.MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von Oguz
Hallo coros,
vielen Dank für die schnelle Antwort. Mittlerweile habe ich eine Beispieldatei erstellt, da ich glaube mein Problem so besser darstellen zu können. Hier wird auch nochmals mein Problem geschildert.
#304;ch habe jedoch nirgend gefunden wo ich hier eine Datei anhaengen kann. wenn du mir deine e-mail geben könntest, so dass ich es dir zukommenlassen kann...
MfG
Oguz
vielen Dank für die schnelle Antwort. Mittlerweile habe ich eine Beispieldatei erstellt, da ich glaube mein Problem so besser darstellen zu können. Hier wird auch nochmals mein Problem geschildert.
#304;ch habe jedoch nirgend gefunden wo ich hier eine Datei anhaengen kann. wenn du mir deine e-mail geben könntest, so dass ich es dir zukommenlassen kann...
MfG
Oguz
Antwort 3 von coros
Hi Oguz,
hier kannst Du keine Datei hochladen. Wenn Du willst, schicke die Datei an meine E-Mail:coros@excelbeispiele.de. Antwort kann aber ein bischen dauern, da ich jetzt erst mal für ein 1-2 Stunden außer Haus bin.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
hier kannst Du keine Datei hochladen. Wenn Du willst, schicke die Datei an meine E-Mail:coros@excelbeispiele.de. Antwort kann aber ein bischen dauern, da ich jetzt erst mal für ein 1-2 Stunden außer Haus bin.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 4 von Oguz
Vielen Dank für deine Hilfe,
hat auch wunderbar geklappt... War nur am Anfang etwas tolpatschig... ;)
Nochmals dankeschön und ein erholsames Wochenende
Oguz
hat auch wunderbar geklappt... War nur am Anfang etwas tolpatschig... ;)
Nochmals dankeschön und ein erholsames Wochenende
Oguz

