Buenas Tardes a todos Tengo tres listados, los cuales he de comparar entre ellos. Los dos primeros listados que llamaremos ( lista A y lista B ) a comprar tienen dos columnas ( la primera con ID y otra con números decimales), y el objetivo es poner en las dos columnas de color verde a todas aquellos registros que sean iguales y los que no son iguales se pongan en rojo, y aquellos registros que no estén en el otro listado, se quede en blanco sin hacer nada. Luego necesito que se compare los listados de ( Lista C ) con la lista A. Os dejo un ejemplo de los listados, agradezco de antemano vuestra ayuda. A ser posible necesito otra macro para …

Buenas tardes Tengo una base de datos que se alimenta de varias userforms y la manera de que los datos correspondan al mismo cliente es anotando el No. de folio generado originalmente en cada userform. Cómo puedo hacer para que algunos de los datos capturados en una userform se vean en un textbox de otra userform para que quien captura los pueda usar como referencia. Muchas gracias de antemano, adjunto archivo. AAAA CONCENTRADO DE DATOS GAS.rar

Hola. Actualmente estoy utilizando una macro para filtrar contenidos pero como la base de datos se ha hecho bastante grande tarda mas de cinco minutos en ejecutarla. Sub Borrado_Articulos_filtro() Dim FILAFINAL As Long Dim X As Long Sheets(1).Select FILAFINAL = Sheets(1).Range("A" & Rows.Count).End(xlUp).Row For X = FILAFINAL To 2 Step -1 'VALORES COLUMNA H If Sheets(1).Cells(X, 8) = "CG346A" Then Cells(X, 1).Select Cells(X, 1).EntireRow.Delete End If If Sheets(1).Cells(X, 8) = "ARTICULO 1" Then Cells(X, 1).Select Cells(X, 1).EntireRow.Delete End If If Sheets(1).Cells(X, 8) = "ARTICULO 2" Then Cells(X, 1).Select Cells(X, 1).EntireRow.Delete End If…

Hola buenas. Tengo una formula para contar coincidencias columna O, las coincidencias de J:M con B:G. J:M puede tener entre 150.000 a 300.000 filas y B:G entre 10.000 a 30.000 filas. La formula hasta 150.000 filas en J:M la desplazo hasta el final y trada unos 30 minutos en recalcular pero la macro se queda colgada. Mi intencion es encontrar una macro que sea mas rapida que la formula. Esta es la macro Sub BuscarCoincidencias() Application.ScreenUpdating = False Range(Range("N3"), Range("N3").End(xlDown)) = "" For x1 = 3 To Range("B3").End(xlDown).Row For x2 = 3 To Range("J3").End(xlDown).Row c = 0 For y = 10 To 12 Set…

Buenos días Estoy intentando hacer copias automáticas de seguridad del libro de trabajo (libro1.slxm) cada vez que se cierra el libro. Las copias se guardarán en la carpeta Bakup (que se encuentra en la misma ruta que el libro de trabajo), y deseo conservar sólo las tres últimas copias mas recientes. ¿Me podrían ayudar? Un saludo y gracias anticipadas

Buen día estimados amigos del foro agradezco me puedan colaborar con una sencilla aplicación a este archivo, requiero por favor que cuando yo marque una casilla esta quede bloqueada por medio de una contraseña, ósea que no se puede des-marcar hasta que yo coloque una contraseña. Agradezco de antemano el apoyo que me puedan brindar. Saludos y cuídense mucho.? casilla de marcacion.xlsx

hola tengo una duda, tengo un macro que quiero se ejecute en varias celdas de manera ordenada con la condicional que si hay una celda vacía deje de ejecutarse. les agradesco su sugerencia

Buenos días, si alguien me puede ayudar con el siguiente pedido... :S como se ve en el archivo tengo dos hojas, una donde estan las facturas pendientes de carga y otra donde ya esta la base con todas las facturas cargadas previamente... lo que preciso es que se busque dentro de la base las facturas (columna C), las facturas pendientes de carga que estan en la hoja "facturas" en la columna C y que en caso de encontrar que la factura ya esta cargada, un msgbox que diga que esta duplicando la carga... desde ya muchas gracias!!! AYUDA.xls

Hola amigos en el fichero .xlsm adjunto podéis que creé en Excel 2007 una aplicación en Excel con una interfaz a base de etiquetas (label) ocultas y visibles para cuando hacer click en ellas visualizar los formularios del Proyecto. Para lograr pantalla completa, ya que la Cinta de Opciones no me ha gustado nunca, el método Fullscreen me ha ido muy bien, pues es una ocultación "no violenta", pues haciendo doble click arriba en la ventana aparace otra vez la cinta. El problema ha venido cuando se ha cambiado a Office 2013 y en Excel 2013 el código corre sin dificultad pero en FullScreen y DisplayFormulabar=false, no se puede escribir en las celdas en otro proyecto en el …

Buenas tardes, amigos, he comenzado en el mundo de las macros soy un novato apenas y como novato no pierdo nada en preguntarle a los expertos y conocidos de la materia de este foro, mi consulta es la siguiente: Tengo una base de datos X con registros por numero de registro, nombre, apellido, documento de identidad en su respectiva columna y quiero mover un registro con todo el rango, mi pregunta o duda cae en si es posible que por medio de una macro asignada a un boton me pregunte segun el numero y me mueva todos ese rango del numero registro a una nueva hoja X y me muestre la nueva hoja X. se puede? o estoy soñando? Gracias por su ayuda, me ahorraria mucho ya que lo hag…

Buenas días amigos del foro. Mi problema es el siguiente: Tengo un archivo con 198 hojas que contienen información de medicamentos, algunos tiene un formato de color que nos alerta en su prescripción, he adaptado una macro para poder concentrar las información en la hoja que he llamado "Concentrado", lo que no he logrado hacer es que en el conecentrado tambien me copie el formato de cada renglon. Espero su ayuda como siempre lo han hecho. Le anexo el archivo de ejemplo Saludos. Transportar a nueva hoja v1.xls

Buenas Noches, Tengo el archivo adjunto, el cual se completa y copia a las celdas debidamente, sin embargo quisiera que en vez que este el textbox18 (proveedor) sea un combobox el cual tenga los nombres de los proveedores de las pestañas (IMPORT1, IMPORT2, IMPORT3), los cuales al momento de selecionar se copie automaticamente a sus respectivas hojas, pero solo los datos de A9 hasta F9 que serian osea, N° de OC Cliente, Fecha OC, Trabajo N°, Cliente, Vta. Neta Local, Vta. Neta Directa del Userform6, claro y que se mantenga que se siga creandouno ensima debajo de otro caba vez que ingrese uno nuevo. Mus¿chisimas Gracias por su apoyo! EJEMPLO OC.zip

Estimados Buenas tardes. Sigo aqui con mi programacion la cual estroy por culminar he implementado varios de los codigos que he hido aprendiendo con el maestro bigpetroman entre otros maestros de los cuales revisando sus codigos he podido implementar mucho de lo que he necesitado. pero ahora me he quedado estancado en algo que parese simple pero no he podido solucionar. es por eso que solicito su ayuda o guia. lo que hace el excel es que cuando ingreso al formulario inicial con el boton TREN DE RODAMIENTO hago la seleccion de la famillia del equipo, una vez seleccionado me extrae una lista de codigos que se encuentra dentro de esa familia.(esto se hace con la intencion…

Hola... ¿Qué se debe modificar en el código para buscar por número de cédula? Filtro.xlsm

Hola a todos, Estoy en el proceso de crear una base de datos y necesito replicar en filas la misma información para las diferentes empresas y para diferentes meses. Las variables son las siguientes: # empresa, nombre de empresa, # cuenta, nombre de cuenta y mes. En la base de datos me deben quedar todas las empresas, todas las cuentas para los 12 meses del año. Debido a que necesito colocar un valor diferente para cada empresa, cuenta y mes. Para el ejemplo adjunto, al final, deberían quedar 1200 filas. (12 meses x 10 empresas x 10 Cuentas) Tal vez no me hago entender muy bien pero no se como redactar lo que necesito, por eso envío …

Hola a todos. Tengo una macro para enviar correos y adjuntar varios archivos. Pero quisiera poner un código que me avisara que no hay archivo adjunto y así poder abortar el proceso. ¿Es posible? Gracias. Moises.

Muy buenas a tod@s espero que me puedan ayudar, quisiera que desde una hoja excel , pinchando en la foto del relosj, se ejecutase el reloj -temporizador de windows 10, pero de momento no lo he conseguido , muchas gracias de antemano por sus respuestas. PRUEBA TEMPORIZADOR.xlsx

Hola de nuevo amigos, alguien podría explicarme por que en un formulario al darle al boton de salir no se esconde. He probado de todo y no quiere salir. En el archivo adjunto tengo la secuencia mas lógica que he encontrado pero no se si es por la ortografía o por algún fenomeno extraño, el caso es que no va. gracias y un saludo a todos Pruba formulario.rar

Hola estimados amigos de ayuda excel quisiera pedirles de favor me ayuden con el siguiente problema: Tengo en la celda a1 de la hoja 1 un texto que puede ser mas largo eso no importa, he colocado un botón con un código que al presionar separa el texto en varias líneas pero el problema es que sustituye el contenido de la celda a1 de la hoja 1, me interesaría que la celda a1 de la hoja 1 quede intacta con la información que se muestra inicialmente y más bien que al presionar el botón del formulario se pueda copiar el contenido a la hoja 2 ahí si me interesa que se separe en líneas como actualmente lo hace, el código trabaja, pero, lo que quiero es que NO sustituya el c…

Hola, necesito de su ayuda, resulta que debo imprimir un formulario, pero antes que se imprima, se debe crear una copia de este en formato pdf y en una ubicacion especifica, esto es por si la impresora falla, favor ayudar, gracias

Hola amigos. Tengo este codigo que llena el ComboBox Private Sub CargaCombus() ' CARGAR COMBOBOX Dim cargo As Variant Dim anchura As Variant With Base cargo = .Range("A2:H2") ' ("A2:B2,E2:H2") aqui el rango End With With cmbCampo .List = WorksheetFunction.Transpose(cargo) '.Text = "" End With End Sub[/CODE] Son 8 columnas desde la A a la H Lo que pretendo es que en el combo solo se vean (se llene) las columnas A, B, E, F, G, H,

Amigos necesito de su ayuda, quiero que la variable capturada en la txtbox1 me refleje el valor en la TexBox2 el rango de esta condicion esta en una hoja y el formulario en otra Adjunto archivo A espera de sus ayuda como siempre Gracias POLO.rar

Buenas Noches a Todos: Tengo una matriz de datos, simple, que otras personas diligencian, y se me ocurre que para evitar que cada uno de los registros sea modificado conforme a la conveniencia de cada persona, deseo escribir en una celda (en cada registro o fila del registro), en el formato de Fecha y Hora, (now()), el valor, al momento de escribir el primer dato en la celda del registro, pero que inmediatamente lo tenga y se calcule el valor now(), este valor quede inmodificable, asi puedo saber la fech y hora de creación del mencionado registro. Muchas Gracias !

Buenos días y gracias de antemano. Me estoy devanando los sesos y no consigo lo que necesito, que no es sino lo siguente: Tengo dos libros de excel, cada uno de ellos, en un directorio diferente de una red. A saber: H:\PROFESORES\ESTUDIOS\03_GESTION IPA\CURSO 2014_2015\DATOS\CUARTO\1CTR\RESUMEN.xls H:\PROFESORES\ESTUDIOS\03_GESTION IPA\CURSO 2014_2015\DATOS\FECHAS LIMITE.xls En la celda B5 DE FECHAS LIMITE.XLS pongo la fecha tope a partir de la que ya no se permitirá a los usuarios hacer uso del libro RESUMEN.xls. La idea es que cuando se abra la hoja"RESUMEN" del libro RESUMEN.xls, el procedimiento Sub auto_open() lo primero que haga es comprobar la fecha actual del…

Hola a tod@s Quiero eliminar varias filas de excel cortandolas y eliminandolas de la hoja. Le he puesto este codigo pero me da un error, Subindice fuera de intervalo. Pero la celda es la M2 seguro. Cells.Find(What:=Range("M2"), After:=ActiveCell, LookIn:=xlFormula, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate