Ayuda

[canallitaxx]

Buenos Días

Estimados solicito su ayuda con la siguiente Macros

Al ejecutar la macros realizo una filtro por criterio luego selecciona la columna "I" y pego los datos en la
columna "J" pero...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Hola,

Solo cambia estas lineas:

Dim uF As Long
uF = Range("A" & Rows.Count).End(xlUp).Row

'Seleccionar rango de celdas origen
rngOrigen.Select
Range(Selection, "I" &...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

Hola! canallitaxx (y Leopoldo)
Hay algo que está mal o "raro" en lo que muestras. O sea:

- Filtras tu rango de datos por la columna Zona buscando el texto "SDA" (hasta aquí: normal).

-...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Hola Cacho R

Si note eso... pero solo le respondi lo que pregunto... :lol:

Saludos

 

[Cacho R]

Hola Cacho R
Si note eso... pero solo le respondi lo que pregunto... :lol:

Tratemos de ayudarlo, entonces...

 

[Leopoldo Blancas]

Hola Canallitaxx (y Cacho R)

Bueno,.... a petición del público :lol:

Prueba a ver si es esto lo que necesitas y comenta por favor.

Saludos

 

[canallitaxx]

Hola Leopoldo

Gracias.... por tu inmenso Apoyo, ya que la macro me funciono perfectamente, lo único que modifique(Quitar) fue el limpiador de columna.

Cacho R
respondiendo a tus...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

... Aparte de Texto "SDA" se deseaba Obtener los siguientes Textos:

1: SDA
2: CONSUMO
3: CONTROLADO
4: CONV
5: DIN1
6: DIN2
7: LACT2
8 LACTEOS
9: TRILATERALSALUD

para...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[canallitaxx]

Hola

Cacho R y Leopoldo

Me podrían ayudar con lo siguiente :

bueno deseo realizar un filtro en la columna Area "J" y encontrar el texto "S_FARMA" para luego remplazarlo con texto "Knapp Farma"...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[elforex]

Hola, puedes probar realizando el reemplazo directo sin filtros.

Sub Actua()

    Dim Q&
    
    Q = Range("A" & Rows.Count).End(xlUp).Row
    
        With Range("J2:J" & Q)...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Leopoldo Blancas]

Hola Canallitaxx,

Echale un vistazo a recorrer filas y columnas en YouTube y tambien a los conceptos de For Wach, With..., set...
For Next, Do while, Do Until, If y select Case... con esto medio...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí