Guten Abend

Ich heiß Sabrina und kenn mich mit VBA gar nicht aus. Nun habe ich aber das Problem dass ich in einer Zeile durch Doppelklick das Datum und in einer anderen Zeile mit Doppelklick ein Eilt einfügen möchte.

Da ich gar keine Ahnung habe weiß ich nicht wie ich beide als Makro einfügen kann dass die gehen.

Vieleicht kann mir ein Profi helfen

Grüßle Sabrina

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 If Not Intersect(Target, Range("H5:H50")) Is Nothing Then
If Target = "" Then
         Target = "Eilt"
            Else
            Target = ""
        End If
    Cancel = True
    End If
End Sub

-------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 If Not Intersect(Target, Range("E5:E50")) Is Nothing Then
If Target = "" Then
         Target = Date
            Else
            Target = ""
        End If
    Cancel = True
    End If
End Sub