Saltar al contenido

EXTRAER DATOS DE UNA CELDA DE UN LIBRO A OTRO


Recommended Posts

publicado

Hola amigos, paso a explicarles un tema que me surgió con mi software comercial.

El sistema tiene un reconocimientos de códigos nuevos al actualizar una lista de precio.

Al actualizar me pregunta el sistema si deseo generar un excel con los artículos nuevos.

Al guardarlo, veo que me genera la misma planilla de importación que uso habitualmente pero la columna descripción no.

Quiero saber como puedo tomar esa descripción desde el archivo original.

Adjunto archivos de ejemplo

 

 

EXPORTA_SISTEMA.xlsx libroOriginal.xlsx

publicado

Hola @Gerson Pineda tiene un error el código

este
Set RangoC = Range("B:B"): Set vlh = Workbooks(vno).Sheets("Hoja1").Range("A:A") erro9
por este
Set RangoC = Range("B:B"): Set vlh = Workbooks(libroOriginal.xlsx).Sheets("Hoja1").Range("A:A")

este
Workbooks(vno).Close savechanges:=0
por este
Workbooks(libroOriginal.xlsx).Close savechanges:=0

y así ya funciona

publicado

@Gerson Pineda Ante todo muchas gracias por el aporte, rápido y efectivo! 

Me funciona correctamente, discúlpame el atrevimiento pero me interesaría saber si me podes explicar como funciona ya que tengo que hacer esto mismo con otras 30 listas. Estoy mirando la macro y creo entenderla, pero quizá se me escapa algo.

publicado
Hace 56 minutos , isidrod dijo:

bueno  @Gerson Pineda a lo mejor solo  sea en mi maquina

Es mas, si solo esos 2 libros están abiertos, no se necesita ni el nombre del segundo archivo

Hace 53 minutos , exekyel2010 dijo:

@Gerson Pineda Ante todo muchas gracias por el aporte, rápido y efectivo! 

Pues mientras pueda y tenga tiempo, con gusto he colaborado

Hace 53 minutos , exekyel2010 dijo:

Estoy mirando la macro y creo entenderla, pero quizá se me escapa algo.

¿Puntualmente que se te "escapa"?

 

Saludos 

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.