Hola amigos del foro. estoy realizando una macro en excel en donde tengo mi base de datos de N registros y quiero pasarlo a un formato de word ya predeterminado y que vaya poniendo aleatoriamente los datos de excel en word y guarde el word en una ruta, lo q pretendo hacer es que se realice masivamente la informacion de excel a word. este es un codigo que estoy utilizando pero este lo hace uno por uno y no guarda el word cuando lo crea espero me puedan orientar para poder realizar este trabajo. Sub exportaraword2() Dim datos(0 To 1, 0 To 4) As String '(columna,fila) patharch = ThisWorkbook.Path & "\Plantilla ASF.docx" Set objWord = CreateObject("Word.Applica…

Buenas tardes, agradeceria vuestra ayuda. Utilizo hasta ahora una macro que envia un rango de excel en pdf por outlook, la cual, enviaba el mismo pdf a todos los emails de una columna. Ahora lo que necesito es mandar el pdf pero a cada email, modificando cada vez la celda A1 por cada Id de la columna, para que asi se genere un pdf para cada id. La idea es que antes se mandaba un cuadrante a todo el mundo (1 pdf a todos los emails), y ahora quiero enviar el que corresponde a cada uno.(1 pdf a cada email) Imagino que se hara por un bucle, pero no se como insertarlo en la macro. Muchas gracias Calendario1.xlsm

Hola, buenos días. Realmente he buscado en varios foros, antes de hacer la pregunta. Quisiera saber si me podrían ayudar con un problema que he tenido estos días de la nada... Digo de la nada, por que al parecer, se han hecho unos cambios de versiones de servidores, que en teoría no iban a generar problemas. Tengo un script en Excel, donde hago una consulta SQL Server, y extraigo información en base a fechas de entrada... Sin embargo, de la nada ha dejado de funcionar cuando lo ejecuto desde Excel, pero si lo hago desde un IDE de SQL Server se ejecuta perfectamente. Mi VBA es el siguiente: With Me CFechaI = Format(CDate(.ComboBox1.Value & "/"…

Buneos dias y muchas gracias de tod@s de antemano, tengo una base de datos de personal en la cual tienen asignado un puesto de trabajo asi como un material que se le asigna , me gustaria que cuando finalicen su periodo de trabajo el mateiral asignado , casco, chaleco, linterna, taquilla, se les quitaran y aparecieran como que estan disponibles para poder asignarlos a otra persona. pero si me gustaria que los datos de la persona permanecieran , sin tener asignado material. Muchas gracias por vuestra ayuda. tabla de material.xlsx

Cordial saludo, Requiero su valiosa ayuda para solucionar lo siguiente: En una hoja tengo varias columnas con muchas filas, cada fila contiene 6 valores entre 1 y 60 lo cual represento con el ejemplo del archivo adjunto. Lo que necesito poder lograr a través de código VBA de excel es que en una hoja aparte pueda digitar valores al azar que están en dicha muestra y que con ello el sistema me muestre en esta misma hoja las filas que contienen 5 o 6 valores comunes a los indicados en lo digitado indiferente de la columna en la que se encuentre cada uno de los valores. Remito adjunto ejemplo explicando lo que se necesita. agradezco a quien me pueda ayudar. gracias. bus…

hola todos tengo dos reportes uno administrativo y otro individual en ambos reportes puse un boton para imprimir, que primero oculta las tres primeras filas y luego seleccionar la impresora a usar para imprimir y luego imprime toda la hoja luego muestra las filas ocultas, eso funcionaba muy bien hasta que empece a proteger las hojas en las macros pongo antes y despues ActiveSheet.Unprotect "ulloa" ActiveSheet.protect "ulloa"[/CODE] pero me genera problemas porque me sale un mensaje diciendome que no puede asignar o cambiar la propiedad hidden de la clase Range me muestra el problema en esta linea [CODE]Selection.EntireRow.Hidden = False[/CODE] probe mostrar la…

Hola a todos. Me gustaría saber si es posible que tras abrir el libro de excel, sólo se muestre la cinta de menu y el cuerpo de las hojas queden ocultas.

Saludos colegas. En la universidad usamos bastante la modelacion de tranporte (costo mínimo, esquina noroeste) mediante el uso de solver. Perdemos bastante tiempo por cada modelacion y formulacion por ejercicio, la propuesta es crear una macro que ahorre y optimice procesos pero en el tema de macros estoy bastante crudo, acudo a uds. este es un ejercicio que hemos realizado. Debemos tener en cuenta que para cada modelo de transporte, se debe definir -la cantidad de puntos de origen y la cantidad de destinos -costos de cada producto Analizando al momento de realizar la macro me parece que el mejor metodo de desarrollo sea el costo mínimo, pero no tengo idea de …

hola amigos buen dia construyo una base en acces que se alimenta a traves de un formulario de excel , y llege un punto que no he podido solucionar, y es que deseo extraer datos unicos de una tabla de acces a un listbox de excel y pues este es el codigo que utilizao, Call conexion Set rs = New ADODB.Recordset With rs .CursorLocation = adUseClient .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open "BDFOLIOS", cnn, adOpenKeyset, adLockOptimistic, adCmdTable End With For a = 1 To 130 If rs.Fields("FACTURAPOST") <> "" And rs.Fields("ESTADOFACTURACION") = False Then combo1.Add CStr(rs.Fields("FACTURAPOST").Value) End If rs…

Me pueden ayudar con esta macro por favor lo que hace es enviar correos automáticamente, me costó mucho realizarla ya que para esto no sabía casi nada de programación con Excel, mi problema es que me pidieron que si hay un pago o cobro con un mismo intermediario el correo me arroje esa X cantidad de pago y si hay varios cobros con el mismo intermediario que haga lo mismo, no sé cómo hacer esto ya que soy novato en vba (solamente los que tengan tipo compensación, los físicos "No") Ejemplo si en la columna intermediario existen celdas con este nombre BancoDeChile y en la columna pago hay valores, que esos valores los ponga en el correo. Adjunto el archivo, para …

Buenas Tengo una excel a la que le inserto datos a través de un formulario, y los datos pueden modificarse a través de otro formulario. El problema es que uno de los campos es un listBox multiselección que al insertarlos datos los coloca en una celda separados por ",". Pero al recuperar los datos no consigo que el listbox queden esos datos seleccionados al cargarse. ¿Podeis ayudarme? Sub modificardat() On Error GoTo ErrorHandler 'recuperamos el indice de control de la solicitud indice = SelecionarDatoForm.ListBox1.Value Unload SelecionarDatoForm 'borramos los datos de la hoja 3 Worksheets("Hoja2").Range("A1:P" & Ult).Delete …

Adjunto un archivo zip con un formulario basico para enviar mail desde excel para cuentas de gmail. En el botón "enviar" no sé como insertar ni donde la línea de código para permitir enviar archivos adjuntos. ¿Alguien puede ayudarme? Gracias por adelantado. Borja enviar email.zip

Estoy intentando realizar un menu de enlace a dos aplicaciones ya creadas pero me surge el problema de que se queda una aplicación abierta oculta y no consigo encontrar la manera de solucionarlo. Andrés Prueba.rar

Buenas tardes, Estoy creando en un libro de excel la contabilidad domestica y necesito una macro que copie los datos de una hoja llamada Registro a las hojas que corresponda cuando llege la fecha indicada se anoten en la hoja que correspondiente y la fecha que cambie al mes siguientey asi sucesivamente con todos los registros de la hoja . Espero que me haya explicado bien. No puedo subir archivo porque es muy grande[ATTACH]45516[/ATTACH] Muchas gracias ,

Buenos Días: Alguien me podría ayudar para guardar un archivo completo con una macro, tenía para guardar una hoja pero quiero guardar todo el archivo. Option Explicit ' Sub EXCELeINFOGuardarHojaComoArchivoNuevo() ' Dim VentanasProtegidas As Boolean Dim EstructuraProtegida As Boolean Dim NombreHoja As String Dim Confirmacion As String Dim NombreArchivo As String Dim GuardarComo As Variant Dim Extension As String ' On Error GoTo ErrorHandler ' VentanasProtegidas = ActiveWorkbook.ProtectWindows EstructuraProtegida = ActiveWorkbook.ProtectStructure ' If VentanasProtegidas = True Or EstructuraProtegida = True Then MsgBox "No se puede ejecutar el comando c…

Muy buenos dias! Necesitaria la ayuda de los que mas saben, ya que tengo un problema con una Macro y no le puedo encontrar la vuelta! La cuestion es esta: Necesito una Macro que le envie informacion a cada cliente que se encuentre en cada hoja (el nombre de cada hoja es "Cliente 1", "Cliente 2" etc etc). El mail al que se lo debe enviar es el que se encuentra en la celda C3 El Subject es el que se encuentra en la celda C4 El cuerpo del mail es el que se encuentra en la celda C5 Como archivo adjunto que se envie la hoja completa (por ejemplo "Cliente 1") Ahora un dato importante, si el cliente no tiene compras ergo la celda C6=0, necesitaria que no se le envie nada.…

Hola amigos Os cuento, con el fin de agilizar un poco mi trabajo, he creado un libro para asignar codigos de datos en diversas hojas, abajo os dejo el ejemplo. Dentro del libro hay una combobox con el título de posición que carga una serie de datos en la Columna A de la hoja 1, y una serie de botones para copiar estos codigos en las hojas 2 y 3 respectivamente. sin embargo me he quedado estancado en los siguientes puntos: -Al pulsar el botón escribir, eliminar dato de la combobox "posición" Me gustaría poder eliminar los datos según se añadan para evitar equivocaciones con datos repetidos -Cargar en las combobox de hojas todos los datos a partir de la palabra "Rec…

Hola buenos días, necesito vuestra ayuda, es urgente. Os explico, cada dia incorporo unos datos en una hoja excel mediante la formula solver, me resuelve una ecuacion en fuincion de varias restricciones. El resultado es correcto, lo que yo quiero hacer es automatizar el solver con alguna macro para que yo, cuando introduzca los datos me los resuelva automaticamente sin tener que darle al solver ni poner los datos ahi. Los datos que van al solver son los siguientes: Establecer Objetivo: N8 Cambiando las celdas de variables: E8 Sujeto a las restricciones: H8<=$G$3 (G3 no quiero que me cambie en ninguna fila) J8>=$G$2 (G2 no quiero que me cambie en ninguna fila) …

Buenas Estimados, Tengo un archivo Excel para generar cotizaciones en diferentes hojas, con ayuda de unos expertos pude lograr que me imprima varias hojas del Excel desde un formulario que se encuentra en la primera hoja, mi problema es que quisiera que las diferentes hojas de la cotización se impriman una debajo de otra de acuerdo a como da el tamaño de la hoja (A4) y no por separado como actualmente lo hace, además quisiera que imprima un encabezado que quiero agregarle en otra hoja, no puedo ponerlo ahora porque lleva una imagen y sería muy pesado, de todos modos si logró hacer lo primero estaría muy feliz. Adjunto el archivo para mejor visualización. Muchas Gracias …

Hola, muy buen día, disculpen tengo un problema, esque ya tengo una macro que le envia correos automáticos a clientes, pero el problema es que a la hora de pasar los datos que se encuentran en la hoja llamada "Envios", a la hoja llamada "Datos" (que es donde se encuentra la macro para enviar los mails), lo hago todo con fórmula y me quita mucho tiempo, no encuentro la forma de hacer que pase los datos que se encuentran en "Envios" a la hoja llamada "Datos", dado a que "Envios" va creciedo dia a dia, por que son los pedidos que se hacen diarios, lo que quiero hacer es que se pasen con alguna macro a la hoja de "Datos", lo intente poniendo la condicional en la hoja de "Env…

Buenas tardes, Les comento que mi conocimiento de excel es poco y no he podido dar con lo siguiente: Necesito copiar los datos de las columnas de la hoja Casos a la Hoja Errores siempre y cuando el estado que se encuentra en las columnas K L M N sea igual a Fallido. Teniendo en cuenta: Que debe colocar X en el cliclo correspondiente en la hoja Casos. En el Archivo Adjunto existe un ejemplo de lo que necesito. De antemano muchisisismas Gracias. Reportes.zip

Hola amigos,molestando su atención en el archivo adjunto. existe un codigo vba que permite crear una tabal dinamica y graficar sin emabrgo, yo quiero mejorar ese código y por eso les escribo, quisiera hacer que ademas de hacer ello se pueda ordenar los datos (de mayor a menor) y seleccionar solamente los 10 ique como otros y a partir de ello grafique(tal como esta en la hoja Modelo. Gracias expertos por su atención desbosque1.zip

Estimados, Hace un tiempo acudí por su ayuda para incrustar unas imagenes en excel y recibí su ayuda. https://www.ayudaexcel.com/foro/macros-programacion-vba-10/codigo-para-insertar-dos-imagenes-24023/ Acudo nuevamente a su ayuda ya que en el mismo archivo que me envió Marco Antonio, necesito ejecutar una macro al cambiar la imagen he estado intentando pero no me deja actualizar la imagen y llama a la macro demasiado pronto. También he probado con este código que encontré en la red ligándolo al botón VerCedula pero no funciona: Sub Abrir dim contador as integer dim ejecuta contador = "1" do while contador <= "5" if contador = 1 th…

Buenas Tardes: Soy nuevo en esto, leí mucho y me gusta el Foro, estoy trabajando en excel desde hace mucho tiempo y veo que cada vez es más útil y eficiente. Estoy generando un archivo que por cierto lo adapté en base a lo que leí y vi en el Foro. El mismo tiene una planilla para la carga y alta de una base en otro hoja, e aquí adapté un formulario para la busqueda e hice otro para modificar datos en la planilla que se genera la base de datos. El problema que tengo es que aveces no me encuentra el formulario para modificar y/o cuando aparece a veces no muestra los datos a modificar. No se si fui demasiado claro, para ello adjunto el archivo para mejor ilustración . INS…

Que tal Foro como les va?, mi consulta es la siguiente, tengo una tabla donde cargo datos hay varias filas que llevan un mismo numero madre como un id lo que yo quiero es hacer que cuando busque por este numero madre o ID me traiga solo las filas que contengan ese numero y las ponga en textbox de un userform, para que pueda modificar esos datos o eliminar. Espero que puedan ayudarme. Saludos. busqueda por ID.rar