formattare intestazione/piè pagina con VBA in Excel

pamelapa90 · 06-09-2017, 15.22.12

Ciao a tutti,
vorrei formattare il carattere di un testo presente nel piè di pagina,che ho inserito in automatico tramite la macro.
Nella cella di riferimento il carattere è formattato come Century Gothic, 14. Quando viene riportato nel piè di pagina, vorrei che diventasse (in automatico) Century Gothic, 8.

Ho provato a inserire questa macro, ma mi compare errore di run time "424" oggetto mancante e segnala la seconda stringa del codice (in rosso).

Qualcuno può indicarmi dove ho sbagliato e come correggere il codice?
Grazie mille in anticipo.

Private Sub Workbook_BeforePrint(Cancel As Boolean)

For Each fg In ThisWorkbook.Sheets

fg.PageSetup.RightFooter = Sheets("Preventivo").Range("F1").Value & " - " & Sheets("Preventivo").Range("E2").Value
fgPageSetup.RightFooter = "&""Century Gothic,Normale""&8""

Next fg
End Sub

Alexsandra · 07-09-2017, 23.47.45

http://forum.wintricks.it/showpost.p...4&postcount=11

06-09-2017, 15.22.12	#1
pamelapa90 Newbie Registrato: 06-10-2016 Messaggi: 12	formattare intestazione/piè pagina con VBA in Excel Ciao a tutti, vorrei formattare il carattere di un testo presente nel piè di pagina,che ho inserito in automatico tramite la macro. Nella cella di riferimento il carattere è formattato come Century Gothic, 14. Quando viene riportato nel piè di pagina, vorrei che diventasse (in automatico) Century Gothic, 8. Ho provato a inserire questa macro, ma mi compare errore di run time "424" oggetto mancante e segnala la seconda stringa del codice (in rosso). Qualcuno può indicarmi dove ho sbagliato e come correggere il codice? Grazie mille in anticipo. Private Sub Workbook_BeforePrint(Cancel As Boolean) For Each fg In ThisWorkbook.Sheets fg.PageSetup.RightFooter = Sheets("Preventivo").Range("F1").Value & " - " & Sheets("Preventivo").Range("E2").Value fgPageSetup.RightFooter = "&""Century Gothic,Normale""&8"" Next fg End Sub

07-09-2017, 23.47.45	#2
Alexsandra Senior Member WT Expert Registrato: 19-05-2007 Loc.: Verona Messaggi: 1.302	Rif: formattare intestazione/piè pagina con VBA in Excel http://forum.wintricks.it/showpost.p...4&postcount=11 ___________________________________ - Il primo fondamento della sicurezza non e' la tecnologia, ma l'attitudine mentale -

Discussioni simili
Discussione	Autore discussione	Forum	Risposte	Ultimo messaggio
Excel Richiamare un valore di cella in Intestazione/Piè pagina	riccardonard	Office suite	23	22-09-2017 18.26.18
Estrapolare i Dati di una Pagina Web Per le Previsioni del Tempo	A.Maurizio	Office suite	16	05-07-2017 11.36.02
copiare dati da pagina web in excel	fabiovel	Office suite	5	02-01-2008 12.43.17
[WEB] Pagina volontariato	Cereal Killer	Programmazione	1	16-09-2005 00.18.19
Formattare celle in Excel con una funzione?	exion	Software applicativo	2	15-06-2004 11.10.36

Utenti attualmente attivi che stanno leggendo questa discussione: 1 (0 utenti e 1 ospiti)