Excel - producto en VBA

   
Vista:

producto en VBA

Publicado por Albert (70 intervenciones) el 05/12/2007 15:58:22
Buenas tardes, tengo un problema con realizar un calculo en VBA lo que quiero es que me coja la cantidad de la columna C y lo multiplique per el precio Colm. D y el resultado lo ponga en E
He hecho el siguiente codigo pero algo esta mal (o todo lo mas provable) alguien me puede ayudar?
Mil Gracias por anticipado

Dim x As Integer
Dim cantitat As Integer
Dim preu As Double
Dim total As Double
'_______________________________________

For x = 1 To 10000
If Hoja3.Cells(x, 6) = "" Then
final2 = x - 1
Exit For
End If
Next
'_______________________________________

Hoja11.Cells(FINALTOTAL, 4) = "Totales"
For x = 1 To final
cantitat = Hoja11.Cells(x, 3)
preu = Hoja11.Cells(x, 4)
total = cantitat + preu
Hoja11.Cells(x, 5) = total
Exit For
Next
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:producto en VBA

Publicado por JAG (139 intervenciones) el 05/12/2007 20:16:57
Rapidamente sin ver bien todo creo que el error esta en FOR X = 1 to final
dado que anteriormente tienes definido final2 = x -1 donde tienes el numero de renglones a analisar.....

Hoja11.Cells(FINALTOTAL, 4) = "Totales"
...............................
For x = 1 To final
...............................
cantitat = Hoja11.Cells(x, 3)
preu = Hoja11.Cells(x, 4)
total = cantitat + preu
Hoja11.Cells(x, 5) = total
Exit For
Next


Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar