Estrazione formula



  • Estrai formula
    di Fausto (utente non iscritto) data: 29/07/2009

    Ciao a tutti
    avrei un quesito da sottoporvi:
    in un foglio di excel nella cella a1 viene inserita la seguente formula: =(2+3)*5/2
    il risultato che compare nella cella è quindi 12,5.
    chiedo se è possibile estrarre e quindi visualizzare la formula in una cella adiacente (=(2+3)*5/2), e che la visualizzazione si aggiorni automaticamente al variare della formula in a1?

    grazie



  • di Baz (utente non iscritto) data: 29/07/2009

    Ciao,
    a seguito il codice da inserire nel foglio dove vuoi venga eseguita la tua operazione

    fai sapere
    ciao
     
    Private Sub Worksheet_Calculate()
    
    Range("b1") = "(" & Range("a1").FormulaR1C1Local & ")"
    
    End Sub
    



  • di Riccardo (utente non iscritto) data: 29/07/2009

    Sulla scorta dell'indicazione precedente di baz, suggerisco la seguente funzione che è identica, ma può essere richiasmata in qualsiasi cella e non solo in una cella fissa (nell'esempio era "b1".
    cioè se in a2, a3, a4 ci sono svariate formule, scrivendo rispettivamente in b2, b3, b4 la formula: =estraiformula(a2), ecc. ecc. si ottengono a fianco le formule in f.to testo, che si auto-aggiornano al variare delle formule stesse, come desideravi tu.
    ciao
    riccardo
     
    Function EstraiFormula(Cella As Range)
      EstraiFormula = Cella.FormulaR1C1Local
    End Function



  • di Baz (utente non iscritto) data: 30/07/2009

    Bella soluzione riccardo, sicuramente funzionale

    io ho solamente "risolto" nel modo in cui è stato richiesto, diciamo accademico.

    saluti