Validatie gebied bepalen in een Macro

[CB01]

Weet iemand hier antwoord op. Ik wil een Macro automatisch laten bepalen welke cellen in de validatie formule komt te staan.
Reden hiervan is dat ik 1 nu een kolom heb bv. kolom "AM" en nu is deze gevuld t/m regel 407 maar volgende keer kan deze gevuld zijn t/m regel 500.

De bedoeling is dat de te bepalen gebied altijd begint vanaf "AM3" en daarna tot de laatste gevulde cel. Weet iemand hoe ik dit kan doen.

ik heb hierbij een voorbeel van deze functie maar nu staat deze op een vaste gebied namelijk vanaf "AM3:AM407"

    Range("C2").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=$AM$3:$AM$407"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

 

[CB01]

Weet echt niemand hier antwoord op?