Hi Guye,

'-------------------
how do i make a reference to a single specific cell (for example D1)
in a amcro
'-------------------

I suspect that there may be more to your question than
is immediately apparent, but try something like:

'=============
Public Sub Tester()
Dim rng As Range

Set rng = Range("D1")
MsgBox rng.Address(0, 0)

End Sub
'<<=============


---
Regards,
Norman