Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Intervallo di dati da graficare

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

Intervallo di dati da graficare

Postdi massibrezza » 05/03/12 15:52

Salve,
in un foglio excel ho 35043 righe, contenenti la data e ora nella prima colonna (intervalli di 15 minuti) e un dato numerico associato alla data ora in altra colonna. In un foglio della stessa cartella di lavoro ho fatto due grafici (excel non riesce a gestire in un grafico 35043 dati), con asse x la data ora e asse y i dati numerici. A cose normali il primo grafico visualizza i primi sei mesi dell'anno e il secondo i secondio sei mesi.
Talvolta però ho la necessita di visualizzare in dettaglio un periodo più ristretto. Ecco la domanda:
Esiste il modo di inserire nel foglio contenente le date e i dati, due celle contenenti gli intervalli da graficare, in modo che automaticamente il grafico mi visualizzi i dati che mni interessano?
Ad es. nelle celle potrei inserire 01/03/2011 00:00 e in altra cella 31/03/2011 23:45 ed il grafico mi fa vedere l'andamento dei dati del mese di marzo.
Grazie per una risposta
massibrezza
Newbie
 
Post: 6
Iscritto il: 31/01/12 18:50

Sponsor
 

Re: Intervallo di dati da graficare

Postdi wallace&gromit » 05/03/12 17:03

ciao massibrezza,
io ho risolto il problema con questa macro. Provala e dimmi se funziona.
L'ho elaborata a partire da consigli di flash, la parte della selezione del grafico (grafico1) è probabilmente migliorabile, ma a me funziona.
In z50 ho la data di inizio
In Z51 la data di fine
In Z52 l'intervallo per le etichette di data

Codice: Seleziona tutto
Sub LimitiGrafico()
'
    ActiveSheet.ChartObjects("Grafico 1").Activate
    ActiveChart.Axes(xlCategory).Select
    With ActiveChart.Axes(xlCategory)
        .MinimumScale = Range("z50").Value
        .MaximumScale = Range("z51").Value
        .MinorUnitIsAuto = True
        .MajorUnit = Range("z52").Value
        .Crosses = xlAutomatic
        .ReversePlotOrder = False
        .ScaleType = xlLinear
        .DisplayUnit = xlNone
    End With
   
    End Sub


P.S. se vuoi avere un grafico solo con più di 32000 dati basta introdurre una nuova serie che inizia a partire dalla riga 32000 e formattare la linea nel grafico come la precedente (alla fine non ti accorgerai del passaggio)
stato 2014: Office2003/2013 su win7
Avatar utente
wallace&gromit
Utente Senior
 
Post: 1421
Iscritto il: 16/01/12 14:21

Re: Intervallo di dati da graficare

Postdi massibrezza » 05/03/12 18:47

Grazie per la risposta.
Ho provato ma mi dà questo errore:
Errore di run-time '-2147467259 (80004005):
Metodo 'MinimumScale' dell'oggetto 'Axis' non riuscito

Uso excel 2007
Qualche suggerimento?
Saluti
massibrezza
Newbie
 
Post: 6
Iscritto il: 31/01/12 18:50

Re: Intervallo di dati da graficare

Postdi massibrezza » 05/03/12 19:54

Ho risolto così.
Grazie per il suggerimento iniziale.

Sub Macro4()
ActiveSheet.ChartObjects("Grafico 2").Activate
ActiveChart.Axes(xlCategory).Select
ActiveSheet.ChartObjects("Grafico 2").Activate
ActiveChart.Axes(xlCategory).MinimumScale = Range("I4").Value
ActiveChart.Axes(xlCategory).MaximumScale = Range("J4").Value
End Sub
massibrezza
Newbie
 
Post: 6
Iscritto il: 31/01/12 18:50


Torna a Applicazioni Office Windows


Topic correlati a "Intervallo di dati da graficare":


Chi c’è in linea

Visitano il forum: giorgio1979 e 7 ospiti