Macro que no funciona con office 2007

Hola un saluda.

Esta macro con office 2010 funciona pero con office 2007 no

Sub PDF()
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="D:\Els meus documents\excel\Tot macros\" & Range("A1") & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False
End Sub