ci credo che non funziona, è stato commesso un errore madornale che mi è sfuggito nell'ultimo post.
L'evento Before_Print nella classe Worksheet non esiste.
devi inserire il codice in ThisWorkBook oppure se hai la versione in italiano in questa_cartella_di_lavoro
ti allego un'immagine
il codice che poi devi inserire è
Codice:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterFooter = "&""Century Gothic,Normale"" &14" & Range("F1").Value & " - " & Range("E2").Value
End Sub
sorry, ma prima ho preso il codice che avevi postato e mi è sfuggito questo elemento.
prova così e vedrai che funziona.
PS: con anteprima non lo vedi, devi lanciare la stampa.