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

Wenn aktueller Inhalt gelöscht

Forumthread: Wenn aktueller Inhalt gelöscht

Wenn aktueller Inhalt gelöscht
30.12.2022 10:21:39
Mister-B
Hallo Zusammen,
ich stehen auf'm Schlauch.
Ich möchte in einer Tabelle wenn ich den Wert einer Zelle lösche, dass der Wert in der Zelle 3 Spalten weiter rechts ebenfalls gelöscht wird.
Ich habe es mit

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("C6:C44")) Is Nothing Then
If ActiveCell.Value = "" Then ActiveCell.Offset(3, 0).Value = ""
End If
End Sub
versucht aber leider keinen Erfolg gehabt.
Hat jemand eine Idee?
Gruß
Martin
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn aktueller Inhalt gelöscht
30.12.2022 10:32:42
hary
Moin
Nimm das Change Ereigniss, reagiert auf Aenderung. Du hast bei Offset 3 als Zeile.
Offset(Zeile,Spalte)

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C6:C44")) Is Nothing Then
If Target = "" Then Target.Offset(0, 3) = ""
End If
End Sub
gruss hary
Anzeige
AW: Wenn aktueller Inhalt gelöscht
30.12.2022 10:44:13
Mister-B
Hallo Hary,
vielen Dank. Das funktioniert prima!
Dir einen guten Rutsch.
Gruß
Martin
AW: Wenn aktueller Inhalt gelöscht
30.12.2022 10:45:14
onur
Offset(3, 0)
bedeutet ja auch 3 ZEILEN weiter unten.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige