Forums Últimos mensajes - Powered by IBM
 

importar datos de un libro

31/10/2006 - 20:24 por Ariel Colombino | Informe spam
SRAS SRES:

Necesito importar datos "fijos" de un libro, es decir por ej: de la columna
h y la fila 1 de todas las hojas de ese libro sin importar como se nombren a
las hojas ni cuantas hojas tenga el mismo.-
Asi en el "libro 1" tengo 10 hojas llamadas a, b, c, etc. y en el "libro 2"
tengo una hoja donde obtengo los datos de "h1" de todas las hojas del libro
1

Gracias
Ariel
 

Leer las respuestas

#1 Héctor Miguel
01/11/2006 - 23:20 | Informe spam
hola, Ariel !

Necesito importar datos "fijos" de un libro, es decir por ej: de la columna h y la fila 1 de todas las hojas de ese libro
sin importar como se nombren a las hojas ni cuantas hojas tenga el mismo.-
Asi en el "libro 1" tengo 10 hojas llamadas a, b, c, etc.
y en el "libro 2" tengo una hoja donde obtengo los datos de "h1" de todas las hojas del libro 1



[p.e.] suponiendo que estas en la celda/titulo de tu libro2, a partir de la fila siguiente se pasan los datos del libro1
[asumiendo que el libro1 esta abierto en la sesion]...

Sub Datos_H1_Libro1()
Dim Hoja As Worksheet, Fila As Byte
For Each Hoja In Workbooks("libro1").Worksheets
Fila = Fila + 1
ActiveCell.Offset(Fila) = Hoja.Range("h1")
Next
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares