[VBA - EXCEL] Macro

mercoledì 12 settembre 2007 - 16.23

giulio-9RN Profilo | Newbie

ciao Ragazzi,
vorrei creare una macro in grado di riportare in una cella LA SOMMA DI ALCUNE CELLE presenti in un'altro foglio di lavoro.

la formula "statica" sarebbe :

Range("A2").Select
ActiveCell.FormulaR1C1 = "=SUM(Sheet3!R[4]C[2]:R[6]C[18])

ma io vorrei utilizzare la seguente notazione:

Range("A2").Select
ActiveCell.FormulaR1C1 = "=SUM(Sheet3!R[4]C[2]:R[i]C[j])"

con le variabili i,j al posto dei numeri?.

Il problema è che excel, all'atto dell'esecuzione della macro, mi comunica un errore di tipo:
"Run-time error 1004"
"Application-defined or object-defined error"

c'è un modo per indirizzare le formule con degli indici e non staticamente? altrimenti cosa uso a fare le macro.....
grazie

alxpei77 Profilo | Newbie

Ciao...
non ho una risposta certa (anche perchè non sono espertissimo come ben vedi) ma a occhio e croce mi sembra che l'errore stia nel fatto che, scritta così...

Range("A2").Select
ActiveCell.FormulaR1C1 = "=SUM(Sheet3!R[4]C[2]:R[i]C[j])"

...excel non capisce che i e j sono variabili, bensì le interpreta come lettere della formula stessa....
Secondo me dovresti provare, dopo aver ovviamente dichiarato le variabili, scrivere qualcosa del tipo:

Range("A2").Select
ActiveCell.FormulaR1C1 = "=SUM(Sheet3!R[4]C[2]:R[" + i + "]C[" + j + "])"

In questo modo dovrebbe inserire nella cella la stringa della formula con i valori delle variabili.....

Fammi sapere se funza....

A presto..

giulio-9RN Profilo | Newbie

Hey proprio così,
Excel non riusciva a intrpretare le veriabili come tali..la tua soluzione è corretta.
Grazie mille per l'aiuto
Giulio

alxpei77 Profilo | Newbie

Bene...sono felice di essere stato d'aiuto...
Chiudi il post con accetta risposta..
Alla prossima.
Ciao.
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2023
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5