sadece aşağıdaki kodu dener misiniz?
başka tek satır birşey olmayacak
Worksheets("hizmetIsleriKabulTutanagi").ExportAsFixedFormat Type:=xlTypePDF
bu kod belgelerim klasöründe çalışma kitabıyla aynı adda bir pdf oluşturur, yukardaki kod çalışırsa bu sefer Worksheets("hizmetIsleriKabulTutanagi").ExportAsFixedFormat Type:=xlTypePDF, OpenAfterPublish:=True
yazarak deneyin