Forum di Excel e VBA. Stampare fogli nascosti
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Stampare fogli nascosti
- Hai un problema con Excel?
Stampa fogli nascosti di Pino Ciaao a tutti, da un pò di tempo mi stò scervellando per riuscire a stampare tutti i fogli nascosti di una cartella di lavoro ho provato con diverse macro ma senza risultato....qualcuno conosce un trucco per ovviare a tale inconveniente??
di Enzo Rendi visibile il foglio, lo stampi e lo rinascondi
di Enzo Nella descrizione qui sotto
rendi visibile il foglio1, lo stampi e lo rinascondi
ciao
Sheets("Foglio1").Visible = True ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveWindow.SelectedSheets.Visible = False
Stampa fogli nascosti di Pino Grazie enzo, ci ho provato ma appena rinascondo i fogli mi da debug.............la tua è una soluzione che provo da tempo forse sbaglio qualcosa nella macro che è questa:
sub stampa_nascosti()
'
' stampa_nascosti macro
' macro registrata il 28/09/2006 da casaburi
'
'
activewindow.scrollworkbooktabs position:=xllast
activewindow.scrollworkbooktabs position:=xllast
sheets(array("riepilogo commessa", "ricavi e costi", "riepilogo valori", _
"costi personale interno", "costi consulenze esterne.", "altri costi esterni", _
"ricavi e costi 1° anno", "riepilogo valori 1° anno", "ricavi e costi 2° anno", _
"riepilogo valori 2° anno", "ricavi e costi 3° anno", "riepilogo valori 3° anno") _
).select
sheets("riepilogo commessa").activate
application.activeprinter = "phaser 8400dp i piano su ne04:"
activewindow.selectedsheets.printout copies:=1, activeprinter:= _
"phaser 8400dp i piano su ne04:", collate:=true
end sub
Ciao pino di Apoben64 Per rinascondere il foglio, devi eliminare l'ultima istruzione che ti ha indicato enzo e metterci la prima con la condizione false.
ciao luca
Sheets("Foglio1").Visible = True ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("Foglio1").Visible = False
Stampa fogli nascosti di Pino Ringrazio tutti......con le vostre indicazioni ho fatto rifunzionare il cervello adesso funziona ed ho aggiunto all'inizio "application.screenupdating= fale" per non far vedere tutta la elaborazione.............funzionaaaaaaaaaaaaaa
di Enzo Buon per te ma non capisco cosa centra l'istruzione screen.updating = false con il provblema che avevi tu
questa istruzione e' posta all'inizio di una macro ma solo per far si che durante l'esecuzione di una macro non si vedano a video tutti i passaggi
ma se c'e' un debug nell'istruzione o un errore questo te lo segnala sempre
Stampa fogli nascosti di Pino Ciao enzo quell'istruzione all'inizio della macro serve proprio a questo........nascondere le operazioni a video e poi diventa più veloce la macro, cmq funziona tutto senza errori, la uso normalmente
- Vuoi approfondire questo argomento?
