Excel - Escribir resultado en hoja diferente ( con vba)

   
Vista:

Escribir resultado en hoja diferente ( con vba)

Publicado por Juan Carlos (1 intervención) el 18/05/2013 07:51:29
Hola,
Gracias a todo el que lea mi pregunta y en especial al que pueda responderla.
Lo que pasa que estoy programando en vba la simulación de una situación y para obtener resultados finales necesito hacerla 100 veces por lo que decidí meter todo el código dentro de un For y echarlo a andar 100 veces (o mas). Lo que pasa es que cada vez que lo haga, necesito que guarde el resultado de una variable en una Hoja diferente. Como resultado, me gustaría tener todos los resultados obtenidos en una columna de otra hoja.

De ante mano, Muchas gracias
p.d: actualmente el resultado solo me lo muestra por un MsgBox, pero cuando lo ponga dentro del For, no va a funcionar.
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
Imágen de perfil de JuanC

Escribir resultado en hoja diferente ( con vba)

Publicado por JuanC juanc2942@gmail.com (1053 intervenciones) el 18/05/2013 16:44:15
sería útil que publicaras algo -o todo- del código o que seas más claro en el planteo...

Saludos, desde Baires, JuanC
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
Imágen de perfil de Norberto

Escribir resultado en hoja diferente ( con vba)

Publicado por Norberto (4 intervenciones) el 20/05/2013 12:50:14
Hola.

No sé si lo que quieres es meter cada pasada del For...Next en hojas distintas o en columnas distintas dentro de otra hoja que no sea la que tiene los resultados.

En fin. Para hacer referencia a una celda en otra hoja usa
Shets("Nombre de la otra hoja").Range("ref").

Para que cada pasada del For...Next use una columna distinta puedes usar .Offset(fila,col)

Por ejemplo:

1
2
3
4
5
6
7
8
9
10
11
Sub Pruebas()
    Dim f as Long, c as Integer, Hoja As WorkSheet
    Set Hoja = Sheets("Hoja2")
 
    For c = 1 to 100
        For f = 1 to xxx 'las veces que se haga algo
            'Lo que haya que hacer
            Hoja.Range("A1").Offset(f, c).Formula = "resultado a meter"
        Next
    Next
End Sub


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
1
Comentar

Escribir resultado en hoja diferente ( con vba)

Publicado por programator (1 intervención) el 30/06/2015 10:38:42
hola mi pregunta no era exactamente esa pero me sirvieron tus lineas de código
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