PopAds.net - The Best Popunder Adnetwork

aggiornamento automatico grafico

  • aggiornamento automatico grafico di Erica
    Vorrei poter aggiornare un grafico modificando i dati di origine attraverso un pulsante collegato a una macro, anzichè trascinando la selezione dei dati di origine.
    So che la sintassi che definisce l'intervallo dei dati di origine di un grafico è la seguente:

    ActiveChart.SetSourceData Source:=Sheets("nome_del_foglio").Range("F28:Q28,F36:K36")

    Il problema è che l'intervallo delle celle contenenti i dati di origine non è fisso; vorrei dire a Excel qualcosa come "utilizza come dati di origine le celle della riga 5, a partire dalla cella B5 fino alla prima cella vuota" (in quanto non so a priori quale sarà la prima cella vuota).

    Grazie a chi avrà un suggerimento da darmi!

    di Mauro
    Ti passo questa routine che calcola il riferimento della prima ed ultima cella del range valorizzato. Spero tu ne sappia trarre degli spunti.
    P.S.:Meglio se il range ha una forma regolare!


    Sub RangeUsato()
    ActiveWorkbook.Names.Add "Rigaform", RefersToR1C1:= _
    ActiveSheet.UsedRange.Range(Cells(1, 1), Cells(1, 4))
    Application.Goto Reference:="Rigaform"
    NumRiga = Selection.End(xlDown).Row
    NumCol = Selection.End(xlToRight).Column
    Set Primacella = Range("Rigaform").Cells(1, 1)
    Set Ultimacella = Cells(NumRiga, NumCol)
    MsgBox Primacella.Address
    MsgBox Ultimacella.Address
    End Sub