Hola @RubenDario Faltaría que en cada línea dentro del With le pongas un punto al inicio With Hoja1 .Range("B6:B18,F6:F18,J6:J18").Select .Range("J6").Activate With Selection.Interior .Pattern = xlNone .TintAndShade = 0 .PatternTintAndShade = 0 End With .Selection.ClearContents .Range("A1").Select End With Sin embargo, lo que yo haría (si fuese mi proyecto)... te ofrezco varias soluciones. No asignarlo a una combinación de teclas, mejor ponerlo en una forma o botón. Modificar tu libro con la app Custom UI Editor o similar y adicionar un botón en el Ribbon, estará visible solo cuando el libro esté activo. Al principio de tu código pondría algo como: If Thisworkbook.Name <> ActiveWorkbook.Name Then Exit sub
Por
DiegoPC , · publicado el 28 de agosto 28 ago
Buenas tardes
Quiero saber si en la base de 400 filas hay alguna, no me importa cual sea, que cumpla unas condiciones determinadas.
- En la columna B un nombre concreto (En el ejemplo: Amalia)
- En la columna D o en la columna F un dato concreto (En el ejemplo: Libro 1)
Lo que en una fila vendría a ser:
=SI(Y($B2="Amalia"; O($D2="Libro 1"; $F2= "Libro 1")); 1; "")
pero revisando en todas las filas.
Gracias
Edito porque igual lo que yo me estoy planteando no es el enfoque correcto.
Quiero marcar en la Hoja 2 si esas condiciones se cumplen en alguna fila de la Hoja 1.
Envío.xlsm
Editado el por Maku