VBA: Excel a Word - Crea CONTRATOS, CARTAS, CONSTANCIAS y MÁS automáticamente

[@InteligenciaEficiente]

Los invito a revisar la lista de reproducción dedicada a macros entre Excel y Word 👇 kzbin.info/aero/PLDjlwPQyQjdHmhPvviR2rS1-5xrSOMEZQ

[@erickc9781]

Estimado, me sale el siguiente error: Compile Error: User-defined type not defined y me resalta la fila de Sub crearDoc(datosEmpleado As Empleado) Cómo podría arreglarlo? Muchas gracias de antemano.

[@InteligenciaEficiente]

@@erickc9781 Hola Erick, cuando creas tu tipo de datos datosEmpleado, este debe de ser lo primero que escribas en el módulo de VBA. Cualquier duda puedes contactarme al correo en la descripción. ¡Saludos!

[@InteligenciaEficiente]

@@erickc9781 Hola Erick, cuando creas tu tipo de datos datosEmpleado, este debe de ser lo primero que escribas en el módulo de VBA. Cualquier duda puedes contactarme al correo en la descripción. ¡Saludos!

[@jonatanprieto5856]

Por que me crea la primera carta pero al crear la segunda los marcadores de word dejan de existir y por ende me arroja error de que no encuentra los marcadores en el archivo word, Si me pudieras ayudar seria de gran ayuda saludos

[@schroedereric142]

me salvaste la vida, tenia que redactar 350 informes de desempeño con esto me liberaste para poder estudiar para el siguiente arcial ! muchas gracias!!!!

[@InteligenciaEficiente]

Me da mucho gusto saber eso! Mucho éxito en tu parcial!!

[@diegodechaco]

Gracias por compartir! si quieren que les lea automaticamente la ruta, copien y peguen en la celda C4 la siguiente formula =EXTRAE(CELDA("nombrearchivo");1;LARGO(CELDA("nombrearchivo"))-HALLAR("[";CELDA("nombrearchivo")))

[@InteligenciaEficiente]

¡Muchas gracias por comentar y por tu valioso aporte!

[@luisbarroso4815]

este video me ayudo a resolver un problema que tenia y pude realizar un archivo de excel que me llene 3 documentos de word y los datos los obtiene desde una tabla en excel, ahora me ahorrare demasiado tiempo gracias a ti brother

[@InteligenciaEficiente]

Un gusto leer tu comentario, saludos!! :D

[@luisbarroso4815]

@@InteligenciaEficiente solo tengo una duda, como le puedo hacer para que solo guarde en pdf, ya que lo hago y me edita el documento principal

[@sergiomontelongo8498]

Excelente video de muchisma ayuda, Muchas Gracias!! Me ayudo mucho

[@InteligenciaEficiente]

A la orden Sergio!! :D

[@victorcervantes5063]

Te lo agradezco inmensamente! Y lo mínimo que pude hacer en favor es suscribirme

[@InteligenciaEficiente]

Muchísimas gracias Victor!!

[@zedh90]

Excelente video, me gustó mucho por que esto es una alternativa de la función correspondencia de word. Que lo malo de ahí es que tiene limitado la base de datos que se carga desde excel y si quieres guardar el documento en pdf, te hace un solo documento con todo. Tengo una tarea a realizar para más de 300 registros con cerca de 600 columnas pero creo que mapeando uno me ahorraré todo. Gracias por tu ayuda y espero regresar pronto a la comunidad como me fue. Saludos

[@FlekyVG2]

Muchas gracias por compartir este trabajo , es muy útil.

[@InteligenciaEficiente]

Gracias por tu valioso comentario!

[@losmonteblanco]

¡Muy buena la lección, bastante útil, gracias! Me gustan mucho tus videos tutoriales, por eso me suscribe a tu canal

[@InteligenciaEficiente]

¡Muchísimas gracias por tus valiosos comentarios!

[@josemariacorderoherrera640]

Muchas gracias por compartir su conocimiento. Me ayudará mucho en mis labores.

[@InteligenciaEficiente]

¡Un gusto leer tu comentario!

[@chileno6000]

MUY Bueno, llevaba dias haciendolo de manera artesanal, pasandolos a rtf ejecutando una macro pero nunca tan sencillo como te quedo a ti! como q unificaste 10 videos q vi los ultimos dias en 1

[@oscaromarhernandeztrejo8546]

Excelente! Gracias!!!

[@InteligenciaEficiente]

Muchas gracias por comentar, saludos!!

[@aadrianaam14]

Excelente y muy útil, muchas gracias

[@katerindias6049]

Muchas gracias!!! Eres el mejor !

[@InteligenciaEficiente]

Gracias, saludos!

[@Mauro_gm]

Excelente video, muchas gracias

[@villgathzsteam6385]

Este canal está vivo…..

[@claytonjhordaniliquinzaval4719]

Demasiado Crack, muchas gracias :D

[@InteligenciaEficiente]

¡Gracias a ti!

[@gloriapriegoluque2777]

Muchas gracias por el video. Quería preguntar si es posible hacer varias macros dentro del mismo excel y que tengan botones diferentes, así usar condensar 3 automatizaciones en un único excel

[@eugeniusmagic]

este video esta infravalorado que poquitos likes!

[@kanitorum]

Gracias por tu gran aporte. Podrías darme una idea de cómo podría seleccionar solo una fila o algunas filas para que no sea todo. Gracias

[@InteligenciaEficiente]

¡Hola! podrías aplicar un filtro y después de ello solo hacer que la macro trabaje con las filas visibles con la propiedad xlCellTypeVisible. ¡Saludos!

[@deyvidpalaciosreyes8202]

Excelente video amigo. El mejor que he visto

[@InteligenciaEficiente]

¡Un gusto leer tu comentario! ¡Saludos!

[@danielaguilera2790]

Si pude! Le batalle un poquito pero se logro. Muchas gracias.

[@InteligenciaEficiente]

Excelente! Me da mucho gusto :D

[@stalinbejarano4896]

Muy buen video gracias

[@antonioesquivelmoreno8670]

Excelente, felicidades

[@LuisFernandoJudexSilva]

Excelente Gracias

[@InteligenciaEficiente]

A la orden!

[@gonzalo3956]

Hola, muchas gracias por compartir y enseñar a simplificar nuestras tareas, tengo una pregunta y te agradecería mucho si me puedes ayudar, mi intención es crear una carpeta por cada empleado (el nombre de la carpeta seria el nombre del empleado) que hay en la tabla y dentro de esta carpeta se genere o se grabe unicamente el archivo pdf ? Muchas gracias por tu ayuda

[@sarmyo]

Excelente!

[@mateos7564]

Hola, muchas gracias, ¿se pueden generar varios archivos Excel desde otro Excel?

[@InteligenciaEficiente]

¡Claro que es posible! Quizá pueda platicarme más por mail, puede escribirme al correo escrito en la descripción del video. ¡Saludos!

[@ggmm7463]

gracias bro y si son 2 archivos con textos diferentes en el word pero lo mismos datos de excel, ejmplo que cree un archivo contrato y una constancia, con un solo clic, como agregaria otro word?

[@gersaavedra6168]

Hola. Mi sugerencia es que adiciones dos campos a la tabla datos: carpeta (RUTA) y nombre documento (DOC), y en "Type Empleado" adiciona estos dos datos: Ruta as String, Doc as String. Asimismo, en el For each adicional estos datos.

[@InteligenciaEficiente]

Podrías generar dos suburtinas, una que genere el contrato y otra que genere la constancia, al dar click en el botón llamarás a una macro que ejecutará ambos procesos con el comando Call. www.excel-avanzado.com/10882/que-es-call-en-vba-y-como-se-usa.html

[@movto1]

Buenas, El código da un error 9 en tiempo de ejecución. Subíndice fuera del intervalo. En la línea siguiente Set tablaDatos = ws.ListObjects("Datos")

[@movto1]

Acabo de descubrir el error. No se trata de asignarle un nombre sin más a la tabla DATOS. Como hace con la RUTA y el ARCHIVO. Se trata de crear una Tabla-Tabla, que sí es un objeto. Y después llamarla Datos. Si no, VBA no encentra dicho objeto. Es decir, no podemos crear la tabla sin más, como un RANGO DE DATOS. Hay que poner los datos y a continuación crearlos como tabla. (Es la opción que hay junto al icono de crear Tabla Dinámica (pestaña INSERTAR), pero la que se llama TABLA a secas. Eso sí lo convierte en objeto y entonces sí se puede referenciar desde VBA.

[@InteligenciaEficiente]

Es correcto, te felicito por tu resolución, los errores son algo muy común cuando desarrollamos macros así que el ser autodidactas e investigar el por qué del error nos ayudará a mejorar cada vez más!! Saludos!!

[@MrSalas2012]

para mejorar los tiempos de ejecucion se podra hacer teniendo la plantilla en una hoja diferente en el mismo excel ?

[@InteligenciaEficiente]

¡Hola! Para mejorar los tiempos podrías intentar implementar el comando Application.ScreenUpdating = False y Application.DisplayAlerts = False. Esto hará que la pantalla deje de mostrar el proceso lo que puede ahorrar unos segundos.

[@gonzalolopez8165]

Hola estimado, excelente tu aporte. Mil gracias. Consulta: quiero filtrar 1 sola fila y solo genere ese documento .doc o pdf. Vi abajo que utilizas la instruccion xlCellTypeVisible. Me gustaria saber como se implementa. Probe algunas opciones pegandola en el codigo y me tira un error. Desde ya muchas gracias.

[@InteligenciaEficiente]

Hola Gonzalo, necesitas modificar el código en esta sección:

[@InteligenciaEficiente]

Dim nFila As Range For Each nFila In tabla.DataBodyRange.SpecialCells(xlCellTypeVisible).Rows datosEmpleado.nombre = nFila.Cells(1, 1) datosEmpleado.puesto = nFila.Cells(1, 2) '.... Así con los demás Next

[@gonzalolopez8165]

@@InteligenciaEficiente listo genio!!! ahi en el for Each te falto tablaDatos seria y funciona una maravilla. Mil gracias hermano. Necesito aprender mas sobre esto. Me podes ofrecer un curso para aprender a programar a nivel avanzado? nunca vi visual Basic

[@kleidymonsalve2266]

Buenas noches! Gracias por compartir tus videos.. Tengo una consulta ¿tienes algún video donde expliques como se hace el formulario previo al envío de información a varios documentos en Word?

[@InteligenciaEficiente]

Hola Kleidy, si te refieres a la tabla, aquí te dejo más info sobre como crear una tabla en Excel, saludos!! :D support.microsoft.com/es-es/office/crear-una-tabla-en-excel-bf0ce08b-d012-42ec-8ecf-a2259c9faf3f

[@kleidymonsalve2266]

@@InteligenciaEficiente Muchas gracias por tu respuesta!, pero no me supe explicar, me refiero a como haces la conexión del botón para que se generen los documentos

[@InteligenciaEficiente]

@@kleidymonsalve2266 Me avisas si esta info te ayuda! ayudaexcel.com/como-asignar-una-macro-a-un-boton/

[@kleidymonsalve2266]

@@InteligenciaEficiente Muchísimas graciasss!! Esta información es la que necesitaba :)

[@samaeluis]

hola, excelente video, y cual seria el código para ingresar datos en el encabezado de word

[@InteligenciaEficiente]

¡Hola! Te recomiendo darte una vuelta por este video, en el primer comentario dejo el código de la función para ingresar datos al encabezado de word. ¡Saludos! kzbin.info/www/bejne/jIKyZ4N7msuNi6M&ab_channel=InteligenciaEficiente

[@willyarenas4444]

Gravias por tu apoyo, tengo un inconveniente me sale el error 5174 en tiempo de ejecucion: NO HEMOS PODIDO ENCONTRAR EL ARCHIVO.... cuando ejecuto la macro me sale este anuncio q no encuentra la ruta..q puedo hacer?.

[@jorgeluisugazcabrejos2778]

Hola!, agradecerte por el conocimiento compartido, de verdad que es de mucha ayuda para todos, tengo una consulta en mi tabla quiero agregar imagenes(foto pequeña), y quiero que puedan unirse con el word quisiera saber como podria declarar la variable o cambair el codigo.Hola!, agradecerte por el conocimiento compartido, de verdad que es de mucha ayuda para todos, tengo una consulta en mi tabla quiero agregar imagenes(foto pequeña), y quiero que puedan unirse con el word quisiera saber como podria declarar la variable o cambiar el codigo??

[@InteligenciaEficiente]

¡Hola Jorge! Eso es algo nuevo, la verdad tendría que checar tu caso en particular, puedes enviarme correo a [e-mail] para poder revisarlo. ¡Saludos!

[@kaasimahmed222]

@@InteligenciaEficiente Estos casos por acá están muy interesantes

[@angeldediosrodriguez8352]

Igual me gustaría saber, sé como hacerlo por combinación de correspondencia pero no con marcadores como indics en el video@@InteligenciaEficiente

[@lucky4ever.]

Gracias por compartir, una consulta: si borro el numero 17 de la linea del código resaltado en el minuto 12:00 sucede algo?, que función cumple ese 17?

[@InteligenciaEficiente]

Hola Edgar, ese número corresponde al parámetro wdSaveFormat donde el valor 17 significa que será PDF por lo que es importante tenerlo, también es posible cambiar el 17 por wdFormatPDF ya que tienen el mismo valor o sea wdFormatPDF = 17, te comparto la información sobre los diferentes formatos que se pueden utilizar. docs.microsoft.com/en-us/office/vba/api/word.wdsaveformat

[@lucky4ever.]

@@InteligenciaEficiente muchas gracias

[@danielmendoza6009]

Hola muchas gracias por el aporte, una pregunta hay forma de que genere los documentos pero con filas que se muestre despues de aplicar un filtro de la tabla? básicamente que me genere las filas visibles del documento?

[@InteligenciaEficiente]

Claro que sí, te comparto un ejemplo de un ciclo a través de celdas visibles. Sub SpecialLoop() Dim cl As Range, rng As Range Set rng = Range("A2:A11") For Each cl In rng.SpecialCells(xlCellTypeVisible) Debug.Print cl Next cl End Sub

[@fabiolasalas7605]

@@InteligenciaEficiente Hola! en qué parte de la macro debo agregar este ciclo? también me gustaría generar solo documentos de lo que se vea después de agregar un filtro

[@LeonelRFF]

¿Es posible hacer eso para informes en los que tenga muchas fórmulas (cada una depende de la anterior) con el desarrollo completo hasta el resultado?

[@InteligenciaEficiente]

Sí es posible, porque solo se estaría tomando el valor del resultado de cada celda :)

[@LeonelRFF]

@@InteligenciaEficiente¿incluso si las fórmulas son en látex?

[@jienifferbarrueto5381]

Hola que tal, una consulta, tengo en una celda un aprox. a 100 palabras (items) y quiero pasarlo a un marcador en word pero no me permite copiar todo solo unas cuantas lineas, me podrías ayudar?😊

[@InteligenciaEficiente]

¡Hola! Claro que sí, puedes modificar el código de la subrutina FindAndReplace para que reemplace textos más extensos: Sub FindAndReplace(strSearch As String, strReplacement As String, doc As Word.Document) Dim wdStoryRange As Word.Range For Each wdStoryRange In doc.StoryRanges With wdStoryRange .Find.Text = strSearch Do While .Find.Execute .Text = strReplacement .Collapse wdCollapseEnd Loop End With Next End Sub

[@LeyendasArcade]

si tengo un formulario en excel, se puede crear el boton de imprimir y que ejecute este ejemplo?

[@InteligenciaEficiente]

¡Hola! sí es posible, saludos!!

[@jano436]

Hola como estas, tendras algun video donde te pueda generar un solo doc con cada fila de excel? porfa

[@InteligenciaEficiente]

¡Hola! Muchas gracias por comentar, actualmente no cuento con un video pero lo añadiré a la lista. ¡Saludos! Puedes contactarnos al correo en la descripción para asesorías o desarrollos personalizados. :D

[@eugeniusmagic]

Que pro!

[@joelballesta3334]

Hola, una consulta, cómo puedo hacer para que la macro aparte de que me tome los valores me pegue una tabla en cada archivo o que cuando se esté pegando en los datos en el archivo base enseguida me pegue una tabla. Muchas gracias

[@InteligenciaEficiente]

Hola Joel, tengo un video para las tablas. Te recomiendo revisarlo. ¡Saludos! kzbin.info/www/bejne/ooPQh36cn9GXf7c

[@MisaelEstrafa99]

Hay forma de evitar cambiar la ruta a cada rato o hacer que la ruta sea según donde este almacenado. Saludos

[@InteligenciaEficiente]

¡Hola! Claro, con ThisWorkbook.Path estarás referenciando a la ruta actual del libro de Excel. ¡Saludos!

[@fernandopalacios-m5h]

como le hago para que solo me genere el documento dependiente de los registros que tenga en la tabla es decir si filtro la informacion de la tabla y solo tengo una fila solo genere un documento y si filtro y ahora tengo 5 solo genere los documentos de los datos que tenga filtrado

[@gesa401]

Muchísimas gracias, tu video me ha ayudado a intentar hacer algo similar, solamente que tengo un problema, en mi tabla de Excel quiero que haya celdas celdas ocultas pero al momento de generar el documento de Word, los datos de estas celdas ocultas no se visualizan, ¿sabrías como poder hacer que los datos de las celdas ocultas también se tomen en cuenta al generar el documento de Word?

[@InteligenciaEficiente]

Hola Gellert! Podrías mandarme un correo con tu macro a [e-mail] para ver cómo puedo ayudarte con ello. Saludos!! :D

[@kaasimahmed222]

@@InteligenciaEficiente Cual fue la solución??

[@kevinvenegas6726]

Hola! tus videos me sirven muchisimo, tengo una duda. Yo quiero que se genere una carta en el mismo documento de word (una por cada pagina) por cada fila en el excel. No deseo que se guarde en documentos aparte cada fila sino que se guarde todo en un solo documento. Como podria ahcer eso?

[@InteligenciaEficiente]

Hola Kevin, tendías que modificar un poco la lógica de la macro. No es algo que pueda ponerte en un comentario ya que hay que cambiar varias cosas, puedes contactarme al correo en la descripción para revisar este detalle, saludos!!

[@tommyduran1566]

Buenas tardes cordial saludos desde Colombia. ¿Dónde se podría conseguir ese código de programación? Muchas gracias

[@InteligenciaEficiente]

Hola Tommy, en la descripción del video puedes descargarlo, saludos!!

[@jennymejia3463]

Una consulta si la lista de datos que tengo no esta en filas, sino por el contrario esta en columnas como seria la formula para que tome el rango hacia la derecha?

[@InteligenciaEficiente]

Hola Jenny, habría que hacer unos pequeños ajustes para que el recorrido sea por columna y no por fila, si gustas puedes compartirme tu macro al correo que dejo en la descripción y con gusto te ayudo :D

[@nicolevanessagomezbeltran1219]

Hola! muchas gracias Intento ejecutar la macro pero se me presenta un error "9" en tiempo de ejecución, ya intente solucionarlo de una y mil formas pero nada funciona. Puedes ayudarme por favor

[@InteligenciaEficiente]

Hola Nicole, puede enviarme su macro a [e-mail] para verificarla a detalle. ¡Saludos!

[@villgathzsteam6385]

En correspondencia Si quisiera hacer en Word con una tabla, con el fin llenar varias celdas de dicha tabla, en relación a un solo dato extraído de un Excel , que coincide con toda la información de la tabla del Excel, ejemplo una fecha, y que llene automáticamente la tabla del word, todos aquellos datos tales como nombre , modelo , precio, color, ubicación, etc que tiene la fecha en común Se pueda enviar al Word en control de correspondencia. ¿Como puedo hacerlo.?

[@InteligenciaEficiente]

¡Hola! Esto es una necesidad muy particular, podríamos revisarlo en una sesión de asesoría personalizada si gustas. Puedes enviarme correo al mail en la descripción. ¡Saludos! :D

[@ricardouculmanaquispe453]

Excelente. Solo que la sintaxis en VBA cambia para las versiones más recientes de Excel. Por otro lado, cuando son una gran cantidad de archivos, la macro demora en ejecutarse :/

[@InteligenciaEficiente]

Hola Ricardo, ¿Me podrías decir qué cambios pudiste notar en la sintaxis de VBA? Quizá de esa manera podríamos saber qué es lo que ha cambiado ya que esta macro la he trabajado en Excel 2010, 2016 y 365 sin cambios. Sobre el tiempo de procesamiento es posible que demore, pero aún así será menor que hacerlo manualmente. ¡Saludos y gracias por comentar! :D

[@qfbirazufm]

Buen día, excelente video, tengo una duda, cómo le puedo hacer para que en un solo archivo de Word queden las constancias de los trabajadores 1 a 4 con su respectiva información. Muchas gracias de antemano.

[@InteligenciaEficiente]

Se me ocurre que se puede tener una etiqueta por cada trabajador como NombreTrabajador_1, NombreTrabajador_2 , etc. Saludos!

[@GeoEnergyGreenMinning1000]

Simplemente haces una combinación de correspondencia, y al finalizar escoges la opción guardar como documentos diferentes, y te los guarda en un sólo archivo. No requiere macro.

[@eugeniusmagic]

Hola! tengo office 2016 y sirvio genial, pero al colocarlo en la lapto de un colega con office 2010 y la version de libreria 14, tengo un problema al crear el Word , se tranca aqui " Set objWord = New Word.Application"

[@InteligenciaEficiente]

¡Hola! En la máquina con Office 2010 puedes cambiar las declaraciones de los objetos de la siguiente manera: Dim objWord As Word.Application ---> objWord As Object Set objWord = New Word.Application ---> Set objWord = CreateObject("Word.Application") Si deseas una asesoría más personalizada no dudes en contactarme a mi correo: [e-mail] ¡¡SALUDOS!!

[@eugeniusmagic]

@@InteligenciaEficiente el lunes comento como me fue, en serio muchas muchas gracias

[@eugeniusmagic]

@@InteligenciaEficiente Hola! Me dieron otras tareas y no habia podido probar con este codigo, paso bien el objWord As Object pero luego se tranco en la siguiente donde le dice que abra el word... vamos a actualizar el microsoft office para que tenga la libreria mas actualizada. Gracias! 😅

[@260789Naty]

Buenas tardes, por favor su ayuda al poner el . para colocar bookmarks en el código no aparece en las opciones que despliegan

[@InteligenciaEficiente]

Hola Karen, pide deberse a que no está habilitada la Referencia a Microsoft Word Object Library como se muestra en el video.

[@crisfueyo9400]

Nunca he trabajado con VB y probablemente esto sea muy básico pero he copiado la macro cambiando los datos para adaptarlos a mi Excel y me da un error en Dim datosEmpleado As Empleado. Tengo que tener declarado datosEmpleado en algún otro lugar?

[@InteligenciaEficiente]

Hola! Podías enviarme tu archivo a mi página de fb y con gutso te ayudaré: facebook.com/InteligenciaEficiente/

[@ronaldayalahuarachi2130]

Muy bueno

[@hernandezjxs]

Hola como puedo hacer para que me genere un solo archivo de word y/o pdf con todas las cartas y no por separado

[@InteligenciaEficiente]

Hola Jesús, quizá una manera en la que no tengas que modificar tanto el proceso actual sería que al final unieras todos los documentos en uno solo. Si deseas una asesoría o un desarrollo más personalizado puedes contactarme al correo en la descripción. ¡Saludos!

[@melchorluisalbinojusto1039]

Mi estimado... con mi saludo previo... quiero hacerle una consulta.... que generar los contratos pero de manera individual y NO masivamente.... ¿como hago??

[@InteligenciaEficiente]

Hola Melchor, quizá este video te pueda servir: kzbin.info/www/bejne/aonOaaWJiNp7j8Usi=i8OIZDkBZQmiPT1R

[@johnfabergalvezmorales665]

Hola, muchasa gracias por el valioso aporte. Al ejecutar la macro se genera un error "13" en tiempo de ejecucion: no coinciden los tipos. Puedas ayudarme por favor. Gracias

[@InteligenciaEficiente]

Hola John, puedes enviarme un correo mostrándome más detalles del error que te aparece a: [e-mail]

[@guitarslongavitabrevis9575]

Está genial, pero lo intente con un equipo que tiene el word 14 en las referencias y no funcionó, que tendría que camiar del código? O no funciona para librerías anteriores a Word 16. Saludos...

[@InteligenciaEficiente]

Hola! Solo tendrías que buscar en Herramientas >> Referencias >> Microsoft Word 14.0 Object Library y marcar esa casilla para que pueda funcionar, saludos!

[@guitarslongavitabrevis9575]

@@InteligenciaEficiente Resuelto muchas gracias... excelente canal...

[@diegoeduardovelascoruiz1509]

Buenas tardes, primero muchas gracias por el aporte me es de gran utilidad para mis actividades, sin embargo quiero generar una nueva variable o dato para generar un poco mas automático el tema, tengo cuatro documento diferentes, por lo quiero que en lugar de que genere el documento por una celda especifica quisiera que se genere por una lista de nombre (fila), no se si sea posible con el fin de que genere en automático 4 diferentes archivos en base a la celda que corresponda a la columna ejemplo: diego debe de generar constancia con el formato uno; Jorge con la constancia dos, Jesus con la constancia tres, Victor con la constancia uno, diana con la constancia tres, etcétera.. espero me puedan ayudar.

[@InteligenciaEficiente]

Hola Diego, claro que se podría, tendrías que agregar un condicional para que dependiendo el caso trabaje en diferentes plantillas, si gustas una asesoría más personalizada puedes mandarme más detalles a mi correo: [e-mail]

[@kaasimahmed222]

@@InteligenciaEficiente Un video de esto, estaría perfecto Ya se subió?

[@EdgardGi]

Man una consulta pero en donde escribo esos procedimientos, me pide public en vba???

[@InteligenciaEficiente]

¡Hola! Este código se escribe en un nuevo módulo de VBA.

[@ladyleon2409]

Buenas noches, acabo de replicar el ejercicio. Me sale este error: error en intervalo de ejecución y se sombrea en amarillo esta linea Set ws = ThisWorkbook.Sheets("Principal"). Ayuda por favor para entender que pude hacer mal

[@InteligenciaEficiente]

Hola!! Debe ser porque no tienes una hoja en tu libro de Excel que se llame Principal, es muy importante que el nombre no contenga espacios.

[@antoniaarpon5326]

Hola muchisimas gracias por el video pero hago tal cual el proceso como lo realizas pero al ejecutar me da error en Sub crearDoc(datosEmpleado as Empleado) porfa tu ayuda para solucionarlo

[@angeldediosrodriguez8352]

Lograste resolverlo? me da el mismo error a pesas de ponerlo al principio de todo el módulo :/

[@cristhiangarijaramillo3147]

este ejemplo lo puedes hacer en lugar de exel con access

[@InteligenciaEficiente]

¡Claro que sí, de hecho pienso mejorarlo y posteriormente lo escalaré a otras herramientas como Access!

[@cristhiangarijaramillo3147]

@@InteligenciaEficiente si xq quisiera saber hacer esl mismo con access

[@deedeeramon6783]

Hola, buenos días, intento ejecutar la macro en mi automatización pero me dice "Error en la ejecución de servidor " o también error '5174" porque no ha podido encontrar el archivo Chequé la ruta , el nombre de la hoja de Word pero están correcto, no entiendo qué pasa, les agradecería mucho si me podrían ayudar, por favor

[@InteligenciaEficiente]

Hola, por favor verifica que hayas agregado un "\" al final de la celda C4 donde escribes la ruta de la carpeta. Me platicas si con eso ya funciona, saludos!!

[@deedeeramon6783]

Muchisimas gracias, ya lo puede resolver !!!! 💖😊😊😊

[@mariainesvillalobosreyna2495]

Hola! Al querer correr la macro aparece el error 4198 command failed en la fila de Set objDoc, revise todo y está igual que en el video ¿alguien sabe por qué otra razón se puede dar este error?

[@InteligenciaEficiente]

¡Hola María! El error 4198 no es muy específico por lo que te puedo apoyar si me compartes más información a mi correo electrónico, el cual podrás encontrar en la descripción de este video. ¡Saludos!

[@scarlethmendoza5474]

Hola, muy buen vídeo! tengo una pregunta, me sale error 91, y revise todo y esta justo como lo explicaste, me podrías ayudar a revisarlo? ya te envié el correo con el Excel, gracias previas.

[@InteligenciaEficiente]

Gracias Scarleth, seguimos en contacto!

[@yampiergordillo1706]

Muy buenas tardes, disculpe como se puede realiza el procedimiento pero pegando una tabla completa a un documento word

[@InteligenciaEficiente]

¡Hola! Agregando estos comandos puedes lograrlo: Dim tabla As Range Set tabla = Worksheets("TuHojaAqui").UsedRange tabla.Copy objDoc.Application.Selection.Range.PasteExcelTable LinkedToExcel:=False, WordFormatting:=False, RTF:=False Si requieres algo más sofisticado no dudes en contactarme: facebook.com/InteligenciaEficiente/

[@yampiergordillo1706]

@@InteligenciaEficiente Muchas gracias amigo, me fue de mucha utilidad, funciona excelentemente, aunque quisiera saber si existe alguna manera de poder reemplazar el marcador de la hoja de word por la tabla seleccionada en excel

[@juanmiramontes990]

hola muchas gracias por compartir su conocimientos, estoy teniendo un Error con esta linea (objDoc.Save2 filename :=...)) me tira el (Error Tiempo de ejecución Error 5152 Este no es un nombre de archivo válido cuando..) estoy usando la librería microsoft word 15 object library... como podría solucionarlo. intente varias maneras pero no me funciono.. desde Muchas Gracias

[@InteligenciaEficiente]

Hola Juan, verifique que la ruta que esta después de filename de verdad es una ruta válida, seguramente está cometiendo un error al definir esa ruta. Si necesita alguna asesoría más personal puede escribirme a [e-mail] ¡¡Saludos!!

[@carlosalbertolealgemade7947]

Hola como estas, excelente tu aporte me suscribi a tu canal, por algun motivo en esta linea al ejecutar la macro me genera error Set tablaDatos = ws.ListObjects("Datos"), cuando ubico el cursor encima me dice lo siguiente: ws.ListObjects("Datos)=, agradecería me indicaras en donde esta mi error

[@InteligenciaEficiente]

Hola Tocayo, me podrías mandar tu archivo por mensaje de facebook a la página para poder revisarlo con mayor detalle? Saludos! facebook.com/InteligenciaEficiente

[@alondraleonelaeliasamaya814]

Hola, Buenas tardes. Una consulta, a mi también me sale ese error, me podrían indicar a qué se debe. De antemano muchas gracias.

[@valentinapazastete788]

Me aparece el mismo error, lograste solucionarlo?

[@escanornanatsu8126]

Seguimos esperando respuesta

[@movimientoclub2483]

Buenas tardes, Muy buen video, tengo una consulta, me sale un mensaje de Error de compilación: El uso de la propiedad no es válido y en el visual basic me señala en amarillo Sub crearDoc(datosEmpleado As Empleado), me podrías ayudar porfavor, te lo agradecería un montón.

[@InteligenciaEficiente]

¡Hola! Debes tener algún error en el código, te recomiendo revisarlo minuciosamente, si continúas con problemas puedes enviarme tu macro al correo: [e-mail] ¡SALUDOS!

[@movimientoclub2483]

@@InteligenciaEficiente te lo acabo de enviar, ojalá puedas ayudarme, de antemano muchas gracias.

[@InteligenciaEficiente]

@@movimientoclub2483 Listo, me cuentas cómo te va :D

[@gassancarlos9497]

AYUDA!! ME MARCA ERROR EN objWord As Word.Application dice que tipo no definido por el usuario, no se que hacer!!!

[@gassancarlos9497]

Y si tengo seleccionado las herramientas de word 16

[@InteligenciaEficiente]

Hola! Puedes enviarme tu macro a [e-mail] para revisarla a detalle, saludos!

[@adriancontreras-ceron3023]

Buenas noches, muchas gracias por el video, me sirvió mucho, sin embargo estoy bloqueado, porque en la parte del encabezado de texto esta macro no lo modifica. ¿Me podrías indicar como hacerlo o podrías hacer un video explicando esta situación? Si es el caso te puedo compartir lo que quiero hacer. De nuevo gracias

[@InteligenciaEficiente]

Hola Adrián, el comentario de hasta arriba modifica la función buscar y reemplazar para que también modifique los encabezados :D

[@Almaoj]

tengo un Error en "For each fila in tablaDatos.ListRows" la palabra dato la tengo que cambiar por lo que yo tengo en mi hoja de excel? en mi caso, todo los datos de la tabla se llaman "Tabla1"

[@InteligenciaEficiente]

¡Hola! Así, es, necesitarías establecer el nombre correspondiente. ¡Saludos!

[@Almaoj]

@@InteligenciaEficiente lo otro el documento WORD a usar como base, no puede estar con Autoguardado?

[@InteligenciaEficiente]

@@Almaoj Hola!! Sí, si el documento ya está configurado como autoguardado no hay problema.

[@aerg1605]

Como puedo hacer para que el archivo word se guarde en otra direccion(carpeta del pc) diferente a donde esta el archivo original?

[@InteligenciaEficiente]

Hola Alejandro, necesitas cambiar el parámetro Filename:= del método SaveAs por la nueva dirección por ejemplo: C:\Users\carlo\Downloads

[@Camilocetina]

Cómo sería para pasar una inagen

[@edwinmarinchiguasuque]

[@pistasdebluex]

hola me gusta que bien explicas!, una pregunta me puedes decir por que este error --> no se ha definido el tipo definido por el usuario Sub crearDoc(datosEmpleado As Empleado) Dim objWord As Word.Application

[@ChrisReategui07]

Pudiste solucionarlo? me salió lo mismo

[@InteligenciaEficiente]

Hola! Parece que no está habilitada la librería MS Word Object Library, en el minuto 3:00 explico cómo habilitarla :D

[@alexmunoz4340]

@@InteligenciaEficiente tengo el mismo error y aun habilitada la librería MS Word Object Library.

[@gustavogrosso3273]

Excelente video!! solo tengo un problema: al guardar el archivo, me sale en formato L, como lo puedo solucionar?

[@InteligenciaEficiente]

Hola Gustavo. ¿A qué te refieres con formato L?

[@oscardiaz6591]

Me aparece el error de Run-time error '9': Subscript out of range Que podria hacer en ese caso? Saludos

[@InteligenciaEficiente]

¡Hola Oscar! Si necesitas asesoría personalizada con gusto puedes escribirme a: [e-mail]

[@oscardiaz6591]

Y como vinculaste el boton de crear documento?

[@InteligenciaEficiente]

Te comparto todos los detalles: support.microsoft.com/es-es/office/asignar-una-macro-a-un-formulario-o-un-bot%C3%B3n-control-d58edd7d-cb04-4964-bead-9c72c843a283

[@williamtovar4598]

Pregunta, si quiero repetir 2 mismos nombres, solo me sale el primero que vincule

[@InteligenciaEficiente]

Como está esta macro habría que desarrollar 2 campos distintos para cada nombre aunque sean del mismo valor pero te comparto este otro video donde se hace el reemplazo de otra manera más eficiente. kzbin.info/www/bejne/jIKyZ4N7msuNi6M&ab_channel=InteligenciaEficiente

[@benjaminlopez7333]

Hola, esta muy bueno el contenido, pero cuando acomodo el codigo a mis archivos, me arroja error 91 'Variable de objeto o Bloque With no establecido'

[@InteligenciaEficiente]

¡Hola Benjamín! Para poder ayudarte puedes enviarme tu macro al correo que está en la descripción del video. SALUDOS.

[@andreinafernandez9539]

A esto se le podrian agregar imagenes? Tengo que generar documentos automaticos que incluyen tablas de presupuestos y no se como hacerlo :(

[@InteligenciaEficiente]

subiré pronto un video para las imágenes :D

[@RicardoSilvaYescas]

Como puedo solucionar el error (9) subíndice fuera del intervalo

[@Qurakuna]

me sale lo mismo :(

[@maximoarias835]

Una duda y como hago para generar solo un archivo de una persona en especifico y no de todos al mismo tiempo

[@InteligenciaEficiente]

¡Hola! Te comparto este otro video donde solo se hace el traslado a un solo documento. kzbin.info/www/bejne/aonOaaWJiNp7j8U

[@pk2k2]

Enorme. Lo único: no queda claro cómo nombras la tabla, a mi me da un error de tipo '9' ( Set tablaDatos = ws.ListObjects("Datos") '----> Nombre de la tabla con los datos )

[@InteligenciaEficiente]

Tienes razón, es una tabla. Te comparto más información sobre cómo cambiarle el nombre. support.microsoft.com/es-es/office/cambiar-el-nombre-de-una-tabla-de-excel-fbf49a4f-82a3-43eb-8ba2-44d21233b114

[@vanessamacias6879]

Hola, porfa ayúdame, me sale error 7 memoria insuficiente. ¿Es algo de mi computadora o en excel?

[@InteligenciaEficiente]

Hola Vanessa, puedes contactarme al correo en la descripción para ayudarte con este tema.

[@joanafandino4761]

Hola! me genera el siguiente error "se ha producido el error 9 en tiempo de ejecución: Subíndice fuera de intervalo y el depurar se coloca en amarillo "Set tablaDatos = ws.ListObjects("PruebaD")" me podrías ayudar. 😐

[@InteligenciaEficiente]

Hola Joana, con gusto! Si te manda ese error es porque no encuentra la tabla llamada pruebaD, en este link puedes ver las instrucciones para nombrar una tabla en Excel. ¡Saludos! :D support.microsoft.com/es-es/office/cambiar-el-nombre-de-una-tabla-de-excel-fbf49a4f-82a3-43eb-8ba2-44d21233b114

[@joanafandino4761]

@@InteligenciaEficiente Gracias 🤗 la termine y funciona perfecta!!!!

[@lisetpalacio9019]

Ayuda algo estoy haciendo mal la macro no me funciona y sale depurar,, finalizar, ayuda

[@InteligenciaEficiente]

¡Hola! Con gusto puedo apoyarte, puedes contactarme por correo a la dirección que dejo en la descripción del video para poder revisarlo a detalle. ¡Saludos!

[@sebastianmuneramarin249]

Como llevar los datos con formato del excel a word?

[@InteligenciaEficiente]

Hola Sebastian, haré un video muy pronto sobre ello :D

[@pistasdebluex]

si estaba mal escrita --> .Bookmarks

[@guitarslongavitabrevis9575]

Y si quisiera imprimirlos... como lo haría?!!!

[@InteligenciaEficiente]

Hola, te comparto más información sobre cómo imprimir los documentos usando VBA: excel-macro.tutorialhorizon.com/vba-excel-open-and-print-the-word-document/

[@guitarslongavitabrevis9575]

​@@InteligenciaEficiente de nuevo muchísimas gracias por tu ayuda

[@AngeliroR]

Y COMO LE ARIA PARA QUE SE APLIQUE POR CONDICIONAL SOLO PARA QUE CREE A LOS QUE CUMPLAN UN CRITERIO

[@InteligenciaEficiente]

con la sentencia IF seguido de la lógica que desees implementar. ¡Saludos!

[@elisaflores9297]

Excelente amigo! Necesito insertar cantidades en moneda Ejemplo: $2,500.50 Al poner las cantidades se importan sin comas ni símbolo de pesos, alguien me puede ayudar?

[@InteligenciaEficiente]

Hola Elisa, para poder conservar el signo de pesos debes hacer una modidicación al código agregando .Text al final en la siguiente sección para que se vea así: datosEmpleado.nombre = fila.Range(1, 1).Text '

[@hernanlionelGRAMAJO]

como hiciste eso en excel.. es un macro... perdon por mi inexperiencia

[@InteligenciaEficiente]

¡Hola! Así es, este proceso se logra con macros de VBA. Te invito a revisar mi canal ya que tengo muchos desarrollos parecidos. ¡Un saludo!

[@Gloriannys]

me da un bug con esta parte " Set objDoc = objWord.Documents.Open(rutaCarpeta & nombreDoc)" no pasa por ahí

[@InteligenciaEficiente]

Hola Gloria, quizá los valores que asignaste a rutaCarpeta y a nombreDoc no están definidos correctamente.