hola a todos tengo varios libros excel (son 40 en total uno por cada trabajador) de los cuales debo extraer algunos datos determinados y pasarlos a otro libro independiente. todos los libros son iguales en formato, solo cambia la informacion contenida en ellos. en cada libro existe una hoja por cada mes. (se podria preguntar antes de copiar los datos, que mes es el que se necesita ) adjunto archivos para que tengan una referencia. necesito extraer de cada libro: ejemplo. Macarena Jimenez : Total 40 horas actividad código 20122 proyecto 1: 20 horas total primera semana : 12 hrs total sagunda semana: 6 hrs actividad código 14133 proyecto 2: 20 horas …

Hola amigos, queria que me echasen una mano con este problema. Tengo datos en las 7 columnas seguidas desde B hasta H, pero quiero que se oculten en funcion de los valores que haya en las 7 celdas de la K10 a Q10. Si la celda tiene un numero no tiene que ocultar nada. Si la celda esta vacia tendra que ocultar a la columna correspondiente de su orden. Es decir, si K10 esta vacia se oculta la columna B; si es L10 se oculta la columna C, la M10 oculta la D; la N10 oculta la E; la O10 oculta la F; la P10 oculta la G y la Q10 oculta la H. Como los datos de las celdas K10:Q10 cambian con cierta frecuencia me gustaria que se ejecutara la macro de forma automatica. Muchas g…

Saludos Estoy realizado un proyecto excel, con una Base de Datos, quiero modificar(actualizar) la BD, pero al ejecutar el código no hace la actualización y realiza otro registro en la primera fila Adjunto al archivo por se me pueden ayudar Modificar 2020.xlsm

Hola nuevamente: Tengo en una celda "B3" la Latitud y Longitud (GPS) y la idea es que al ejecutar la macro se posicione en Google Maps. Posteriormente ya estaré haciendo el copy del Link y lo pasare al excel. (lo ideal es que la macro lo hiciera pero ya es mucho pedir) Gracias desde Guadalajara, México

Buenas a todos! Necesitaría hacer lo sisguiente. Tengo un libro TOTAL con una pestaña que se llama RESUMEN y es la suma de las pestañas RESUMEN de otros 5 libros que tengo. Como podría automatizar el cálculo con una macro?. El formato de la hoja de resumen es igual en todas es decir: la celda A1 del libro TOTAL = suma de celda A1 de mis cinco libros. Alguna sugerencia? Muchas gracias!

Buenos días. Me gustaría saber si alguien saber cómo hacer en excell un contador de forma que al poner el número del dorsal de varias motos, vaya cronometrando y contando el número de vueltas que va dando. Gracias.

Buenas gente, a ver si me podéis ayudar. Tengo un código con el cual creo una barra de progreso para ver el estado de la macro en ejecución. Hasta aquí todo perfecto. El caso es que la primera vez que ejecuto la macro una vez abierta la excel, todo funciona correctamente, es en las ejecuciones posteriores que la macro va excesivamente lenta. Este es el código que da problemas: Do While LineaActual < UltimaLinea ContadorEscalones = ContadorEscalones + 1 Me.Caption = "Calculando precio " & ContadorEscalones & " de " & NumeroEscalonesPrecios frm_Progreso.lbl_ProgressBar.Width = frm_Progreso.lbl_ProgressBar.Width + PixelesPo…

Hola, He buscado soluciones y he seguido las recomendaciones del post abajo indicado para evitar que la macro se vuelva lenta y no logre nada Se trata de la hoja "LISTADO" que me tiene que devolver el listado del día cuya fecha lo pongo en la celda "K7". Pues tarda mas de lo esperado. Adjunto el documento. Gracias, Saludos. CONTROL DESAYUNOS - macro lenta.xlsm

Buenas tardes, he generado una plantilla en word para que al seleccionar una fila en excel los datos contenidos en ella se reemplacen en la plantilla, logro hacer que la primera fila llene completo y sin errores mi plantilla, pero al momento de exporar la segunda fila me aparece el error de "El parametro de la cadena es demasiado largo" Sub GenerarWordFila() ruta = ThisWorkbook.Path & "\Marksheet Template2.docx" Set objWord = CreateObject("Word.Application") objWord.Visible = True objWord.Documents.Add Template:=ruta, NewTemplate:=False, DocumentType:=0 For i = 2 To 42 busqueda = Hoja2.Range("D" & i).Text remplazar = Hoja2.Range("C" & i).Text W…

Buenos días a todos; -Una pequeña ayudita si es posible. -Adjunto una macro que en su día amablemente me ayudó a configurar Antoni. Como es habitual en él funciona de maravilla. He querido si es posible ir un poco mas lejos y es que en el momento que calcular el subtotal en dicha línea me indique el número de cuenta. Adjunto marco e imagen del resultado. Gracia como siempre por vuestra ayuda y buen finde. MSubtotales.xlsm

Hola: He perdido el hilo de esta consulta. Se trata de indicar por medio de autoformas las características de un producto en un catálogo de precios. Si alguien lo recuerda, le rogaría me lo indicase. Gracias. Saludos EJEMPLO.rar

hola buenos dias, tengo una macro que copia una hoja( ingreso), me copia el contenido y renombra la hoja con fecha del informe pero el problema que se me genera es cuando no modifico la fecha sigue corriendo la macro me crea otra hoja pero no renombra la hoja con la fecha porque ya existe en otra. mi consulta es ¿ cómo puedo hacer para que se detenga la macro y que me avise en un mensaje que la fecha del informe ya existe y no se puede guardar ? para solucionar el problema adjunto la macro Sub guardar() Application.ScreenUpdating = False Sheets("ingreso").Copy After:=Sheets(1) ActiveSheet.Name = Range("d13") Sheets("ingreso…

Hola a todos, He buscado para ver si había algo como lo que busco y si lo hay no lo encuentro. Lo que necesito es lo siguiente si el valor de la celda A1 esta entre 1 y 2 que la celda A2 cambie a verde. Se puede hacer. Muchas gracias

Buenas ? A ver si me podéis echar una mano, tengo un formulario que lo llamo desde cualquier hoja del libro y quiero que en una hoja fija y en una fila fija me inserte una fila entera, sin que el formulario cambie independiente de la hoja en la que em encuentre, es decir copie el formato de su fila superior lo desplace hacia abajo y lo copie en el huco desplazado. Sheets("Hoja Fija").Select Rows("4:4").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove con esto me lo hace lo que quiero , pero claro me lleva a la hoja en cuestión, y no es lo que necesito, ya que el formulario que lo hace solo es para mirar los datos de una tab…

Estimados amigos del foro buenos dias. Aqui de nuevo para hacerles una consulta en la cual me encuentro un poco frustrado puesto que lo he intentado de distintos modos pero aun no logro realizarlo. lo que estoy intentando realizar es que cada vez que ingrése una fecha y su horometro en sus respectivas celdas. Busque la fecha en el cronograma de la derecha me copie concatenado el horometro con el Tipo de PM y cada vez que ingrese nuevas fechas y horometros, me lo guarde en la otra pestaña (historico) esto para no perder la informacion, es decir. Coloco Fecha : 12/05/2014 horometro 14,000 busca la fecha y en el cronograma lo rellena asi --> 14,000 / PM1 y en l…

Buenas tardes Saludos amigos tengo la sigueinte consulta, llevo utilizando un archivo para enviar correos de forma masiva pero, ahora tengo la sigueinte inquietud hay alguna forma de agregar un item para que a ese correo enviado se le anexe una marca de seguimiento y aviso?, para el destinatario. prueba Enviar CORREO-EXCEL.xls

hola amigos del foro estoy modificando un macro que hace tiempo subio nuestro buen amigo gerson, muchos lo han de conocer es el turbo filtro a este macro le eh adaptado un modulo de consulta de doble click sobre el listbox para poder desplegar otra pantalla y poder hacer un comparativo de unas listas de precios el macro corre y carga la informacion pero tengo este detalle que no busco la solucion o no se que estoy poniendo mal 1.- el primer problema es que no guarda las modificaciones y al darle click al boton de guardar borra la primera linea y lo deja en ceros 2.- el segundo problema es que no me respeta los decimales eh intentado darle varios formatos p…

Hola a todos, acá nuevamente solicitando su tiempo para el siguiente inconveniente que tengo ? La siguiente macro, encontrada en la web, me funciona a la perfección. Sin embargo, cuando el archivo esta en uso crea un nuevo archivo temporal con la extension (.ldb) y es ahi donde la macro no funciona. Como resolver este inconveniente? Sub CopiarArchivos() FileCopy "Y:\INVENT.mdb", "Y:\INVENT2.mdb" End Sub Saludos

Hola a todos; -Estoy intentado programar un formulario para que reproduzca un video. Lo reproduce a medias ya que me salta un error de script y me bloquea la macro. Mi explorador predeterminado es Edge. A ver si sabéis donde me está el fallo. Gracias anticipadas como siempre. Adjunto macro ejemplo. Video.xlsm

Hola a todos, tengo una macro que elabora una tabla dinámica con algunos datos, el problema que me surgió es que por ejemplo necesitaría copiar un rango de datos que es variable es decir siempre mi tabla dinámica comienza la hoja1 del libro1 en la celda A4 en adelante, eh visto códigos que muestran la ultima fila con datos : Range("A65536").Select Selection.End(xlUp).Select Yo necesito copiar de la antepenúltima celda hacia A4, y pegarla en otro libro2, hoja2, especificándole a que celda ira la información. Trate de hacer algo asi: Range("A65536").Select if Selection.End(xlUp).Select = "Total general" then selection.end(xlup).select - 1 selection.pasteSpec…

Buen día a todos. Vengo con un problema. Tengo un formulario de ingreso de datos en el cual en una celda debo limitar los caracteres a un formato determinado y si no se cumple ese formato no deben poder ingresarse ningun dato. el formato es que el primer caracter sea la letra "K" y despues de esta debe haber solamente 7 caracteres numéricos, ni mas ni menos. Podrian ayudarme con ese codigo. Anexo archivo, espero sea suficiente para darme a entender. De antemano muchas gracias por el apoyo Ejemplo 1.zip

Hola buenas, Necesito ayuda porfavor, tengo una fuente de datos (pestaña Prueba) donde el combobox están los datos del campo "Datos" y no me sale que al seleccionar un dato del combobox se desplieguen todos sus id y nombres correspondiente en una celda de excel. Ejemplo: si en el combobox selecciono Perú, en la misma celda de excel se debería desplegar todos sus datos. Favor si alguien me puede ayudar estaría muy agradecido. Adjunto link: https://drive.google.com/open?id=1Bbog2UwVWrCbfmAuDEoAeVdD5FgIRpIv Saludos

Buenas Tardes, Tengo una macro la cual me permite seleccionar múltiples libros excel para poder juntarnos en uno solo. Existe alguna forma que cuando me muestre los libros que quiera abrir, estos se seleccionen solos? Sin tener que seleccionarlos uno? Es decir, yo quiero que siempre se abra de una direccion el libro1.xlsm, el libro2.xlsm y el libro3.xlsm. Gracias. Prueba.xlsm

hola amigos espero se encuentren bien, miren tengo una duda con un codigo que tengo, lo que pasa es que tengo un combobox que al escribir el nombre me abre el userform2 el problema que tengo es que si tengo dos nombres iguales pero con apellidos diferentes cuando tecleo por ejemplo carlos me abre automaticamente el userform2, lo que quiero es que hasta que ponga el nombre completo con apellido me abra el userform2, pero no se que estoy haciendo mal. espero me puedan ayudar gracias :calm: Private Sub UserForm_Initialize() Dim celda Dim X For Each celda In Sheets("Clientes").Range("A2:A" & Sheets("Clientes").Range("A" & Rows.Count).End(xlUp).Row) …

Hola buenas noches a todos/as. Desde hace mucho tiempo he buscado la manera de crear una macro que me solucione lo siguiente. En mi trabajo utilizo un aplicativo de internet explorer. Me muestra en una tabla hora a hora datos de ventas, asesores, etc, etc. Necesito que mediante una macro, se pueda copiar y pegar esta información a una hoja de un libro específico de excel. Cabe recordar que: - No puedo acceder a ninguna base de datos SQL o similar por permisos. - Necesito que solamente, me abra la pagina y me copie y pegue la información de ser posible. - Siempre la información de internet está bajo la misma estructura. Muchas gracias y espero que tenga solución