Macro para guardar en pdf

Tengo una macro para guardar un archivo en pdf, lo que me hace falta es que se necesita poner una ruta especifica para guardar el archivo y quiero ver si se puede poner para guardar en linea, ya sea skydrive o en la pagina de acrobat.

Sub SAVEPDF()

'

' SAVEPDF Macro

ActiveWindow.SmallScroll Down:=6

Range("A1:N23").Select

Range("M23").Activate

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _

"K:\" & Range("M3").Value, Quality:=xlQualityStandard, IncludeDocProperties _

:=False, IgnorePrintAreas:=False, OpenAfterPublish:=True

End Sub