Visual Basic para Aplicaciones - Ayuda excel

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda excel

Publicado por Primate Aurelio (2 intervenciones) el 29/08/2005 11:42:11
Hola a todos:
tengo un libro con 3 hojas.La primera me genera unos cálculos, los cuales guardo en la hoja 3.¿Cómo puedo hacer para que cada vez que genere un cálculo en la hoja 1(evento de click de un botón,por cierto), me lo AÑADA a los ya existentes en la hoja 3 sin machacarme los que ya existan?.
Un saludo y gracias de antemano.
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:Ayuda excel

Publicado por carlos (55 intervenciones) el 30/08/2005 18:55:22
Podes incluir en tu codigo lo siguiente
Dim miCalculo as Double ' aca guardas tu calculo

Worksheets("Hoja3").Select
' ahora hay que encontrar la primera celda libre en la columna A que es donde escribimos los resultados.
Range("A1"),Select
If Range("A1").Value <> " " Then 'si A1 ya tiene un valor
Range("A1").CurrentRegion.Select
ActiveCell.Offset(Selection.Rows.Count, 0).Activate 'cuenta las filas llenas y se mueve hacia abajo igual numero, con lo cual se para en la primera celda vacia
End If ' si A1 no estaba escrita no lo hace y se queda en ella

ActiveCell.value= miCalculo 'escribe el resultado del cálculo

Worksheets("Hoja1").Select ' vuelve a la hoja1

Suerte!!
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

RE:Ayuda excel

Publicado por Primate Aurelio (2 intervenciones) el 31/08/2005 12:27:00
Muchísimas gracias,Carlos.Lo voy a probar ahora mismo.
Un saludo.
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