Hi Ben

It's Selection :

Sub test()
Dim Rng As Range
Set Rng = Selection
MsgBox Rng.Address & " on " & Rng.Parent.Name & _
Chr(10) & Rng.Count & " cells"
End Sub

HTH. Best wishes Harald

"Ben" skrev i melding
...
How can I get the Range, a user had marked bevor calling the macro?
.Range(??? ActiveCell .... ??? )

Thanks,
Ben