Macro para eliminar celdas según criterio de una celda
Mi consulta es que necesito una macro donde en la Hoja llamada "OPCIONES" donde en la celda C14 hay una lista desplegable con SI Y NO, que haga que en mi hoja "COTIZACION" elimine las filas 66 a 83 al poner NO y al poner SI, que se queden igual.
2 Respuestas
Respuesta de Dante Amor
2
Pon la siguiente macro en los eventos de tu hoja "OPCIONES"
Private Sub Worksheet_Change(ByVal Target As Range)
'Por Dante Amor
'Cada que selecciones SI en la celda C14 que se eliminen las filas 66 a 83
'
If Not Intersect(Target, Range("C14")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
If Target.Value = "NO" Then
Sheets("COTIZACION").Rows("66:83").Delete
End If
End If
End SubSigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja OPCIONES)
- En el panel del lado derecho copia la macro
Listo, cada que selecciones la palabra "NO" en la celda C14 de tu hoja "OPCIONES" se eliminarán las filas de la hoja "COTIZACION"
Si no quieres eliminar la fila y solamente quieres borrar el contenido, entonces cambia en la macro esta línea:
Sheets("COTIZACION").Rows("66:83").DeletePor esta línea:
Sheets("COTIZACION").Rows("66:83").ClearContents'.[Sal u dos. Dante Amor. No olvides valorar la respuesta. '.[Avísame cualquier duda
Respuesta de Programar Excel
