Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Excel - ocultar filas que cumplan condicion " con macro"

  Imprimir  
Vista:
Me gusta: Está pregunta es útil y esta clara
0
No me gusta: Está pregunta no esta clara o no es útil
 
Asunto:

ocultar filas que cumplan condicion " con macro"

Autor:raul (4 intervenciones)
Fecha:22/07/2009 19:50:58
saludos..

tengo una tabla con datos, en la columnba b hay un dato que puede ser "si" o "no"
lo que deseo es mediante una macro se oculten de manera automatica las filas que tengan el dato "no" en la columna b.. este dato esta cambiando constantemente mediante una formula condicional, es por ello que necesito que cada vez que aparezca un no el la columna b esa fila se oculte en automatico..
lo he intentado con algunos ejemplos que encontre en algunos foros, pero no he logrado adaptarlo ya que tengo poco conocimiento en vb..

gracias de antemano...
Responder
información
Otras secciones de LWP con contenido similar...
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:lucho (60 intervenciones)
Fecha:22/07/2009 21:15:27
Saludos Raú:
Aquí te paso un tip:
Public Sub MostraryOcultarCeldas()
If Range("b1:b9").EntireRow.Hidden = True Then
Range("b1:b9").EntireRow.Hidden = False
Else
Range("b1:b9").EntireRow.Hidden = True
End If

End Sub
Nota: Nada más oculta todas las celdas, hasta este momentos no encuentro la forma en donde coloco el texto " No"
Espero te sirva de algo, mientras siguimos investigando.
Un favor encuanto lo resuelvas o alguien nos pueda apoyar, me gustaría que me lo hicieras saber.
Gracias.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:ricardo (2 intervenciones)
Fecha:15/12/2009 13:08:36
hola chaveles yo lo he hecho muy facil, y me resulta, espero que a vosotros tambien.

copiar este codigo.:

Sub ocultarfilas()
'
'
'

For Each celda In Range("b5:b10")
If celda.Value <= 0 Then
ActiveCell.EntireRow.Hidden = True
Else
ActiveCell.EntireRow.Hidden = False
End If
ActiveCell.Offset(1).Select
Next

End Sub

un saludo.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:Arley (1 intervención)
Fecha:01/09/2013 03:20:16
Hola Ricardo,

Excelente este ejemplo funciona sin problemas

Saludo a todos
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:Hernan Alvarado (1 intervención)
Fecha:12/06/2014 16:56:06
Práctico, sensillo y útil
gracias por tu colaboración
Hernan Alvarado
La Paz Bolivia
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:jcs (447 intervenciones)
Fecha:23/07/2009 09:27:10
Muy buenas

A ver si algo así te vale:

Private Sub ocultar_mostrar()
inicio = Range("b1").End(xlDown).Row
For i = inicio To 65000
If Cells(i, 2) = "no" Then
Rows(i).Select
Selection.EntireRow.Hidden = True
ElseIf Cells(i, 2) = "si" Then
Rows(i).Select
Selection.EntireRow.Hidden = False
Else
Exit For
End If
Next
End Sub

Si tienes muchas filas con datos, la macro puede ser lenta, ya que tiene que pasar una a una por todas ellas. No obstante, si uno de los datos (si o no) es mayoritario, se podría acelerar mucho la ejecución, dímelo.

Espero que sea lo que quieres.

Un saludo. Juanjo.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:frany (58 intervenciones)
Fecha:23/07/2009 21:18:37
No se si me he perdido, pero creo que lo importante es tambien sea automatico verdad?
Habria que adaptar quizas el codigo de Juanjo para que funcionase con los eventos, es decir si una celda cambiase su valor a no, se activase un evento para que se ejecute la macro del tipo
Worksheet_SelectionChange(ByVal Target As Range) o Worksheet_Change(ByVal Target As Range).
Un saludo.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:frany (58 intervenciones)
Fecha:23/07/2009 21:24:14
Con permiso de Juanjo
Tan solo añadiendo en thisworkbook el evento siguiente podria valer

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
ocultar_mostrar
End Sub

saludos.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:jcs (447 intervenciones)
Fecha:24/07/2009 09:19:45
Pues ya ves, Frany, no te doy permiso. ¿Sabes por qué? … Pues porque no lo necesitas. Además me parece correcta tu aportación y perfectamente aplicable a la cuestión que plantea Raúl, al evitar tener que ejecutar manualmente una macro, cuando se puede efectuar automáticamente.

El problema que le veo es que, ante cualquier cambio de un dato se va a lanzar la macro, y es posible que haya datos que no influyan en los resultados de la columna B, con lo que aquella se ejecutaría de forma innecesaria, ralentizando sustancialmente el proceso.

Una solución intermedia sería que se identificaran los distintos “target” de los que dependan las fórmulas de la columna B. Por ejemplo, si las fórmulas que tiene para la columna B dependen de la celda C1 y de la columna F, podría quedar algo así como:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$1" Or Target.Column = 6 Then
inicio = Range("b1").End(xlDown).Row
For i = inicio To 65000
If Cells(i, 2) = "no" Then
Rows(i).Select
Selection.EntireRow.Hidden = True
ElseIf Cells(i, 2) = "si" Then
Rows(i).Select
Selection.EntireRow.Hidden = False
Else
Exit For
End If
Next
End If
End Sub

Un saludo. Juanjo.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:frany (58 intervenciones)
Fecha:24/07/2009 15:12:35
Al empezar a leer, pensé que estabas enfadado :-(
Menos mal que no es asi :-)
Es bueno esto de los foros porque siempre aprendo cosas nuevas, asi es como debe ser la filosofia de la gente en los foros, bueno y fuera de ellos jajaja.

Muchas gracias Juanjo
Un saludo.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:silvia (1 intervención)
Fecha:17/11/2009 23:48:34
hola
estoy interesada en este tema de ocultar filas automáticamente, o hacerlas aparecer según la condición, para empezar, no se casi nada sobre macros, cada vez que necesio algo, lo busco en la web y la bajo segun las indicaciones,
ahora estoy necesitanto una macro que oculte filas cuando en una celda determinada (az 28), me indique "si", en esta celda hay una formula condicional, y me puede arrojar si, o no.

Encontré esta macro, y la he pegado en el codigo que aparece en la etiqueta de la hoja,
Private Sub Worksheet_Activate()
Worksheet_Change ([az28])
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If [az28] = "si" Then
[a28:a32].EntireRow.Hidden = True
Else
[a28:a32].EntireRow.Hidden = False
End If
End Sub

y funciona muy bien, pero siempre y cuando yo escriba manualmente Si en az28,
como indiqué líneas arriba, en esta celda, tengo una formula con una condición.
por favor, me podrán ayudar?
gracias anticipadas a quien lo pueda hacer
Saludos,
Silvia.
Comentar
Me gusta: Está respuesta es útil y esta clara
0
No me gusta: Está respuesta no esta clara o no es útil
 
Asunto:

RE:ocultar filas que cumplan condicion

Autor:Sandra Blanco Cepeda (1 intervención)
Fecha:18/11/2011 17:28:09
Juango Buenos Días

me podrias ayudar yo soy nueva en esto de la cuestion de macros yo elabore un archivo donde ingreso mis facturas por pagar y en automatico me va dando los resultados que deseo pero tengo una seccion que le puse prevension de pagos y ahi me van apareciendo los proveedores que tengo al corriente y los proveedores con facturas vencidas y no pagadas yo de inicio lo maneje con una lista desplegable yo busco al proveedor y en automatico me aparece la demas informacion pero estoy buscando un macro que en automatico me oculte las filas que no tienen informacion pero no he logrado que las macros aqui presentadas me funciones.

mi pregunta es si te puedo enviar mi archivo a tu correo para que lo cheques quizas no me doy mucho a entender escribiendo

mi correo es sbc1106@prodigy.net.mx
Comentar