Este es mi primer post aquí... Je je. Tengo un archivo en Excel: A1: Fecha | B1: ID | C1: Nombre | D1: Líder | E1: Correo. | F1: Adjunto Generé una macro para enviar correos a distintos destinatarios almacenados en la columna E1 pero solo envía el correo al primero de la lista y no a los demás. Y no he logrado que el texto del mensaje se acomode a los campos que necesito. El texto del correo debería ser: Estimado (Líder), le informo que (Nombre) con el ID número (ID) ha recibido la documentación la fecha (Fecha). Adjunto copia del documento. (Firma) ¿Cuál sería el código para realizar esto? ¿Cómo coloco mi firma de Outlook? Envio de correos (Plantilla).xls

hola buenas tardes tengo una duda aver si me pueden apoyar despejando mi duda tengo un userform el cual contiene varios textbox en uno de ellos deseo que solo se pueda dijitar la pabra niño o niña y otro textbox solo acepte numeros del 1 al 12 he intentado con uno pero me marca error solo logro validar una palabra o otra de antemano muchas gracias dato introducido.xls

hola buenas tardes pues la verdad soy nuevo en el foro no soy muy experto tengo poco conocimiento asi que voy agradecer muchisimo de antemano su ayuda adjunto un ejemplo del problema que tengo y no encontrado solucion es una archivo para una parroquia muchas gracias trato de generar rango de folios a partir de variable ejemplo 1.xls ejemplo_rango.xls

Hola, soy nuevo y ando necesitando una ayuda con el tema de los macro.. Lo que quiero hacer, es crear un macro que copie una celda ( por ejemplo la celda A1 de la hoja 1) y lo pegue en un lugar vacio de una cierta columna a partir de una determinada fila ( por ejemplo pegarla en la columna B a partir de la fila 5, de la hoja 2). Desde ya muchas gracias. Saludos Ejemplo.xls

Estimados, tengo el siguiente problema, quiero hacer filtro con una variedad de datos ( estos datos los quiero sacar de una tabla X, que pueden ser números tan diferentes como 4, 5060, 876, etc. como puedo hacer para introducir estos números en una variable y que se pueda filtrar por esta? he tratado simplemente con 1 numero y ni por eso me sale: Sub Macro1()Dim suma As Double Dim reparto As Double suma = 0 Range("P3").Select 'Range(Selection, Selection.End(xlDown)).Select Do While ActiveCell <> "" suma = suma + ActiveCell.Value ActiveCell.Offset(1, 0).Activate Loop reparto = suma * 0.016 Range("p1127").Value = reparto Ac…

Buenas tardes Tengo un libro de excel con varias hojas y en la última deseo que mensualmente se copien los últimos datos actualizados y que salte a la siguiente columna del siguiente mes, y así sucesivamente, esto con el objetivo de guardar el avance mensual para posteriormente realizar gráficas o análisis, espero haberme explicado correctamente. Hoja1 Hoja2 Hoja3 Hoja4 ResumenMensual, Ene Feb Mar Ab May Lo que necesio es que de las hojas 1 a 4 tome los datos y el total los copie en la columna en Ene, luego el siguiente mes cambian los datos y debe saltar al siguiente mes copia…

Hola Tal vez alguien pueda ayudarme, necesito un programa en Excel, el cual me permita ingresar mis productos, es decir el producto, se precio de compra, su precio de venta, la cantidad, y (si es posible también poder hacer salidas, y a que cliente se le otorgo el material), y lo mas importante que cuando quiera ver el producto pueda hacer una consulta rápida, por favor alguien que me ayude, solo un programa básico en Excel, gracias.

Buenos días! Necesito su inmensa ayuda!!! Quiero que cuando en la celda A1 esté el valor "Otra" se muestren los valores que yo escriba en la celda B1. Pero si en la celda A1 está algun otro valor diferente, en la celda B1 no me muestre nada aunque yo ingrese algun dato. Alguien sabe si eso es posible??? De antemano muchas gracias por su ayuda

Estimados. Ha sido muy fructifero haber encontrado este foro, por lo que vuelvo a las consultas. Resulta que estoy programando una macro que consiste hacer un filtro de una cantidad grande de datos, seleccionar solo algunos, copiar y pegarlos en otra hoja. Ahora bien, he logrado el codigo para filtrar un arreglo de datos a partir de una tabla que tiene los nombres o id a buscar: nf = numerofilas 'obtener arreglo de nombres de cellid CELLID_Array = Range("C2:C" & (nf - 1)) 'selecciona planilla de CNA Windows("Libro_Muchosdatos.xlsx").Activate 'selecciona de CNA los cellid a modificar de planilla CNA ActiveSheet.ListObjects(…

Hola amigos. ¿Alguno sabe de una macro para imrpimir UNICAMENTE en pdf?. Cuando evito imprimir no me graba en pdf, y cuando le permito grabar en pdf, me deja imprimir en cualquier formato. Ya estoy desesperado, les pido su ayuda, por favor.

Buenas noches, adjunto un archivo que contiene un listado de Combobox que selecciona diferentes letras, cuando doy click en otra celda y vuelvo a elegir otra letra del COmbobox, se reinicia el lista y queda en blanco como para escoger denuevo una letra del lista, que opcion puedo colocar para que no quede en blanco, simplemente quiero cambiar la letra. Adjunto archivo. Combobox 1.zip

Buscarv en un Formulario Buenas Tardes amigos: De nuevo aqui con mis dudas, requiero de sus ayudas nuevamente. Tengo un formulario en el cual en el userform3, hay un botón, que indica "Insertar RUC", cuando le doy click me manda a otra pantalla que dice "Buscar RUC" e "Ingresar Manualmente". Cuando le doy a Buscar RUC, quiero que me ayude a hacer un buscarv de la hoja "Base de Datos", o sea cuando escriba el RUC, que en los label43 y label53: RUC y Razón Social, en el userform3, me aparezca el RUC que se ingresó y la respectiva razón social, encontrada con el buscarv. Y viceversa o sea que cuando escriba la razón social, me busque el RUC y lo mande a los label43 y 53…

Hola voy a intentar describir en lo que me podeis ayudar, pues llevo algunos meses trabajando en una hoja de excel intentanto hacer la planificación diaria de la producción en una de una empresa, por lo que tengo una pequeña base de datos donde se recogen todas las operaciones, con sus respectivos tiempos de producción, materia prima necesaria y su cantidad. Hay otra hoja donde se recogen la planificación que yo quiero hacer cada día, por lo que yo pongo un artículo y me lo desglosa en las diferentes operaciones, con lo que tarda en fabricarlo, y su materia necesaria, pero esto es un trabajo costoso, ya que cada producto puede tener hasta 12 o 13 operaciones, y cada trab…

Saludos Soy nuevo en este foro y vengo pidiendo una gran ayuda de su parte Necesito algún método para que al momento que yo ingrese una formular en una celda cualquiera por ejemplo en la celda A3 coloque una ejemplo SUMA(A1,A2) se copie automáticamente en B3 pero ahora haciendo la suma B1,B2 alguna manera de poder hacer esto ?, honestamente no se si esto sea posible con Macros o si exista alguna forma de poder hacerlo sin macros y programación, mis conocimientos de Excel son algo basicos y lo que no quiero es tener que usar el botón de auto llenado o copy-paste espero alguien me pueda ayudar con mi problema y muchas gracias

Que tal, soy nuevo en excel y en esta pagina, ojala puedan ayudarme. mi problema es esl siguiente: Necesito que en una celda C1 aparezca el texto "N/A" si en otras dos celdas (A1, B1) esta escrito el texto "SI". Si esto no se cumple que no aparezca nada en la celda C1 pero que me permita introducir texto... De antemano muchas gracias por su ayuda

Estoy trabajando en el libro de "Desing Mode Error Rev1.xlsb", y cuando uso el siguiente código para abrir el otro libro..., ya no me ejecuta la linea de "Range("C5").Select"... Lo que he visto es porque se activa la opción de "Design Mode", en el "Desing Mode Error Rev2.xlsb" ..., ya que si no estuviera activada esa opción si se sigue ejecutando el código... Así que pienso que posiblemente esa sea la causa para que no siga ejecutándose el código..., pero sino fuera esa..., les agradecería me indicaran donde tengo el error. a = Application.ActiveWorkbook.Path e = Left(Application.ActiveWorkbook.Name, 21) Workbooks.Open (a & "\" & e & "2.xlsb") Range("C5")…

ya tengo mi macro que envia correos masivamente desde el excel. Por un tema operativo, necesito que este correo antes de enviarse se convierta en texto sin formato. ¿Cual sería el comando?

Buenos días Mi nombre en Miguel Angel Canchala y les solicito amablemente colaboración con una macro para buscar y ordenar valores máximos de varias columnas. Adjunto envío archivo en excel con unos valores de ejemplo y los resultados que deseo obtener. Muchas gracias por su ayuda. Att. Miguel Angel C. DATOS PARA MACRO.zip

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 tardes espero que me puedan ayudar no se mucho de programación, y por eso solicito de su ayuda. tengo una macro que al cambiar de celda en un rango especifico me muestra una imagen que esta en una carpeta de mi computadora, mediante un control de imagen, lo que necesito es saber como puedo hacer para que me muestre una imagen pero de Internet, esto es porque necesito que cualquier persona que quiera abrir el archivo, pueda ver las imágenes. continuación colo el código que estoy usando Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim Dir As String On Error Resume Next If Not Intersect(Target, Range("Q11:Q30")) Is Nothing Then Dir = ActiveCel…

Amigos tengo un problema con mi macros, se supone que tiene que obtener un promedio entre dos fechas, esta es llamada desde otra hoja. Por eso existen 4 hojas llamadas SAG3 SAG2 SAG 1 SAG4, las cuales solo dos están activas por el momento (SAG3 - SAG2) las demás hay que hacerlas. Cada hoja SAG posee 3 piezas MONOBLOCK, LIFTER Y PLACA. Después hay una hoja llamada DATA SPI Dentro de esas planillas (SAG), hay columnas una de ellas es “FECHAS” y la otra “SPI” Lo que debe hacer la MACROS (MÓDULO1) es tomar por cada fecha que existe del las hojas SAG3 SAG2 SAG 1 SAG4, es poner el SPI promedio entre dos fechas. Ese promedio las debe sacar del la hoja DATA SPI y agregar a …

Muy buenas, en una macro que estoy desarrollando descargo un fichero excel a través de una aplicación java y tras haber pulsado el botón abrir en la pantalla de dialogo de descarga de archivo llego a una instrucción en la cual tiene que seleccionar un rango de celdas de este nuevo archivo abierto . Ocurre que la seleccion la hace sobre el archivo excel que ya estaba abierto antes, no sobre el nuevo. Para resolverlo intente utilziar la funcion application.wait y no me funciono (parece que esta funcion para la ejecución de excel y no llega a cargar mi archivo). Tampoco me funcionó con la funcion Sleep La opcion de activar el nuevo libro sería la ideal, pero ocurre q…

Buenas tardes: ADjunto un archivo donde he añadido un combo box activex a una hoja excel, donde he ingresado un listado, cuando cierro el archivo y lo abro nuevamente ya no me aparece el listado, como puedo hacer para que siempre al abrir el archivo me aparezca el listado sin que se repitan las opciones, por otro lado, si mi listado aumenta mes a mes, como puedo hacer que mi combo box se incremente sin que tenga que modificar la programación. Combobox.zip

Buen día, Soy nueva en el foro y además no tengo mucha experiencia en el manejo de macros. Estoy creando un código para asignar un valor específico. Para asignar dicho valor, primero se tiene que cumplir la condición que una fecha esté entre dos fechas. El código desarrollado hasta el momento es el siguiente: [/B]ActiveSheet.Range("BN" & Fila).FormulaR1C1 = "=DATE(MID(RC[-49],1,4),MID(RC[-49],5,2),MID(RC[-49],7,2))" 'Esta es la fecha a evaluar Desembdate = ActiveSheet.Range("BN" & Fila).Value If ActiveSheet.Range("F" & Fila).Value = "EMPRESARIAL" Then If ActiveSheet.Range("BK" & Fila).Value = "DTF" Then If ActiveSheet.Range("R" & Fila).Value =…

Hola, trato de copiar el dato que hay en la última celda de la "Hoja1" columna "A" del libro "NumeroFactura.xlsx" sumarle 1 y pegarlo en el libro activo "PlantillaFacturas.xlsx" hoja "Facturas" celda "E14" (Si la celda "E14" Ya tiene número que no ejecute la macro). Una vez realizada esta parte, la siguiente sería, copiar el valor de la celda "E14" y añadirlo a la siguiente celda libre de la "Hoja1" columna "A" del libro "NumeroFactura.xlsx". Adjunto fichero , intento subir un archivo y no soy capaz Archivos.zip