ARRAYs?

07/07/2003 - 19:47 por Carlos Elizalde | Informe spam
Hola a todos,
gracias a vuestra ayuda he creado una macro que lleva
datos de Excel a Access, pero para optimizarla necesitaría
que el código identificara los nombres de los campos a
exportar.
Actualmente me creo un "ARRAY" cuyos datos son los que
están en la primera fila de una serie de columnas
consecutivas pero lo que me gustaría poder hacer es que la
propia macro construya esta matriz ya que el número de
columnas varía de un fichero a otro y los literales varían
de una tabla a otra.
Un ejemplo de lo que quiero sería:
A1 A2 A3 A4
Título Descripción Fecha Cuota
Mi matriz sería: Array
("Tïtulo","Descripción","Fecha","Cuota")
Lo que necesito es no tener que escribislo a mano para
cada fichero, ya que ni siempre son los mismos títulos ni
siempre hay el mismo número de campos
Me estoy comiendo el coco y no doy con ello. Agradecería
cualquier pista que me pueda ayudar
Saludos,
CARLOS ELIZALDE

Preguntas similare

Leer las respuestas

#1 - José Luis -
07/07/2003 - 20:26 | Informe spam
O sea que lo tienes en fila

Sería algo así como:

Sub VectorTitulo()

vF=Range("A1").end(xldown).row
ReDim Vector(vF)
For I=1 to vF
Vector(I-1)=Range("A" & I).Value
Next I
'Los titulos están en fila y no hay filas vacias sino hasta el final de
titulos de columnas
End Sub


"Carlos Elizalde" escribió en el mensaje
news:00a001c344af$c87ebae0$
Hola a todos,
gracias a vuestra ayuda he creado una macro que lleva
datos de Excel a Access, pero para optimizarla necesitaría
que el código identificara los nombres de los campos a
exportar.
Actualmente me creo un "ARRAY" cuyos datos son los que
están en la primera fila de una serie de columnas
consecutivas pero lo que me gustaría poder hacer es que la
propia macro construya esta matriz ya que el número de
columnas varía de un fichero a otro y los literales varían
de una tabla a otra.
Un ejemplo de lo que quiero sería:
A1 A2 A3 A4
Título Descripción Fecha Cuota
Mi matriz sería: Array
("Tïtulo","Descripción","Fecha","Cuota")
Lo que necesito es no tener que escribislo a mano para
cada fichero, ya que ni siempre son los mismos títulos ni
siempre hay el mismo número de campos
Me estoy comiendo el coco y no doy con ello. Agradecería
cualquier pista que me pueda ayudar
Saludos,
CARLOS ELIZALDE
Respuesta Responder a este mensaje
#2 Daniel.M
07/07/2003 - 20:30 | Informe spam
Hola Carlos,

Una de las dos maneras.

Dim unaHoja As Worksheet, Matriz As Variant
Set unaHoja = ActiveSheet ' necesita cambiar

With unaHoja
' Manera 1
Matriz = Application.Transpose(.Range("A1:A4"))
' Manera 2 : formula dynamica (varios numeros de datos)
Matriz = Application.Transpose(.Range("A1:A" & _
.Range("A65535").End(xlUp).Row).Value)
End With


Saludos,

Daniel M.


"Carlos Elizalde" wrote in message
news:00a001c344af$c87ebae0$
Hola a todos,
gracias a vuestra ayuda he creado una macro que lleva
datos de Excel a Access, pero para optimizarla necesitaría
que el código identificara los nombres de los campos a
exportar.
Actualmente me creo un "ARRAY" cuyos datos son los que
están en la primera fila de una serie de columnas
consecutivas pero lo que me gustaría poder hacer es que la
propia macro construya esta matriz ya que el número de
columnas varía de un fichero a otro y los literales varían
de una tabla a otra.
Un ejemplo de lo que quiero sería:
A1 A2 A3 A4
Título Descripción Fecha Cuota
Mi matriz sería: Array
("Tïtulo","Descripción","Fecha","Cuota")
Lo que necesito es no tener que escribislo a mano para
cada fichero, ya que ni siempre son los mismos títulos ni
siempre hay el mismo número de campos
Me estoy comiendo el coco y no doy con ello. Agradecería
cualquier pista que me pueda ayudar
Saludos,
CARLOS ELIZALDE
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida