Ocultar filas según condición en un determinado rango

Solo consultas sobre macros y código VBA Excel.
Reglas del Foro 1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!

Ocultar filas según condición en un determinado rango

Notapor Roberto2010 » 01 Ene 2018 20:14

Feliz año para todos !
le cuento mi necesidad en el archivo adjunto a modo de ejemplo. muchas gracias !
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
Roberto2010
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 230
Registrado: 26 Jul 2010 15:58

Re: Ocultar filas según condición en un determinado rango

Notapor eavjperu » 01 Ene 2018 20:53

Hola:

Una forma sería verificando que ninguna fila sume más de cero y/o que ninguna fila tenga valores en blanco, y de ser así, que las oculte:

Código: Seleccionar todo
Option Explicit

Sub Ocultar()

Dim Celda As Range
Dim Fila As Long, ValorBlanco As Long, Sumando As Long

For Each Celda In Range("D4:D9")
Let Fila = Celda.Row
Let Sumando = Application.WorksheetFunction.Sum(Range("C" & Fila & ":" & "E" & Fila))
Let ValorBlanco = Application.WorksheetFunction.CountBlank(Range("C" & Fila & ":" & "E" & Fila))
MsgBox "Fila " & Fila & " suma " & Sumando
If Sumando = 0 Or ValorBlanco = 3 Then
Celda.EntireRow.Hidden = True
MsgBox "oculta"
End If
Next Celda

End Sub


En el "For - Each" solo ajusta el rango a una columna correspondiente a tu matriz, ojo con eso, no a toda la matriz.

Saludos

Abraham Valencia
Avatar de Usuario
eavjperu
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 60
Registrado: 07 Nov 2017 11:59
Ubicación: Perú

Re: Ocultar filas según condición en un determinado rango

Notapor eavjperu » 01 Ene 2018 21:21

Por si acaso hay un "MsgBox" que se filtró, solo quítalo

Abraham Valencia
Avatar de Usuario
eavjperu
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 60
Registrado: 07 Nov 2017 11:59
Ubicación: Perú

Re: Ocultar filas según condición en un determinado rango

Notapor Roberto2010 » 02 Ene 2018 09:36

Abraham Valencia
quiero agradecerle por el código, me sera de mucha utilidad.
muchas gracias !!! y felicidades en este año nuevo.
Roberto2010
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 230
Registrado: 26 Jul 2010 15:58

Re: Ocultar filas según condición en un determinado rango

Notapor eavjperu » 02 Ene 2018 10:20

Excelente, feliz año :D

Abraham Valencia
Avatar de Usuario
eavjperu
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 60
Registrado: 07 Nov 2017 11:59
Ubicación: Perú


Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 3 invitados