nemá ten dátum iný formát? no asi nie.. ale aj tak by som tam dal pevný názov
a keď tak, trocha to prerobiť, namiesto activesheet dať sheet(1), neukladať sheet ale workbook, trebárs najprv uložiť do iného xlsx, ten otvoriť a uložiť ako pdf
postupnými krokmi na to možno prídeš