Hola a todos. Tengo una lista de Latitud y Longitud ej. 20.683152291521342, -103.37750679624888 Que macro debo de implementar para que con este dato vaya a GoogleMaps, localice ese punto y me devuelva el Link ej. https://www.google.com.mx/maps/place/20°40'59.4"N+103°22'39.0"W/@20.6836009,-103.3820507,15.92z/data=!4m5!3m4!1s0x0:0x0!8m2!3d20.6831523!4d-103.3775068 Gracias por su atención Saludos

Estoy acá nuevamente para plantearles un problema que tengo: Resulta que tengo un código VBA el cual se encarga de enviar en el cuerpo de un mail en Outlook, un rango de celdas específicas además de enviar un archivo adjunto. Este código me funcionaba perfecto en un libro Excel, pero al copiar y pegar dicho código en otro libro éste no envia el mail. Al momento de ejecutarlo en teoría funciona correctamente, no me lanza errores ni nada, pero simplemente no me envía el correo. Les adjunto el código: Sub Mail_Range_Outlook_Body() ' Don't forget to copy the function RangetoHTML in the module. ' Working in Office 2000-2010 Dim rng As Range Dim ruta As Workbook …

Buenas Tardes, gracias a los que me ayudaron en un tema anterior... En fin, lo que pasa que tengo una hoja excel el cual tengo registrados todos los pagos y saldos de la deuda. Lo que pasa , que tengo que sumar las deudas pendiente desde una fecha hasta otra en especifica , para realizar la provisión. Sera posible esto ? lo que pasa que llevo mucho tiempo y no he encontrado alguna solución a esto. Les adjunto el archivo para ver si me pueden ayudar, por favor. sumar.rar

Buenas tardes... Necesito de vuestra ayuda. Tengo una archivo excel (ver adjunto RPG 06-08-CR 80076) donde tengo x cantidad de datos es forma vertical, que luego esos datos los debo pasar al archivo adjunto EST. CRUDO en forma horizontal... y solo algunos datos (solo los campos pintados de amarillos en archivo RPG 06-08-CR 80076, son pasados). Esto es utilizado para realizar estadisticas. Esto es para evitar pasar siempre lo mismo. Como puedo hacer? Aguardo comentarios. Gracias! RPG 06-08-CR 80076.xls EST. CRUDO.xls

Hola!! Recurro a vosotros desesperada!! Llevo un mes intentandolo, he mirado miles de tutoriales y no sé como hacerlo. He de decir que estoy aprendiendo y todo de manera autodidacta. Me he descargado varios ejemplos de macros, de este ,foro y ni con esas lo he logrado... . Mis jefes me han solicitado lo siguiente: Necesito unir los archivos excel que están guardados en una carpeta de nuestro sharepoint. Dichos archivos son libros .xlsm, cada archivo varía en el nombre, ya que corresponden a áreas diferentes, es decir: En el sharePoint hay una carpeta llamada Modelo Fichas Iniciativas, y dentro de esa carperta se van guardando los libros de excel llamados Fich…

Hola: Tengo un listado, en columna, compuesto por un número, debajo de este siempre aparecerá un 0, hasta que este cambia por otro número, (esta información me la dan de un sap). Hasta ahora y utilizando si condicional, hago que me muestre este número en la celdas cuyo valor es 0. Cómo podría crear una macro, que me lo realizará de manera automática, es decir buscará un valor 0, y pusiera el valor numérico que en encuentre en cualquier linea superior. Os adjunto fichero para más información. Muchas gracias cambia_ceros.rar

Buenas tardes, Tengo una data extensa que resumí para efectos del ejemplo que aquí anexo. Sucede que no se si existe alguna manera (ya sea macro u otras funciones) de ordenar esos datos de forma diferente, o sea... que los mismos se puedan mostrar con más claridad... organizar.xlsx

Hola , he visto su experticie y quiero preguntarle algo , a ver si me puede ayudar Encontrè una macro que desde excel crea archivos de word a partir de registros de una base de excel, es muy parecido con combinar correspondencia. el problema que tengo es que en la base de datos al buscar y reemplazar, no lo hace en el encabezado de word. y la idea es que tambien reemplace los campos creados en el encabezado. Plantilla_ACUERDO2.zipPlantilla_ACUERDO2.zip

Buen Día tengan Todos la presente es para solicitar una formula para poner en una UserForm una Validación de datos para que solo se pueda poner una palabra en especial por Ejemplo "Unidrive" de antemano muchas Gracias

hola. estoy desarrollando un macro que me baje un archivo plano a excel y al bajarlo necesito que me elimine la basura de este archivo plano; pero lo e intentado de varias formas y no e podido eliminar la basura de ese archivo esta fue la ultima forma que intente pero no lo elimina todo me saca erro 91 y no me deja continuar. Sub Macro1() ' ' Macro1 Macro ' ' ChDir "D:\" Workbooks.OpenText Filename:="D:\UFCG1041.PJB", Origin:=xlMSDOS, StartRow _ :=1, DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), Array(10, 1), Array _ (43, 1), Array(66, 1), Array(68, 1), Array(89, 1), Array(114, 1), Array(135, 1), Array(137, _ 1)), Decimal…

Buenas noches les saludo nuevamente para solicitarles vuestra atención y darme la orientación necesaria al respecto del archivo adjunto. En el interior del mismo encontraréis las pautas Gracias Saludos desde Perú Jorge Bejarano CREAR Y LLENAR CAMPOS.zip

Tengo el siguiente problema en un Userform: Para que me guarde los datos que introduzco en un Textbox, con los decimales separados por comas, los tengo que introducir separados por puntos. ¿Cómo puedo guardar los datos con decimales separados por comas, e introduciéndolos asimismo por comas? Gracias Cuestión.rar

Buenos días, actualmente estoy trabajando con un archivo para crear una solución para la gestión de recibos impagados. Tengo todo listo (algo básico, debido a mi nivel) pero me encuentro con el siguiente problema: Al intentar ordenar el listado original mediante las distintas opciones de Excel solamente consigo ordenar mediante la Fecha de Vencimiento o mediante el Nombre. Si intento ordenar primero por uno y luego por otro, prevalece mas uno siempre. Lo que yo necesitaría es que los recibos con la fecha de vencimiento mas antigua se situasen al inicio de la tabla para ser gestionados primero, pero si un cliente tiene mas de un recibo, este estuviera en la fila …

hola expertos buenas tardes mi idea es bordear aquellas celdas que su numero sea igual a su posicion en los cuadros tanto arriba como abajo como lo muestro en la imagen con las celdas rojas Sub resaltar() ' ' Resaltar Macro ' Resalta similitudes https://foro.todoexcel.com/threads/bordear-celdas-de-acuerdo-a-posicion.55559/#post-237370 ' ' Acceso directo: CTRL+q ' Sheets("Hoja2").Select F1 = Asc(Range("A2").Value) f2 = Asc(Range("A3").Value) C1 = Range("B2").Value C2 = Range("B3").Value For J = 0 To 7 ' numero de Columnas Debug.Print "Siguiente Fila " If J Mod 2 = 0 Then Debug.Print "Esta si la hago :" & J For i = 0 To 9 ' numero de filas De…

Buenas tardes estimados colegas, Podrá sonar algo sencillo, pero realmente esta complicado el tema. Mi situación es la siguiente. Tengo una macro la cual esta montada en un OneDrive y Sincroniza en Microsoft Teams, esto con el fin de que se puede visualizar la data del archivo en linea. Ahora, mi Excel es un archivo de registro de solicitudes. Analice las siguientes particularidades: 1. Cuando utilizaba el procedimiento sencillo de ActiveWorkbook.Close SaveChanges:=True el archivo se guardaba en "Mis Documentos" aún cuando el archivo se abre directamente del sitio del onedrive sincronizado en el pc directamente en el explorar de archivos. 2. …

Saludos El tema es el siguiente: Tengo varias facturas en distintas hojas de calculo Hoja1 = factura de la semana 1 Hoja2 = factura de la semana 2 Hoja3 ... Ahora, tengo un userform con un combobox en el que selecciono la semana. El objetivo es que, dependiendo de la semana que seleccione en el combobox, luego haga click en un button y que éste genere una tabla dinamica utilizando los datos de la semana "n" que se encuentran en la hoja "n". Me gustaría que la tabla dinamica fuera generada en otra hoja de calculo. Gracias por vuestra ayuda! Espero haber sido claro!

Buenas a todos. Estoy intentando algo que me parece muy básico pero no doy con ello. Quiero crear una macro que llame al botón BUSCAR o lo que es lo mismo Control-B, para luego invocar esto desde un botón que me cree en mi hoja de cálculo. El problema es que activo la grabadora de macros e intento hacer la secuencia anterior y resulta que durante la grabacion no guarda nada. ¿Sabeis como se puede llamar a esta opción de menú desde una macro? Gracias de antemano. Juan.

Hola a todos! Gracias por su tiempo, mi duda es la siguiente. Tengo archivos de imagenes *.xps en la carpeta c:\ y quiero imprimirlos todos con una macro, hay alguna manera de poder imprimir el archivo desde excel? Gracias!

Saludos, estoy intentando hacer una pequeña aplicacion en una hoja de excel, quiero tener en la hoja1 un formulario donde ingresar datos que luego mediante un boton o algo esos datos se almacenen en la hoja2 de acuerdo a cada renglon y que a su vez al ir agregando datos se vallan guardando en la fila siguiente, esto con la finalidad de ir guardando las modificaciones realizadas en cada registro. la dificulta que tengo es pasar los datos de una hoja a la otra. Les agradeceria cualquier ayuda o ejemplo. Feliz dia, gracias.. ejemplo.rar

Hola amigos, como estan De nuevo por aquí con un problema que me tiene la cabeza loca, estoy haciendo un programa para gestión de prestamos, me funciona de cine, el problema esta en que cuando calculo los prestamos por el sistema francés o americano, la primera fecha me la pone bien, pero las siguientes me las pone en formato numero, espero que me puedan colaborar en este trabajo, Un saludo, y muchas gracias por anticipado https://mega.nz/file/M5o2kQoY#pEhxin7aTm1xyZ3fxNjzgc2s6i67UvFzcfZM1sxch18

Buenas noches: Traigo de nuevo esta consulta. Tengo un formulario que carga los datos filtrados en un listbox. Pero tengo un problema: solo funciona teniendo la hoja mostrada y situándome en ella. Si la hoja está oculta o estoy en otra hoja no funciona.... Pido vuestra colaboración porque he estado mirando por la web y he hecho varias pruebas pero no consigo solucionar este problema. Os pongo el acceso al archivo a ver si, por favor, me podéis echar una mano.... https://drive.google.com/open?id=1812Uw2iHKBYPnyFSTvRGmFaWufh-jL5N

Buenas quiero diseñar una macro que me permita halar la información de una hoja de excel hacia un listbox en un formulario, pero tambien deseo que contenga dos textbox que me permitan filtrar la informacion a la hora de pulsar algun boton estos textbox necesito que filtren la informacion con las opciones que dan los filtros en excel "igual o mayor a" e "igual o menor que" pero adicional algun combobox que contenga los titulos de mi base de excel para poder seleccionar por medio de que titulo sera el filtrado ademas con algun label que me muestre los totales...!!!! Agradecere me puedan ayudar...

Macro que automáticamente rellene celdas de 2 en 2 cuando se escriba algún texto y macro para que cuando se borre el contenido de celdas automáticamente se borre un rango determinado Gracias

Hola, muy buenos días para todos los foristas. Les quería consultar sobre lo siguiente: Tengo que personalizar una celda en el cual debo escribir un valor alfanumérico como por ejemplo 451181655SET13 el cual debo visualizar como ASUNTO N° 451 - GHO 181655 - SET-13, el tema es que si lo escribo sin el valor "SET" lo puedo lograr desde formato de celdas pero al agregárselo es cuando no puedo visualizar como quisiera. En el cuadro de dialogo para formato de celdas, en Personalizar escribo lo siguiente: "ASUNTO N° "#####" - GHO "######" - " (acá me surge el inconveniente de permitir que visualice el texto escrito) "-"## He intentado con *, con ? y con otros caracteres d…

Necesitaria su ayuda para agregarle un loop a esta macro que haga que mientras H36 sea "Bajo" se copie el valor de K36 en C36, si el valor de H36 es "alto" se copie L36 en C36 y si el valor de H36 es "Bien" termine la macro. El resto funcion abien pero yo mismo no pude agregarle el loop, les dejo masomenos lo que tengo Sub Porcentajes() Application.Calculation = xlCalculationAutomatic If Range("h36").Value = "Bajo" Then Range("k36").Copy Range("c36").PasteSpecial xlPasteValues End If If Range("h36").Value = "Alto" Then Range("l36").Copy Range("c36").PasteSpecial xlPasteValues End If If Range("h36").Value = "Bien" Then Exit Sub End Sub