VBA Zeile Löschen mit Wert aus Zelle

Guten Tag,

ich habe folgendes Problem:

Ich möchte „automatisiert“ Zeilen löschen mit einem Makro. Es gibt einen Command_Button und eine Zelle in der ein Wert steht wie z. B. „4“ wobei der wert „4“ für die Zeile stehen soll. Leider bekomm ich das mit der Syntax nicht auf die Reihe.

Bisher habe ich folgendes einfach aufgezeichnet:

Sub Loeschen()

Dim LOE As Integer

LOE = Active.Sheet.Range(„F1“).Value
Rows(„Hier soll dann möglichst meine Variable stehen“).Select
Selection.Delete Shift:=xlUp
Range(„F1“).Select
End Sub