Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Excel: Grafici con caratteristiche dinamiche da cella

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

Excel: Grafici con caratteristiche dinamiche da cella

Postdi nonimpareromai » 04/08/10 10:49

Ciao,

è possibile creare un grafico di excel e fare in modo che, nelle proprietà del grafico "formato asse", "Scala", "minimo" sia indicato NON un valore, ma un riferimento ad una cella del foglio di lavoro in cui è parcheggiato il valore?

...o bisogna usare VBA???

grazie
nonimpareromai
Utente Junior
 
Post: 16
Iscritto il: 21/10/08 08:24

Sponsor
 

Re: Excel: Grafici con caratteristiche dinamiche da cella

Postdi maxmula » 04/08/10 12:00

Devi usare VBA...
Ti posto un pezzo di codice preso da una mia macro... l'oggetto CHARTSETUP, cui fa riferimento il codice, è un tipo di dati che ho creato ad hoc per digitare più rapidamente...

Nel tuo caso, al posto di "= CHARTSETUP.MaximumScale" ecc. puoi mettere i riferimenti alla cella con l'istruzione:

Codice: Seleziona tutto
= Sheets(foglio).Range(cella).Value


Codice: Seleziona tutto
Sheets("GRAFICO").Select
            C = ActiveChart.SeriesCollection.Count
            ActiveChart.ChartArea.Select
            ActiveChart.PlotArea.Select
                Charts("GRAFICO").SeriesCollection(CHARTSETUP.SeriesSlot).XValues = Worksheets("DATA").Range(X_C_START & ":" & X_C_END)
                Charts("GRAFICO").SeriesCollection(CHARTSETUP.SeriesSlot).Values = Worksheets("DATA").Range(Y_C_START & ":" & Y_C_END)
               
                POS_X = Charts("GRAFICO").SeriesCollection(CHARTSETUP.SeriesSlot).XValues
               

'-----------------------------------------------------------------------------------------------------------------------
'qui c'è la parte che t'interessa...
                Charts("GRAFICO").Axes(xlValue).HasMajorGridlines = True    'mostra griglia primcipale
                Charts("GRAFICO").Axes(xlValue).HasMinorGridlines = True    'mostra griglia secondaria
                       
                Charts("GRAFICO").Axes(xlCategory).MinimumScale = 0         'imposta la scala x della griglia
                Charts("GRAFICO").Axes(xlCategory).MaximumScale = CHARTSETUP.MaxSeries * CHARTSETUP.MaxSamples
                Charts("GRAFICO").Axes(xlCategory).MajorUnit = CHARTSETUP.MaxSamples
                Charts("GRAFICO").Axes(xlCategory).MinorUnit = Int(CHARTSETUP.MaxSamples / 4)
               
                Charts("GRAFICO").Axes(xlValue).MinimumScale = CHARTSETUP.y_PlotStart   'imposta la scala y della griglia
                Charts("GRAFICO").Axes(xlValue).MaximumScale = CHARTSETUP.y_PlotStop + CHARTSETUP.y_GridSize / 2
                Charts("GRAFICO").Axes(xlValue).MajorUnit = CHARTSETUP.y_GridSize
                Charts("GRAFICO").Axes(xlValue).MinorUnit = CHARTSETUP.y_GridSize / 2
           
            ActiveChart.ChartTitle.Caption = CHARTSETUP.CH_Title




Scusa se sono poco chiaro ma devo andare a pranzooooo!
Spero di essere più lucido dopo... :)

Ciao,
MAx
Avatar utente
maxmula
Utente Senior
 
Post: 965
Iscritto il: 18/08/04 18:28
Località: N44°59'45 E09°00'34

Re: Excel: Grafici con caratteristiche dinamiche da cella

Postdi Anthony47 » 04/08/10 22:44

Prova anche a guardare questa discussione:
viewtopic.php?f=26&p=495918

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13899
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Excel: Grafici con caratteristiche dinamiche da cella":


Chi c’è in linea

Visitano il forum: Nessuno e 9 ospiti