problemi con il comando Application.Evaluate di Excel in VBA
Domanda
Ho un problema con un po 'eccellere il codice che sto avendo difficoltà ad ottenere la mia testa intorno.
Va bene così io sto usando il comando Application.Evaluate in di Excel VBA, Office 2007.
Se ho Evaluate("SIN(45)")
restituisce un bel numero previsto. Tuttavia se faccio Evaluate("eq")
il codice si blocca.
eq è un'equazione Sto leggendo in da Excel. l'equazione è: 3*x^2+5*x+1
. E 'passato come una stringa. per assicurarsi che questo è accaduto ho messo in un'altra variabile che avevo definito come una stringa. Sostituisco le X nell'equazione con funzione di sostituzione di Excel. equation = Replace(equation, "x", temp)
.
Tuttavia, quando ottengo al di valutare il codice si rompe e non so perché. Total = Total + Evaluate("equation")
. Ogni aiuto è molto apprezzato
Soluzione
Credo che il problema risiede in cui si fa riferimento a una "equazione" stringa invece della stringa equazione.
Lo farei
Evaluate(equation)
o
Evaluate(Replace(equation, "x", temp))
invece, nota senza le citazioni " intorno equazione e che dovrebbe fornire una risposta valida.
Spero che questo aiuto.