I have just tested it and it works fine from the test macro I posted - though you can abbreviate the line
toCase Is = ".docx", ".dotx", ".pdf", ".xlsx", ".zip" 'the wanted extensions
if you are only interested in PDF format files.Case Is = ".pdf"
If it is not working for you, is your rule identifying the messages with the attachments?