Visual Basic - crear bucle for next

Life is soft - evento anual de software empresarial
   
Vista:
Imágen de perfil de Emiliano

crear bucle for next

Publicado por Emiliano (8 intervenciones) el 28/09/2017 00:45:34
hola buenas tardes

esperando alguien pueda apoyarme con este problema
necesito aplicar un ciclo for next a 3 lineas de codigo que hacen lo mismo solo cambia el criterio

Range("F2").AutoFilter Field:=6, Criteria1:="*AB TRANS ELECT*"

Range("F2").AutoFilter Field:=6, Criteria1:="*DEP EN ATM*"

Range("F2").AutoFilter Field:=6, Criteria1:="*DEP EN EFECTIV*"

esta son las lineas de codigo
hacen lo mismo solo que en cada una de ellas cambia el criterio

esperando puedan apoyarme muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo

crear bucle for next

Publicado por Andres Leonardo (1106 intervenciones) el 28/09/2017 19:21:55
pero para que necesitas el ciclo? cuando se aplica cuando empieza cuando termina???? no es clara tu necesidad y por que haces esos filtros asi.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Emiliano

crear bucle for next

Publicado por Emiliano (8 intervenciones) el 28/09/2017 22:12:26
hola buenas tardes Andres
grcias por contestar

AB TRANS ELECT necesito filtrar digamos que este tipo de pagos entre barios que ay pero solo necesito los tres que comente en las lineas de codigo
solo que utilice la funcion para quitar espacios y la función remplazo pero no me quita los espacios que quiero ya que al final trae dos o tres espacios en blanco y solo lo que e conseguido es que me quite los espacios de entre las palabras

El proceso va en la columna F y entonces estas lineas que estoy utilizando solo es para detectar el nombre y filtrar los tres tipos de pagos de entre mas de diez
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

crear bucle for next

Publicado por Leon Gitano (3 intervenciones) el 30/09/2017 21:31:51
No te entiendo bien tu pregunta pero puedes intentar esto:

Range("F2").AutoFilter Field:=6, Criteria1:="*AB*TRANS*ELECT*"

Range("F2").AutoFilter Field:=6, Criteria1:="*DEP*EN*ATM*"

Range("F2").AutoFilter Field:=6, Criteria1:="*DEP*EN*EFECTIV*"

suerte haber si es lo que nesecitas.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar