James Bond

Esta macro copia unicamente las celdas que tengan datos, como ves el error esta en que estas usando xldown en vez de xlup, para hacer más eficiente la amcro y no entrar en instrucciones especiales o ciclos for o do use un autofiltro y el resultado lo...

Prueba con esta fórmula =+SI.ERROR(INDICE($B$2:$B$600,COINCIDIR(O2,$A$2:$A$600,0)),"NO EXISTE") el resultado es este, si lo encuentra coloca el email sino pone no existe

Esta es tu macro con algunos cambios, después del infopath puse una condición de salida que en caso de que canceles te saquede la macro sin cerrar el programa Sub test() Dim MyResultados As String 'donde guardo el nombre del libro de resultados Dim...

Prueba esta macro borra las celdas que contengan un color no importa si es de formato condicional, creo que ya te había pasado esta macro, lo único que tienes que averiguar es el color RGB eso lo haces con la grabadora de macros, grabando cuando...

No explicas muy bien lo que quieres ni muestras un ejemplo basado en tus datos así que sin eso lo más que puedo darte es un en ejemplo para que lo adaptes a lo que necesitas, esta macro al ir tecleando en el textbox te va a ir filtrando las palabras...

Prueba esta macro aplica un filtro por color y hace un borrado masivo de filas, sin importar si son uno o un millón, solo cambia los A1 de la por la celda donde comiencen tus datos y es toda la modificacion que tienes que hacer Sub borrar_filas()...

Prueba con una matriz la cual se carga así, matriz=range("b11").currentregion listbox1.list=matriz Esto es equivalente a una función rowsource, si lo que quieres es cargar un listbox directo de access sin pasar por Excel que es lo que supongo al...

Te falto poner entre comillas el nombre de la hoja Sub Copia_Tipo() If ActiveSheet.Index = 10 Then CUO = Hoja2.Range("M1") Sheets("Hoja2"). Range("G1:H1"). Copy Worksheets("Hoja2").Range("G9:H" & CUO). PasteSpecial xlPasteAll...

Veamos lo que quieres sigue la misma línea de lo que has pedido relacioando con VBE y esto es por el mismo estilo, quieres modificar el valor de la label1 del userform lugarfaldas desde una macro que esta en un modulo estándar, pues bien ciento...

No me quedo claro que es lo que quieres te envío esta macro Sub COPIAR_COLUMNAS() Set DATOS = Sheets("DATA").Range("A2").CurrentRegion With DATOS FILAS = WorksheetFunction.CountA(.Columns(2)) - 1 COL = .Columns.Count - 1 Set DATOS = .Cells(2,...