|
Hallo,
ich bin auf euch gestoßen und hoffe ihr könnt mir helfen.
Ich arbeite grade für die Arbeit an einer Tabelle bezüglich Instandhaltungsarbeiten.
Für diese Excel Datei bräuchte ich ein Makro.
Sinn und Zweck soll ein wenn z.b. in Zelle L10 ein Datum eingetragen wird das der Inhalt in Zelle H10 gelöscht wird.
Das habe ich bisher mit dem Makro ganz gut hingebekommen:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("L10").Value <> "" Then Range("H10").Value = ""
End Sub
Nun ist das Problem, dass das alles fortlaufend weiter gehen soll. Sprich für L11 und H11 genau das selbe. Möglichst bis 1500 ...
Ich komme bei der Sache aber leider nicht weiter da ich davon nur wenig Ahnung habe.
Versucht hatte ich das alles per Hand z.B. so:
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("L10").Value <> "" Then Range("H10").Value = ""
If Range("L11").Value <> "" Then Range("H11").Value = ""
End Sub
oder
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("L10").Value <> "" Then Range("H10").Value = ""
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("L11").Value <> "" Then Range("H11").Value = ""
End Sub
Beides offensichtlich Falsch da er mir Fehler anzeigt bei ersteres das Script total durchdreht :D
Ich hoffe ihr versteht was ich von euch möchte.
Ich danke 1000mal im voraus und wünsche noch ein angenehmes Wochenende.
Liebe grüße
Sven
|