Visual Basic - leer de otro libro

Life is soft - evento anual de software empresarial
 
Vista:

leer de otro libro

Publicado por viruslemon (7 intervenciones) el 17/07/2006 13:00:56
hola buenas!! mi consulta es como hacer para leer de otro libro teoricamente depende de la fecha!! con el format obtengo el valor de la fecha q kiero pero despues lo que kiero es abrir del archivo "AlturasXX06.xls" y leer de este!! para despues introducir estos datos en la hoja primera "Stockage.xls"

Aki dejo el código!! sé q debe ser una xorrada!! xo bueno!!
Espero respuesta!! GRACIAS!!
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:leer de otro libro

Publicado por machocabrio (25 intervenciones) el 17/07/2006 22:37:00
Lo unico que está claro es q debe ser una xorrada. vaya valla.
ya tienes una response!!! DE NADA!!
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:leer de otro libro

Publicado por viruslemon (7 intervenciones) el 18/07/2006 09:18:24
Este es el código!!

Sub obtener_alturas()
Windows("Stockage.xls").Activate
Sheets("Datos").Select
Fecha = Cells(1, 1)
DIA = Format(Fecha, "dd")
MES = Format(Fecha, "mmm")
AÑO = Format(Fecha, "yy")
nom = UCase(MES)
Windows("AlturasXX&AÑO&.xls").Activate
Sheets(nom).Select
silo1 = Cells(DIA + 5, 3)
silo2 = Cells(DIA + 5, 4)
silo3 = Cells(DIA + 5, 5)
silo4 = Cells(DIA + 5, 6)
silo5 = Cells(DIA + 5, 11)
Windows("Stockage.xls").Activate
Sheets("Datos").Select
Cells(19, 5) = silo1
Cells(13, 6) = silo1
Cells(25, 7) = silo1
Cells(25, 8) = silo1
Cells(13, 9) = silo1
End Sub
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