Excel VBA: Macro para importar datos de otro archivo
ฝัง
- เผยแพร่เมื่อ 14 ก.ย. 2020
- ¡Hola a todos!
En este video aprenderemos a hacer una macro para importar los datos de otro archivo de Excel.
¡Necesitas una asesoría o desarrollo, contáctanos!
mail: info@inteficiente.com
Facebook:
@InteligenciaEficiente
/ inteligenciaeficiente
Descarga el archivo:
www.mediafire.com/file/7swvfc...
![เปิดบ้านสุดหรู "เเจ็ค the ghost" ลั่นถ้าป๋องกพลลำบากผมเลี้ยงเอง!! l [Nickynachat]](http://i.ytimg.com/vi/1xbW4vULqGc/mqdefault.jpg)
¡Hola! Les comparto un nuevo tutorial que explica cómo importar los datos de varias hojas. th-cam.com/video/VFrH8CYiTJA/w-d-xo.html
Hola! Muchas gracias por enseñar. Cómo se puede copiar con el formato completo?
Busqué en mil videos y ninguno tenía lo que buscaba hasta que llegué al tuyo, muchísimas gracias. Este video debería tener más apoyo. :)
Muchas gracias por tu comentario, me alegra saber que te ha funcionado. :D
Excelente!!!, bastante fácil de entender, gracias por compartir su conocimiento
No sabes lo mucho que me han ayudado tus videos, grande!
saludos.
Muchas gracias por tu comentario, saludos!! :D
¡Muchas gracias por compartir!
Video muy bien explicado y fácil de entender
¡Muchas gracias! :D
Excelente... Por mucho tiempo llevaba buscando y por fin encontré lo que quería, ahora no siempre serán rangos fijos ideales, a veces son x celdas que están por cualquier lugar ejemplos unas 15, pero que sean aleatorios no como tabla, eso podrías hacer en la próxima.
Felicitaciones por la forma rápida y limpia de explicar. !!!
claro, espera un video pronto!
EXCELENTE!! gracias por compartir su conocimiento y el codigo libre para estudio muy amable
¡Muchas gracias, es un gusto poder apoyar!
Bro acabas de salvar la economía de un país, trabajo con bases de datos y le moví a algo que no sabía.
Gracias a tu vídeo pude recuperar todos los datos de 3 meses de trabajo
¡¡Excelente!! Espero que te haya sido de gran utilidad :D
Graaan video ! Y de muchisima ayuda
Gracias por tu valioso comentario, Rodrigo!
Excelente video, gracias por compartir, saludos.
Muchas gracias!! Saludos!
Buenos dias gracias por su aportes y enseñasas, necesito un archivo en excel de inventarios pero valorizado Mil gracias
Muchas Gracias.! me has ayudado mucho, me suscribo.!
¡Gracias a ti! hay más tutoriales completos que espero sean de tu agrado. :D
Gracias..excleente explicacion
¡Muchas gracias, un gusto saber que te ha servido!
Muy bueno. Gracias por compartir.
Gracias César!!
Esta buenisimo, muchas gracias
Gracias a ti por apoyar el vídeo, espero que te sea de utilidad. ☺️
Que emoción si funciono lo explicaste super bien, como podría crear una pero para copiar en varios libros y pegarlos en la misma hoja
Hola!! Me alegra que te haya funcionado, en este video hago lo mismo pero con varios archivos :D th-cam.com/video/UhzWa8SrwDk/w-d-xo.html
Wow, qué bueno 🎉
Saludos!! 🙌
Que buena explicación
¡Muchas gracias, José! Sigo tratando de mejorar día con día . :D
Excelente
Hola! Muchas gracias, me sirvió mucho como puedo agregarle una condición a esta macro para que solo copie la información de las filas donde una columna sean iguales es decir un mismo nombre o número.
Me gustó mucho la macro, me gusta como lo explicas.
Estaría genial si en lugar de asignar por defecto la celda A1, se pide al usuario ingresar manualmente la celda donde se comenzará a copiar la información a través de un cuadro de diálogo. Espero consideres esa idea
Saludos
seria con un inputbox
Es correcto, con un InputBox podrías realizarlo, esta línea debería escribirse antes del A1: celdaElegida = InputBox("Elija la celda de destino") y luego reemplazar el "A1" por celdaElegida. ¡Saludos!
@@InteligenciaEficiente probé la macro con 4 archivos con poco más de 50,000 filas cada uno, el resultado fue: la copia completa del primer archivo y cerca de 4,000 registros de las otros 3 archivos, Respecto a la sugerencia de modificación es para preguntar en qué celda comienza la información que se va a copiar. Por ejemplo en los archivos que utilicé, la información comienza en la celda B12
Excelente!
Muchas gracuas!
Excelente video amigo, el mismo codigo podria usar para importar un Base de datos de otro archivo excel para cargarlo desde formulario donde ponga un boton cargar archivo
Sos un crack
Muchas gracias Catalina!
Excelente, era lo que buscaba Ahora falta personalizarla jaja
¡Muchas gracias por comentar!
Muy buen video... Podrias crear un código con cual cial se abra un nuevo archivo de excel, copie determinada info y de guarde en un ligar específico?
Excelente video!! Una pregunta: en el minuto 5:26 mencionabas que tienes otro video para los tipos de copiado (rápido/lento), me podrías decir cual es para verlo también por favor? Muchas gracias de antemano! Excelente aporte!!
¡Hola Alberto! Claro que sí, es este video: th-cam.com/video/TFWj_VpdGD8/w-d-xo.html
Hola que tal una pregunta ¿Sigue funcionando el IF en caso que el usuario le de esc o cancelar? me manda error en mi caso
Hola! Y si quiero añadir otro botón para agregar otro libro en otra hoja en el libro de origen tengo que repetir el proceso en un formulario nuevo? Gracias
Excelente explicación y muy interesante el video tutorial, una consulta: como podría hacer con el mismo ejemplo que al importar no lo coloque en la fila 1, sino por decir en la fila5?
Espero pueda responder la pregunta porque me sería de gran ayuda, saludos.
Hola Richard, en la línea Destination cambia .range("A1") por .Range("A5"). ¡Saludos!
@@InteligenciaEficiente HOLA, estoy intentado colocarlo en la fila "C1" porque la fila A1 y B1, estan llenas, pero me genera error, como lo puedo ejecutar?
A ver amigo, disculpa mi franqueza. Pero realmente esperaba algo que me sirviera para trasladar información por celda, este video de casi 8 minutos solo sirve para hacer algo que con un copiar y pegar se puede lograr.
Hola Gustavo, tienes razón en decir que solo este proceso sirve para hacer un copiado y pegado, sin embargo este paso puede ser el inicio de todo un proceso automático que requiera importar datos de otro archivo y después enviar mails masivamente, generar cálculos, etc. Si deseas trasladar información por celda te comparto este otro video donde explico como hacerlo: th-cam.com/video/TFWj_VpdGD8/w-d-xo.html si aplicas los conceptos del video que te comparto junto con los de libro origen y libro destino de este video podrás hacer el traslado entre celdas de dos archivos diferentes. :D
Hola muchas gracias por este gran video y explicacion, de verdad e va afuncionar mucho, solo quisiera saber si es posible colocarle una ruta de origen fijo, es decir, que me abra el cuadro de abrir desde una ruta en especifico. Muchas gracias.
¡Hola Leonardo! Para poder hacer eso necesitarás configurar CHDrive y CHDir antes de la línea que dice Application.GetOpenFileName, la modificación quedaría así:
CHDrive("C:\")
CHDir("C:\LaRuta\DeTuInteres")
Application.GetOpenFileName(Title:= "Por favor seleccione un archivo")
Hola! Excelente información!
Sólo una pregunta, a lo mejor es algo obvio pero, ¿forzosamente debe trabajarse con tablas dinámicas para diseñar y ejecutar las macros?
Hola Noemí, muchas gracias!! No es necesario, de hecho esta macro no usa tablas dinámicas. Saludos!!
Muy bueno, muchas gracias! El siguiente paso para mi es seleccionar valores que están en celdas especificas y armar una tabla con un nuevo formato! Después el leer la misma celda de diferentes archivos. Tienes algún video explicativo? Gracias Mil!
¡Hola Ricardo! Desgraciadamente no tengo algo como lo que menciona sin embargo con gusto podemos apoyarlo ya sea con una asesoría o desarrollo personalizado, puede contactarnos al correo que dejamos en la descripción del video. ¡Muchas gracias y saludos!
se puede pegar varias hojas del mismo libro gracias
Gracias por compartir el video. Tengo una duda respecto a una consulta por si has creado un video sobre el tema. Requiero pasar unos datos específicos de unas celdas especificas, a otro archivo que tiene una distribución de celdas distintas pero que debe conservar la misma información. ¿Hay alguna manera de que pueda hacer este cambio de información ya sea con una macro o con powerquery?
Si se puede, pero tu consulta es muy general, yo te recomiendo que si estas entrando al mundo de VBA, te ayudes con una inteligencia artificial para que puedas entender a mejor manera el codigo, yo uso mucho ChatGPT
Muy buen tutorial una pregunta si quiero que la ruta sea fija es decir que no me abra el cuadro para escoger el libro si no que sea la misma ruta siempre
Escribe el texto de la ruta que quieres entre comillas en la variable ruta del código.
Una pregunta, se puede importar datos de cualquier extensión del libro de Excel?
Por decir para importar un archivo externo de formato csv como podría configurarlo en el programador?
Espero su respuesta, gracias
Hola Richard, con esta macro podrías importar cualquier extensión como .CSV .XLSM sin mayor problema. ¡Saludos!
Magister podrias hacer un video, donde el formulario donde marqué con aspa con un solo clic, se marque la foto de un candidato en la BD quede como "Si"
Me pareció excelente una pregunta tengo un. Archivo de Laura zona x otro de Marlon zona x y otra de Manuel zona x tres archivos diferentes como quedaría tres archivos en uno solo gracias por compartir y bendiciones al canal 🇲🇽👍👌
Gracias por su comentario, veo que ya me dejó otro en el video que justo combina varios archivos en uno. ¡Saludos!
Hola, tengo una carpeta que se llama Cajeros, y dentro de ella tengo varias subcarpetas ; cajero1, cajero2, cajero3, etc. Y en estas subcarpetas tengo un archivo el cual solo puede ser gestionado por el cajero humano que cuadra ese cajero, es decir, el cajero1 solo tiene permiso el archivo que esta demtro de la carpeta cajero 1. En resumen, quiero unificar los archivos en una sola matris pero estos estan en diferentes carpetas. Como le puedo hacer
Excelente tutorial, ¿es posible que en esa misma macro pueda copiar otros valores.? necesito pasar además de lo que ya esta funcionando: pasar el valor de la celda a1 de libro origen, a la celda A1 del libro destino..
así tengo el codigo hasta el momento:
Sub importar()
Dim LibroDestino As Workbook
Dim Libroorigen As Workbook
Dim Ruta As String
Set LibroDestino = ThisWorkbook
Ruta = Application.GetOpenFilename(Title:=" por favor selecciona un libro")
If Ruta = "False" Then
Exit Sub
End If
Set Libroorigen = Workbooks.Open(Ruta)
Libroorigen.Sheets(6).Range("C3:N12").Copy Destination:=LibroDestino.Sheets(6).Range("C3")
Libroorigen.Close
End Sub
@@camilooviedo4674 Hola Camilo! Muchas gracias por comentar, veo muy bien tu código, ¿te manda algún error?
@@InteligenciaEficiente Hola, hasta ahí no me envía ningún error, sin embargo si intento aumentar una linea para agregar información para pasar el valor de la celda A1 de libro origen, a la celda A1 del libro destino, No me corre la otra linea (Libroorigen.Sheets(6).Cells("A1").Copy Destination:=LibroDestino.Sheets(6).Cells("A1")) lo intente con "range", cells y no me dio. espero que me puedas ayudar.
Sub importar()
Dim LibroDestino As Workbook
Dim Libroorigen As Workbook
Dim Ruta As String
Set LibroDestino = ThisWorkbook
Ruta = Application.GetOpenFilename(Title:=" por favor selecciona un libro")
If Ruta = "Falso" Then
Exit Sub
End If
Set Libroorigen = Workbooks.Open(Ruta)
Libroorigen.Sheets(6).Range("C3:N12").Copy Destination:=LibroDestino.Sheets(6).Range("C3")
Libroorigen.Sheets(6).Cells("A1").Copy Destination:=LibroDestino.Sheets(6).Cells("A1") ' esta linea no me quiere dar.
Libroorigen.Close
End Sub
Ayuda
Estoy aplicando la Macro pero me aparece un error que dice "Compile error: Named argument not found" y no sé que pasa porque luego se selecciona el titulo del sub en amarillo y ni siquiera corre la macro aun sin asignarsela al botón.
Muy buen vídeo, una consulta en que momento se utiliza la palabra reservada set o me funciona igual la macro si no la utilizo?
Hola Carlos, el uso de Set es obligatorio cuando se desea asignar un valor o una referencia a una variable que es un objeto, te recomiendo leer el siguiente post: www.excel-avanzado.com/39087/que-es-set-en-vba.html#:~:text=La%20instrucci%C3%B3n%20Set%20se%20utiliza,a%20una%20variable%20tipo%20objeto.
Buenas noches, me gustó mucho la explicación, sencillo pero efectivo. Será que se podrá realizar lo siguiente: tengo un archivo con macro (módulos y userform), y el otro sin macro archivo normal (es la base de datos: con dos hojas, bd_cliente y bd_ventas), pero con el libro con macro, que se pueda registrar clientes y realizar pagos (mandando al otro libro bd), también que se pueda realizar un reporte de pagos pendientes.... Espero que me haya explicado, de ante mano estaré en espera de tu respuesta, bendiciones
Hola Moises, tengo un video que inserta datos a otro libro de Excel, te lo comparto a continuación: th-cam.com/video/u9MTtBerG80/w-d-xo.html sobre como generar un reporte te dejo este otro tutorial: th-cam.com/video/4AWwtdQ_6Yk/w-d-xo.html
@@InteligenciaEficiente gracias
De antemano agradezco el tiempo dedicado a compartir y explicar el conocimiento. Podrias orientarme en saber como capturar el rango de celdas desde una caja de texto y guardar esa seleccion en otro archivo de excel debajo de lo que ya se tiene guardado ... Dejo el intento a ver si a alguien mas le puede ayudar
Sub RespaldarDatos()
Dim rng As Range
Selection
Set Selection = Application.InputBox("Seleccione las celdas a copiar: ", Type:=8)
rng.Copy
Sheets("respaldo").Activate
rng("C1").PasteSpecial xlPasteAll
End Sub
Hola Heriberto, espero que esto cumpla lo que necesitas, el rango en el InputBox debe ser especificado como el siguiente ejemplo, A1:B5 que tomaría el rango desde A1 hasta B5.
Sub RespaldarDatos()
Dim rng As Range
Dim celdas As String
celdas = InputBox("Escriba el rango de celdas que desee copiar. Ejemplo: A1:C5")
Set rng = ActiveSheet.Range(celdas)
rng.Copy
Sheets("respaldo").Activate
ActiveSheet.Range("C1").PasteSpecial xlPasteAll
Application.CutCopyMode = False
End Sub
@@InteligenciaEficiente lo pruebo en el excel y le comento que tal funciona. Gracias por tomarse el tiempo de responder
Hola consulta y si yo quiero copiar un rango específico y pegarlo en destino rango específico
Te recomendamos ver nuestro video sobre el cálculo de última fila y columna además de ver el video de los métodos de copiado. Con dicho contenido podrás hacer lo que necesitas. Los videos están en la lista de reproducción del canal. Saludos :D
Buen video..como pegar un archivo de igual forma, pero que al anterior se conserve o sea que el nuevo archivo, quede al inicio...gracias me ayudaria tu respuesta....
Este video te podría ayudar
th-cam.com/video/UhzWa8SrwDk/w-d-xo.html
Gracias por el video Me gustaría me regalara el código para copiar de una hoja a otra en el mismo libro, o que actualice una hoja copiando información de otra hoja 🙏
Gracias por el excelente video, una pregunta como se puede hacer para que en lo sucesivo los datos vayan al final de fila del archivo destino. Gracias
¡Hola Julio! Te comparto este video donde se muestra cómo hacer lo que mencionas :D th-cam.com/video/UhzWa8SrwDk/w-d-xo.html
Buenas Tardes, Con ese metodo tambien tmb se conserva la formula ??? O solo pega como valor ?
Hola Carlos! El método .PasteSpecial tiene diferentes tipos de pegado, entre ellos el de pegar solo fórmulas o pegar solo valores. Puedes encontrar más información en docs.microsoft.com/es-es/office/vba/api/excel.range.pastespecial y dando clic en xlPasteType te mostrará los diferentes tipos de pegado disponibles. Saludos :D
CUANDO DESEO QUE PONGA LOS DATOS APARTIR DE LA CELBA B2 ME SALE ERROR, AUN MODIFICANDO EL DESTINO B2 EN LA PROGRAMACION.
Compañero Buen dia, que buen aporte, una consulta y si el libro origen tiene varias Hojas como hago para selecrrionar la que quiero copiar, gracias
¡Hola! Mañana mismo subiré un tutorial completo de una macro que permita seleccionar y copiar automáticamente las hojas. :D
Te comparto el tutorial, espero que te ayude :D th-cam.com/video/VFrH8CYiTJA/w-d-xo.html
Hola !! excelente explicacion, te quiero hacer una consulta, quiero importar pero el archivo de origen es un CSV, y me esta dando un error, el csv esta delimitado por ";" tambien...
Muchas gracias por tu tiempO!"
Hola Kevin, muchas gracias por tu comentario! puedes escribirme a inteligenciaeficienteYT@gmail.com para poder revisar este tema con un contacto más rápido. Saludos!
Si quiero copiar varios libros en una carpeta con el mismo formato en un archivo nuevo unificado acomodando la data en el archivo final como yo quiero. Los archivos en la carpeta cad vez que se agregue uno nuevo y se corra la macro se sume el qué no estaba.
¡Hola Samuel! Si deseas un desarrollo personalizado puedes contactarme a mi correo: inteligenciaeficienteYT@gmail.com ¡Saludos!
Muy bien. Que tal si el libro de Destino tiene varias hojas. Y... como asegurar q la ruta sea asi tan directa. Recuerde que tenemos muchas carpetas y subcarpetas. No me queda claro este aspecto
¡Hola! En ese caso se necesita un desarrollo más personalizado, con gusto podemos realizar cualquier desarrollo a la medida que requiera. Nos puede contactar por mail al correo que dejamos en la descripción del video. ¡Saludos!
Hola. Tengo una duda. Estoy trabajando con 2 archivos que están en una carpeta que está en red. Y lo que quiero lograr es que ambos archivos se "comuniquen" (copiar datos de uno, pegarlos en el otro y viceversa) al estar ABIERTOS en computadoras diferentes. ¿Eso es posible?
¡Hola! Si está abierto en otro PC Excel no te permitirá editarlo, lo que hará será crear una copia idéntica a la última versión guardada de ese archivo. Lo que se me ocurre es que se puede crear una macro que "avise" cuando haya datos pendientes por trasladar que fueron enviados por el otro archivo. Si gustas contactarme a mi correo podríamos revisarlo más a profundidad. inteligenciaeficienteYT@gmail.com ¡SALUDOS!
Saludos que buen código, felicidades!! he notado que la macro cuando se ejecuta, abre el explorador de archivos, pero si se decide no abrir ninguno y se oprime CANCELAR, la macro genera error. Me gustaría que tuviese una solución.
Me alegra que te haya funcionado, hay muchas soluciones para lo que mencionas pero me parece que esta es una de las mejores. Hay que reemplazar las líneas:
Ruta = Application.GetOpenFileName(Title:= "Por favor seleccione un libro")
If Ruta = "False" Then
Exit Sub
End If
Minutos: (02:45-04:03)
por lo siguiente:
Set dlgFile = Application.FileDialog(msoFileDialogFilePicker)
With dlgFile
.Title = "Por favor seleccione un libro"
.AllowMultiSelect = False
If .Show -1 Then Exit Sub
End With
Ruta = dlgFile.SelectedItems.Item(1)
¡Espero que te sirva! :D
@@InteligenciaEficiente que respuesta mas efectiva, amigo muchas gracias que buen contenido y que buen servicio pos. Te has ganado un suscriptor más.
cuando cancelo la selección del archivo aparece error, por lo demás excelente , muchas felicidades por compartir tu conocimiento, gracias
leí los comentarios ya dio solución . gracias
Hola . excelente .podrias orientarme . quiero una macro que en un mismo libro , copie una seleccion y se pegue en otra hoja . (solo lo seleccionado) . agradezco tu ayuda . saludos
Hola Pedro, listo el tema, gracias por contactarme por mail!
@@InteligenciaEficiente Hola buenas, estoy interesado en lo mismo en importar una seleccion del libro no completo , tendria que ajustar el range?
Hola Muchas gracias, como hace para que al importar se mantenga el formato de la hoja de destino?
Hola Becky, es con este método: PasteSpecial Format:="Text"
Una consulta, hice lo mismo pero no extrae datos del otro excel a menos que cambie ese otro excel a una versión anterior por ejemplo del 2003, ahí sí funciona, por qué sucede esto?
Desconozco ese detalle, pero podría verificarlo con mayor detalle si me envía su macro y el archivo de muestra a inteligenciaeficienteYT@gmail.com para verificarla. ¡Saludos!
Hola! Una consulta si quiero agarrar mas de un archivo, como hago?
Subiremos un video para importar varios archivos :D
@@InteligenciaEficiente eso mismo necesito yo, una macro para copiar varios archivos en un solo
Hola. Cuando tendrías este video? Saludos
@@InteligenciaEficientehola ya tienes el video?
Hola. Hay forma de contactarte por algún medio? Tengo una consulta sobre las macros porque no logro encontrar una opción que funcione con lo que necesito hacer en mi trabajo. Te agradecería muchísimo si me pudieses ayudar.
¡Hola! Claro que sí, puedes contactarme a mi correo electrónico: inteligenciaeficienteYT@gmail.com SALUDOS!!
@@InteligenciaEficiente mil gracias! Te busco por correo.
Que función tiene en si el Set
El Set es obligatorio cuando se va a asignar un valor a una variable de tipo Objeto. Es decir un tipo de variable como Worksheet, Range, Workbook. etc
Hola, tengo una duda, como puedo importar los datos de una tabla de un libro a otro y que el libro destino esté filtrado de tal manera que no lo puedan modificar.
Podrías realizarlo protegiendo la hoja, suponiendo que se llame "Prueba", el comando sería Worksheets("Prueba").Protect "TuPasswordAqui"
Hola un gusto, excelente, como haría si solo tengo que copiar filas, varían la cantidad según el reporte, a otro excel en una tabla, VINCULADA A UNA TABLA DINAMICA.
Hola Mario, necesitaría más detalles, me puedes contactar a mi correo: inteligenciaeficienteyt@gmail.com SALUDOS!!
@@InteligenciaEficiente , muchas gracias, lo resolví, la idea era copiar toda la hoja y no solo filas.
Hola! Muchas gracias por el vídeo, estuvo súper la explicación, pero no me funcionó el código, cuando oprimo el botón no ocurrre nada. :(
Hola Gabriela, te recomiendo revisar si está correctamente asignada la macro al botón. Cualquier cosa puedes contactarme por fb para darle seguimiento. ¡Gracias!
Hola, Excelente vídeo, me encanto, quisiera preguntarte ya que me sirve mucho la macro pero me sale error 424 ya que falta un objeto he probado de todo pero no se como solucionarlo, me podría colaborar como puedo encontrar una solución. Muchas Gracias.
Hola Salomón, puede contactarme a inteligenciaeficienteYT@gmail.com para poder revisar la macro, saludos!!
@@InteligenciaEficiente hola muchas gracias por su respuesta ya le fue enviado al correo.
Hola! Tengo una consulta. Digamos que no conozco exactamente la celda en la que deseo pegar la información (porque cambia constantemente la última fila vacía en el documento). ¿Cómo puedo colocar un rango dinámico en lugar de "A1" que ya está determinado?
Hola! Después de la línea Set LibroOrigen agrega una línea que diga:
CeldaDestino= InputBox(“Escriba la celda de destino”) y sustituyes el .Range(“A1”) por .Range(CeldaDestino).
Saludos!
@@InteligenciaEficiente ¿hay algún código que me pueda devolver el número de la primera celda vacía disponible? (Para colocar esta como valor de la celda destino)
Lo he intentado de varias formas pero no me da buen resultado 😔
@@gracielasaca8187 sí, te recomiendo ver el vídeo de cálculo de última fila que tenemos :)
th-cam.com/video/lQ98eHsX7XQ/w-d-xo.html
Dato para los que les da error al no seleccionar archivo y cerrar la ventana; "False" debe ir en "Falso", es un pequeño detalle que me costó entender ¿Por qué pasará eso? perdonando mi ignorancia, muchas gracias por el video me sirvió mucho ¡Buenísimo!
----------------------------------------
If Ruta = "False" Then
Exit Sub
End If
----------------------------------------
If Ruta = "Falso" Then
Exit Sub
End If
-------------------------------------------
¡Hola! Muchas gracias por comentar, este error puede deberse al idioma de nuestro Windows o MS Office, pero hay algo que se puede hacer para que funcione sin importar el idioma: La línea de código debería cambiar a: ----------------------------------------
If Dir(Ruta) = "" Then
Exit Sub
End If
------------------------------------------- De esta manera funcionará igual y sin importar el idioma de la PC donde se esté ejecutando. ¡Saludos! :D
@@InteligenciaEficiente Genial! Muchas gracias!! lo usaré ahora en adelante.
Si el archivo de donde se quiere traer la información está protegido; es decir, el archivo pide una contraseña para que pueda ser abierto. ¿Cómo se tendría que hacer?
Perdóname por responderte hasta ahora, apenas veo tu comentario :( para abrir un archivo se agrega lo siguiente a la línea Workbooks.Open... --->
Workbooks.Open Filename:= Ruta, Password:="TuPassWordAqui"
Como puedo hacer referencia a un rango de celdas o una tabla que se encuentra en un libro cerrado sin abrirlo, desde otro libro?
ya que si el libro de origen no se abre, da error de referencia
Hola Alan, la única manera de que pedas hacer referencia a un libro de Excel que se encuentra cerrado es mediante Power Query, te dejo aquí algunos ejemplos de cómo hacerlo. support.microsoft.com/es-es/office/importar-datos-de-or%C3%ADgenes-de-datos-power-query-be4330b3-5356-486c-a168-b68e9e616f5a
BUENAS NOCHES ESTIMADO, QUISIERA HACER UNA CONSULTA PARA RESOLVER UN PROBLEMA DE MOVER CELDAS O ACOMODAR CELDAS DE ACUERDO A UN ORDEN CONFIGURADO EN UNA PLANILLA DE EXCEL. NO SE PORQUE MEDIO PODRIA AYUDARME A RESOLVER EL CASO, ESPERO PUEDA RESPONDER MI COMENTARIO. SALUDOS.
Hola Richard, si deseas una asesoría más personal puedes escribirme a: inteligenciaeficienteyt@gmail.com SALUDOS!!
Hola, mil gracias por el video. Pero al momento de copiar la info, se copia en mi primera hoja del libro. Como puedo hacer para que se copie en la hoja seleccionada?
Hola Roxana, para poder hacer lo que solicitas solo cambia la línea de código en la parte donde se escribe LibroDestino.Sheets(1).Range("A1") por ActiveSheet.Range("A1") ¡Saludos! :D
@@InteligenciaEficiente mil gracias 🙌🙌
HOLA, estoy intentado colocarlo en la fila "C1" porque la fila A1 y B1, estan llenas, pero me genera error, como lo puedo ejecutar?
Hola Ericka, si deseas una asesoría más personal puedes escribirme a: inteligenciaeficienteyt@gmail.com SALUDOS!!
Y si quiero importar la primer hoja pero de varios libros?
Aquí tienes la macro que lo hace: th-cam.com/video/UhzWa8SrwDk/w-d-xo.html saludos!!
Hola, si quiero importar datos pero omitiendo los duplicados como lo hago?
Hola! solo tienes que agregar estas líneas debajo de LibroOrigen.Close:
Dim rng As Range
Set rng = LibroDestino.Sheets(1).UsedRange
rng.RemoveDuplicates Columns:=rng.Columns.Count, Header:=xlNo
Hola buen día super el video, sin embargo si me pueden ayudar ejecute correctamente como explican en el video pero en la al seleccionar el libro de Excel e intentar cargarlo me sale error.
Hola Luis, puede mandarme su macro al correo inteligenciaeficienteYT@gmail.com para poder revisar lo que sucede. ¡Saludos!
en mi caso falla cuando le doy cancelar al cuadro de diálogo y me tira error que no se encuentra el archivo "False"
¡Hola! ¿Podrías por favor confirmar si el código que escribiste contiene el "False" entre comillas? Ese puede ser el error.
@@InteligenciaEficiente bien ya me funcionó le hice unos cambios ruta lo declare como Variant y en el código if ya me dejo seguir como tipo booleano solo le modifique algo pero muchas gracias por tu video me dio nuevas ideas para mi macro te lo agradezco mucho
@@sanlic ¡Excelente! Sí, declararlo como variant es una buena idea en este caso :D ¡Saludos!
Cómo puedo pegar abajo de esa tabla más datos de otro archivo??
Gracias
Hola Caro, te comparto este video que te puede ayudar: th-cam.com/video/UhzWa8SrwDk/w-d-xo.html
Excelente, tengo años q no hacia esto , pero me da un error, cuando la hoja que quiero copiar es la 3 hago el cambio en el codigo y me sale error 9, me ayudas ??
Claro que sí, puedes enviarme mensaje a facebook.com/InteligenciaEficiente/
Hola!! Me puedes ayudar a cruzar información de un libro a otro? es decir, quiero que si pongo un valor, me pase información al orto, se pude?
Hola Esteban, con gusto puedo apoyarte, ¿me puedes dar más detalles para poder hacer un vídeo con un ejemplo práctico?
@@InteligenciaEficiente si, solo dime donde puede enviar ejemplo
@@zayjor puedes contactarme a nuestra página de fb: facebook.com/InteligenciaEficiente
@@InteligenciaEficiente listo, te envíe el ejemplo
@@InteligenciaEficiente Hola, ya te mande el ejemplo.
Siempre me aparece que tengo que depurar cuando tiene que cambiar de un libro a otro y no consigo hacerlo, me podrías ayudar?
Gracias
Hola Claro que sí, podrías intentar con el comando .Activate, antes de que cambie de un libro escribe la línea que seleccione el libro que deseas, por ejemplo libroOrigen.Hoja1.Activate para que se seleccione la Hoja1 del libroOrigen o libroDestino según lo requieras. ¡Saludos!
Hola si solo quiero quiero comprar algunas celdas de un libro
Te comparto este video :D th-cam.com/video/TFWj_VpdGD8/w-d-xo.html
Muy bueno y super facil de entender, pero por favor, quitale la musiquita, gracias
Gracias por tu comentario :D lo tomaré en cuenta.
Cuando cancelas sale error
Una manera en la que podrías solucionar este problema sería si en lugar de escribir la línea If Ruta = "False" lo reemplazas por If Dir(Ruta) = ""
Mejor power query
disculpa, la musica sobra, basta con tu voz, sorry
Hola!! Sí, tienes razón es que apenas iba iniciando y como que en el 2020 era más común que pusieran música 😅 pero ya dejé de usarla 🙌🙌