Estimados amigos del foro, vuelvo a subir un tema que he diseñado su planteo de diferente manera, pero voy a repetir la explicación de la misma Se trata de un cronograma en el que constan clases teóricas y clases practicas en determinados días por ejemplo las teorías están los lunes y las practicas los martes en las fechas indicadas allí mismo en la tabla, cuando todo esta bien voy marcando los temas en la columna A haciendo notar que la clase ya se ha hecho o cumplido al seleccionar se ve un visto de color verde y la fecha se hace de color verde igualmente, pero si no se pudo ejecutar la clase en una fecha entonces deberá reorganizarse, claro vuelvo a seleccionar e…

Hola amigos. a ver si alguien puede ayudarme con este asunto tengo una matriz de datos en la q algunos de sus campos son nulos o vacios, en mi caso nulo = cero y por tanto kiero q inserte un cero en cada uno de esos campos. tengo un codigo pero q en la segunda columna se para sin llegar a insertar los ceros hasta el ultimo registro... alguien me puede ayudar??? os paso mi codigo... Range("E1").Select uf = Range("E65536").End(xlUp).Row ActiveSheet.Range("E2:E" & uf).AutoFilter Field:=1, Criteria1:="" Range("E2:E" & uf).Offset(, 0).SpecialCells(xlCellTypeVisible) = "0" Range("E1").AutoFilter Range("F1").Select uf = Range("F65536").End(xlUp).Row ActiveSh…

Buenas Tardes a toda la comunidad de AyudaExcel quisiera saber si me podrian ayudar con un problema que tengo recien estoy comenzando a ver el Excel y me estan pidiendo un macro para agregar Columnas despues de un tipo de contenido en una celda por ejemplo [TABLE=class: grid, width: 500] [TR] [TD]PEPE[/TD] [TD]TOTAL[/TD] [TD]MARIA[/TD] [TD]TOTAL[/TD] [TD]WENDy[/TD] [TD]TOTAL[/TD] [/TR] [/TABLE] entonces lo que me piden es que con la macro busque todas las celdas que tienen el valor "TOTAL" y agregue 2 columnas en blanco despues para que quede asi [TABLE=class: outer_border, width: 500] [TR] [TD]PEPE[/TD] [TD]TOTAL[/TD] [TD](vacio)[/TD] [TD](vacio)[…

Buenas Necesito ayuda con un problema El mismo consiste en la imposibilidad de establecer el codigo correcto para efectuar una insercion de columnas en funcion de una condicion preestablecida. En el adjunto tenemos un listado de fechas horizontal donde para cada una existe en la celda superior una formula que arroja un numero del 1 al 7 haciendo referencia a un dia de la semana. Lo que yo quiero es insertar una columna despues de cada 7 (que seria cada domingo, a fin de establecer subtotales semanales. No he podido realizar un codigo respecto a esto que funcione como deseo. Alguna idea? Necesito si o si que sea mediante macros. Saludos insertarcolumnas.rar

Hola, aquí estoy de nuevo, necesito de vuestra grandiosa ayuda. Resulta que tengo una hoja excel con varias imágenes insertadas y me gustaría poder ponerle un comentario a esas imágenes, buscando y buscando solo he visto como insertar una imagen a un comentario de una celda pero nada de un comentario a una imagen. ¿se puede hacer con una macro? Un saludo

Buenas Tardes Amigos del Foro, estoy tratando de personalizar una plantilla del calendario en excel en la cual lo que se busca es que a través de una macro me coloque el comentario colocado en la hoja parámetros para cada fecha festiva. Ejemplo: En la hoja parametros Celda F36 "Frenta a la fecha 2016-01-01" coloco año nuevo; lo que debería hacer la macro es colocar Año Nuevo como comentario a la celda G13 de la hoja Calendario. Adjunto archivo con lo que llevo del código en el evento Worksheet_Change Espero haber sido claro en la ayuda que requiero y todos sus aportes serán bienvenidos. Gracias Calendario Formulado.xlsm

Buen día, tengo el siguiente problema: Necesito insertar un comentario en una celda de un registro de datos que se va completando a través de un Userform. Uso el siguiente código (En rojo, las líneas que insertan el comentario en la celda): Set TransRowRng = ThisWorkbook.Worksheets("RESUMEN GENERAL").Cells(1, 1).CurrentRegion NewRow = TransRowRng.Rows.Count + 1 With ThisWorkbook.Worksheets("RESUMEN GENERAL") .Cells(NewRow, 1) = CDate(txtFechaUno) .Cells(NewRow, 2) = UCase(TextBox1.Value) .Cells(NewRow, 3) = Format(TextBox3, "00"".""000"".""000""-""0") …

Muy buen día, tarde, noche. Quisiera me pudieran orientar en algo que no logro resolver. Lo que quisiera que me ayudaran es en insertar un commandbutton en una hoja de excel, pero a través de código VBA. Por lo general lo que hago antes de venir aquí es hacer una grabación de macros para ver el código, y el resultado que me ha dado es el siguiente: ActiveSheet.OLEObjects.Add(ClassType:="Forms.CommandButton.1", Link:=False _ , DisplayAsIcon:=False, Left:=668.25, Top:=9.75, Width:=72, Height:= _ 24).Select Pero esto no es lo que necesito, pues lo que quiero hacer es que al momento de crear el botón de comando, ya venga definido el n…

Hola a todos, Necesito saber que código utilizar para insertar una forma agrupada. Es decir, me he hecho con las formas básica de office un "bloques" y lo he agrupado. Ahora necesito ir insertándolo según unas coordenadas que tengo en otra hoja. Sé como hacerlo si tuviera que insertar formas normales, pero sobre esto estoy muy perdido y no encuentro nada. Alguien podría echarme una mano?? Saludos y gracias.

Saludosen la celda b,20 necesito ingresar un contador correlativo que en medida que le ingrese datos comience de 1 en 1 y si pueden necesito que los datos que ingreso, salgan como datos numericos y no como texto. De ante manos Gracias. PRUEBA_001.xltm (1).zip

Buenas chicos. Estoy utilizando el código que se expuso en este tema: https://www.ayudaexcel.com/foro/macros-programacion-vba-10/correo-electronico-desde-excel-modificar-codigo-vba-17978/ para el envio de mails desde excel, que funciona perfectamente, pero ahora necesito insertar mas lineas de texto, y me dice que "demasiadas lineas" asi que estoy intentando insertar el contenido de un archivo de texto como cuerpo del mensaje, pero no doy con la tecla... He conseguido que me inserte la primera linea, pero no el resto. Alguien sabe alguna solución? Gracias.

Buenos Dias Quisiera ver si me pueden ayudar a solucionar un problema que tengo, tengo un archivo que estoy haciendo para ingresar Clientes en Excel desde un UserForm y que se Guarden los datos en la pestaña Clientes... El problema es que necesito que antes de ingresar los datos con el UserForm(Clientes) revise si no esta ya dado de alta el Cliente verificando su Clave, de ser asi que no me permita registrarlo lanzando un MsgBox, pero si no esta registrado, que ingrese el cliente, en la siguiente fila que corresponda En el apartado Domicilio(Celda "M") de la Hoja Clientes, debe de Concatenar los datos del UserForm(Domiclio), Calle,No.Exterior,No. Interior y Colonia par…

Hola,la verdad es que soy bióloga y mis conocimientos en programación son muy básicos, por lo que solicito me ayuden. Tengo que capturar datos de dos libros diferentes de excel, uno es "CA" y el otro es "UMAS" .De "CA" tengo que capturar comun,cientifico y grupo, y de "UMAS" total. Por lo que he creado un formulario, pero al momento de buscar los animales en "CA" me dice que no existen y al buscar en "UMAS" solo me pone lo de la celda D14. Además el problema que tengo es que algunos animales están escritos con mayúsculas en un libro y en el otro no, por lo que necesito que sin importar si esta con mayúsculas o no me reconozca los datos y me los busque y si es que en "CA…

Buenas tardes Estoy creando una registro de informacion pero lo quiero realiar con una macro pero no se como puedo insertar esta informacion en una hoja de excel que yo diseñe e encontrado algunos codigos pero no los entien espero alguien sepa explicarme

Hola a todos!! Si el tema está ya en el foro pido disculpas de antemano, porque no lo he visto Tengo el siguiente archivo que me ayudó el maestro Antoni a optimizarlo, (los datos son ficticios). En la macro GUARDAR, me gustaría que en vez de insertar los datos en la fila 2, lo hiciera en la última fila con registros. Me explico. Si tengo los últimos datos en la fila 7, por ejemplo, al dar al botón de Guardar de la hoja formulario, me guardara los registros en la fila 8, luego en la 9 y así sucesivamente. He estado intentando hacerlo yo y no soy capaz...asi que seguiré estudiando. Espero podáis ayudarme para poder seguir aprendiendo. Much…

Hola, de apoco he avanzado con lo que es VBA, ya que no es de mi total dominio, quería ver si alguien me podría ayudar... Por fin cree una macro que me expulsa un archivo que se edita desde excel, y me expulsa 2 tablas desde el mismo excel.. todos son archivos separados ( en total son 3 archivos base, ya que puede variar.. lo mínimo son 3 y lo máximo hasta ahora son 22 archivos) Si alguien me pudiera ayudar, estoy en 0% de esto ya que VBA en Word recién lo estoy viendo y no hay mucha info.. Necesito que desde el primer archivo que es una plantilla con texto se añadan los 2 otros archivos que también expulso la macro, explico.. los otros 2 archivos s…

Ola que tal , tengo un problema con al momento de registrar datos con imagenes, el la imagen primero que tengo ingresa y guarda normal el dato en su direcciond e dodne proviene , pero eh agregado otro imagen para que me garden 2 imagenes pero cuando guardo la imagen se corren a una misma y cuando abro de nuevo el userform vio la misma imagen en los 2 cuadros de imagenes, es porque al momento de guadar las direcciones o modificar se corren a una solo imagen, alguien que me pudiera ayudar por favor gracias Formulario_Avanzado.xls

hola expertos muy complacido de contar con sus conocimientos y a la espectativa de aprender sobre este maravilloso mundo de la programacion gracias por compartir sus conocimientos tan loables y eficaces. mi pregunta va encaminada a insertar los codigos de en la hoja base llamada produccion veo como inapropiado ingresar los codigos de manera manual me gustaria que se registrara automaticamente a medida que se registra un nuevo dato ejemplo ingreso un dato y su codigo se registra automaticamente asi pro-0000001, ingreso otro dato y su codigo sera pro-0000002 y asi sucesivamente; cabe anotar que tengo con un label que por parametro me avisa si el codigo es valido o no pero…

Buenas nochesLlevo mucho tiempo intentando subir la tabla Excel que adjunto a mi pagina web, lo he hecho desde One drive pero me borra el botón de enviar con una macro que le he puesto para que me envíe un email con un rango de celdas que los visitantes deben rellenar. He leído en muchos sitios pero no se como hacerlo. Hay alguna otra forma de hacerlo? Muchas gracias por vuestra ayuda.Saludos Lillo Quiniela copia 2.xlsm

Buen día amigos!!, estoy haciendo un macro para crear historiales de trabajos a ciertos equipos o maquinas, me ha ido bien pero me he encontrado con un problema al momento de ingresar la fecha de ejecución ya que en el textbox "FECHA DE EJECUCION" se introduce como DD/MM/YYYY pero al momento que esos datos se guardan en la hoja seleccionada ya sea MAQUINA 1 ó MAQUINA 2 me aparece como MM/DD/YYYY me gustaria que me ayudaran a poder corregir esta inversión que vba le hace a la fecha y si es posible colocar algún calendario en FECHA DE EJECUCION en lugar de usar un TextBox, muchas gracias por su ayuda. Saludos. PREGUNTA EN FORO.xlsm

No se si me sabré explicar, pero aún así... voy al lío. Partiendo de la base que trabajo a turnos 06:00h-14:00h, 14:00h-22:00h y 22:00h-06:00h, lo que necesito es una macro/fórmula que me inserte la fecha en un celda automáticamente según el día en el que esté, pero teniendo en cuenta que para ello el día en vez de terminar a las 23:59h, termina a las 05:59h y el comienzo igual, en vez de empezar a las 00:00h, empieza a las 06:00h. No se si será posible lo que solicito, he estado buscando por el foro, ya que debido a mi trabajo ahora que me han puesto un PC quiero poner en práctica varias ideas que tengo para mejorar la productividad y que sea más cómodo en la medida de…

Buenas a todos. Antes que nada quiero agradecerles a todos por tomarse el tiempo de leer mi duda. Tengo un formulario que se llama "Avios" dentro del cual tengo dos textbox(TextBox1 Fecha de recepcion, TextBox2 Fecha de entrega)y quiero que cuando el le de un click al TextBox1 me despliegue el calendario que encontre dentro del foro(Calendario diseñado por Maestro MacroAntonio), selecciono la fecha y me la coloque en la primer celda vacia de la columna("B") y el TextBox2 de igual manera solo que en este me coloque la fecha en la columna ("L"). Lo he intentado pero me da un error con el formulario modal. Gracias y estoy en espera de su ayuda Fechas.xls

Hola: Imagina que en B1 y B2 escribo dos fechas: 01/01/2014 y 01/05/2014, y al ejecutar una macro me inserta en A las fechas que faltan entre ambas, incluídas las anteriores, es decir: 01/01, 02/01,... 05/01). Ahora escribo en B3 y B4 otro par, vuelve a ejecutar y me inserta las faltantes a continuación de las anteriores. Lo que pretendo es, de un solo golpe, insertar varias fechas en la columna B y me inserte en A todas las que faltan entre cada una de ellas. Os pongo el resultado en la hoja 2 del archivo. Saludos. Fechas.rar

Amigos de Excel. Después de haber hecho 52 líneas de formulas, ahora necesito insertar una fila. Al insertar se desubican todas las celdas siguientes de las formulas. La reubicación se puede hacer manual, ejemplo lo que era "D20", luego de insertar pasaría a ser "D21". Pregunto: Hay algún procedimiento menos engorroso que reubicar manualmente...? Explico Cells(10, 4) = Cells(10, 3) * 12 Cells(11, 4) = Cells(11, 3) * 12 Cells(12, 4) = Cells(12, 3) * 12 Cells(13, 4) = Cells(13, 3) * 12 Cells(15, 4) = Cells(15, 3) * 12 Cells(16, 4) = Cells(16, 3) * 12 Cells(17, 4) = Cells(17, 3) * 12 Cells(18, 4) = Cells(18, 3) * 12 Cells(19, 4) = Cells(1…

Estimados, un saludo cordial. Tengo en un archivo específicamente una conciliación bancaria (Cruce de datos entre cuentas de mi empresa vs. un extracto bancario) lo he realizado con los conocimientos más básicos sobre programación en excel VBA, pero lo he logrado. Ahora dentro de éste archivo existe lo que en la web leí "código innecesario", pudiendo a este simplificarlo y hacerlo mucho mejor. En el archivo en el módulo A_Cruce_Diferencias tengo el siguiente código: If Range("J2").Value < 0 Then Range("A2:I2").Select Selection.Insert Shift:=xlDown Call Update ElseIf Range("J2").Value > 0 Then Range("K2:R2").Select Selection.Insert Shift:=xlDown Call Upd…