Intervallo di dati da graficare

[massibrezza]

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

[wallace&gromit]

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)

[massibrezza]

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]

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