PDF-printer problem

Hello, I have a problem like this;

I've recorded macro that selects PDF-printer, converts wanted range into PDF, then opens email application and user can send range to wanted address. Problem is that every time I record macro, it works fine, just like i want it to work.. but when I close workbook, then open it again and run macro, it does not do anything I recorded :P It does select pdf-printer (sometimes) but it wants me to save file (didn't record anything like that), and sometimes it just prints range into paper :P

Is this macro ruined somehow or doesn't it just work ??

Point is that user selects "Send PDF", macro then selects PDF-printer, then opens email application where user can write address. All this is working but when I close workbook and then open it, won't work :P

Here's the code

Sub SendPDF()
'
' SendPDF Makro
'
'
    ActiveWindow.SmallScroll Down:=15
    Range("RANGE").Select
    ActiveWindow.SmallScroll Down:=-69
    Selection.PrintOut Copies:=1
    ActiveWindow.SmallScroll Down:=-3
    Range("A26").Select
    ActiveWindow.SmallScroll Down:=-42
    Range("A26").Select
End Sub