macro to dial hyperlink

hello

i have in cell D10 phone number

i would like a macro, where when i click on a button, it dials the #

i have skype add-in in the toolbar, so in cell D10, when u right click, there is an option called "call this phone #"

i would like for the macro to execute that

i tried to record a macro (as i dont have much knowledge but didnt get ne where)

Sub dial()
'
' dial Macro

'
    Range("D10").Select
End Sub

can someone pls help