Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[vba excel] Stampare grafici

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[vba excel] Stampare grafici

Postdi karug64 » 06/12/17 00:10

Salve a tutti.
Nel mio foglio di lavoro ho vari fogli (non sempre di numero preordinato) ma con nomi fissi.
In alcuni, all'interno del nome c'è la stringa "PA" (01_(PA), 02_(PA)....) ed in altri la stringa "BE" (15_(BE), 128_(BE) ....)
Ognuno di questi fogli contiene un grafico (oltre a tabella di dati).

Vorrei creare una macro che mi stampasse tutti i grafici presenti sui fogli. Per fare questo ho provato col registratore di macro che mi ha dato questo codice:

Codice: Seleziona tutto
ActiveSheet.ChartObjects("Chart 21").Activate
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,,,TRUE,,FALSE)"


che avrei voluto inserire in questo ciclo:
Codice: Seleziona tutto
For I = 1 To ThisWorkbook.Worksheets.Count
   
    If InStr(Sheets(I).Name, "PA") <> 0 or InStr(Sheets(I).Name, "BE") <> 0 Then
           
        Sheets(I).ChartObjects("Chart 21").Activate
        ExecuteExcel4Macro "PRINT(1,,,1,,TRUE,,,,,,2,,,TRUE,,FALSE)"
   
    End If

Next I


Il problema è che non tutti i grafici si chiamano "Chart 21" .....

Ho provato con

Codice: Seleziona tutto
        nomegraf = Sheets(I).ChartObjects.Parent.Name


ma ottengo il nome del foglio e non del grafico .....

Senza "parent" mi da errore ....

C'è un modo per sapere il nome di un grafico così da passarlo come parametro per la stampa ?

Grazie
Office 2010
karug64
Utente Senior
 
Post: 636
Iscritto il: 20/11/11 21:22

Sponsor
 

Re: [vba excel] Stampare grafici

Postdi Marius44 » 06/12/17 10:17

Ciao
In genere per conoscere il nome di un Grafico io uso questo codice
Codice: Seleziona tutto
aa = ActiveSheet.ChartObjects(1).Name


Ovviamente se in un foglio ci sono più grafici utilizzo un ciclo.
Spero sia utile.
Ciao,
Mario
Marius44
Utente Senior
 
Post: 260
Iscritto il: 07/09/15 22:00

Re: [vba excel] Stampare grafici

Postdi karug64 » 08/12/17 00:43

Ok, grazie!!
Office 2010
karug64
Utente Senior
 
Post: 636
Iscritto il: 20/11/11 21:22


Torna a Applicazioni Office Windows


Topic correlati a "[vba excel] Stampare grafici":


Chi c’è in linea

Visitano il forum: alfrimpa, raimea e 35 ospiti