Valor da celulas em outras celulas e em variaveis

Question

Galera seguinte eu preciso de uma ajuda para uma bobagem (mas que vai salvar a vida): mais ou menos assim... eu preciso pegar o valor de umas celulas especificas, soma-las e aplicar outros valores e  depois esse resultado colocar novamente numa outra célula. A duvida é pegar o valor da celula... eu não sei se com Range("cell").Value dá para colocar o valor numa variavel tipo Dim var1 As Integer.

Bom, é isso... obrigado desde já..

ricardo

Answer 1

Ricardo boa noite

Um exemplo que soma os valores de A1 A2 e A3, atribui a uma váriavel e coloca o resultado em A4

Sub Soma
Dim Resu as integer

Resu=range("A1").value+range("A2").value+range("A3").value
Range("A4").value=resu

End Sub

teste ai e qqer coisa fale.

Att

---

Bruno Silva Leite Office Developer officevb.blogspot.com

Answer 2

A linha de código abaixo retorna para n a soma da célula A10 seis vezes:

n = Range("A10") + Range("a10") + [A10] + Cells(10, 1) + Cells(10, "A") + Cells(10, "a")

---

http://www.ambienteoffice.com.br