I want to assign the name "Grafiek" to the selected cells (not the
CurrentRegion like in the code below)

What code should i use ?


ActiveWorkbook.Names.Add Name:="Grafiek", RefersToR1C1:= _
ActiveCell.CurrentRegion


Thanxxx,

Luc