Macro for excel to run Putty from Excel sheet with the Server name

Sub PUTTY()
Shell "C:\Putty.exe -ssh " & activecell
End Sub