Detectar texto y realizar una acción

[rafeta]

Hola buenas, he estado realizando varios intentos con una macro y no consigo dar con la solución.
Antes de nada decir que soy un principiante en el maravilloso mundo de las macros.
Mi problema es...

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! rafeta:
Nota que tu archivo no contiene ninguna pista respecto a cual es el resultado final que deseas conseguir.
Quizás sea una buena idea que subas al Foro un libro con dos hojas...

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í

 

[rafeta]

Hola Cacho R, en primer lugar darte las gracias por tu tiempo.
Tienes toda la razón, con el primer mensaje no doy ninguna pista.
He subido otro libro con 2 hojas con el que creo que ahora será más...

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! Rafeta. Intenta si tienes suerte con algo así:

Sub Copiar_y_transponer()
'-------------------
' By Cacho Rodríguez
'-------------------
Dim C As Range, D As Range...

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í

 

[rafeta]

Creo que sí, lo he probado en un fichero y funciona!!!! eres un artista!!!
Muchas gracias, no sabes el tiempo que llevaba intentándolo!!!
Gracias amigo, te debo una! :wink:

 

[Cacho R]

Gracias amigo, te debo una! :wink:

¡Qué bueno!... Hasta la próxima.

 

[silvia quispe]

hola rafeta y Maestro Cacho

Maestro... un favor, podrías comentar un poco el código que adjuntaste???... ¿siiiiiiii?

Explicado como para una niñita de 6 añitos que no sabe nada de excel y...

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]

Mi estima Sil. Al preguntarle a rafeta:

- Los grupos de datos parecen terminar con dos celdas en la columna B que están vacías (B123 y B124 por ejemplo): ¿Siempre es así?

...

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í

 

[silvia quispe]

Sub Macro1()
'
' Macro1 Macro
'

'
    Selection.End(xlDown).Select
    Selection.End(xlDown).Select
End Sub

Primero seleccionarás B126 y luego B246, ¿No es...

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]

Me salió esto, y cuando la ejecuto, se va hasta A747 :shock:

Uno sabe que las cuestiones terrenales no tienen la envergadura suficiente como para que las Diosas las...

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í

 

[silvia quispe]

A cocachos aprendí...
https://www.poesi.as/nsc0016.htm

Uno sabe que las cuestiones terrenales no tienen la envergadura suficiente como para que las Diosas las tengan en...

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í

 

[silvia quispe]

Maestro
las clases se han postergado???
:roll:
:mrgreen:

 

[Cacho R]

Maestro: ¿las clases se han postergado???
:roll: :mrgreen:

Unos 500 años a.C. el Maestro Kong (Confusio) enseñaba que la paciencia infinita...

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í

 

[silvia quispe]

ok Maestro, ok

Ommmmmmmmmmmmmmmmmmmmm
Ommmmmmmmmmmmmmmmmmmmmmmm

rsrsrsrsrsrs
:mrgreen:

Que tengas un lindo día..

Silvia

 

[Cacho R]

Sigamos, entonces, con la penúltima entrega para este tema:

---

-> Nos situamos en la celda B122.
¿Para qué?... Para copiar el rango de datos A125:B248 y pegarlo -transpuesto- en la hoja "lo...

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í

 

[silvia quispe]

Entonces: ¿Se entendió como obtener A125 y B248 a partir de B122?

Maestro, mil millones de gracias... , si entendí, con semejante Maestro, quien no...¿?
de paso...

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í

 

[silvia quispe]

Unos 500 años a.C. el Maestro Kong (Confusio) enseñaba que la paciencia infinita produce resultados inmediatos.

Dos mil años más tarde, Willy el bardo de Avon, se preguntaba...

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]

y eso que estoy tomando "tranquilina" forte de 500 mgr. :mrgreen:

Por la paciencia demostrada diría que más que "de 500 mgr" has tomado de "de 3500 mgr"...

---

...

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í

 

[silvia quispe]

Maestro Cacho

Cuando te pedí que me expliques, en realidad, yo pensaba en una explicación, así como las que hacen a veces dentro del mismo código:
Subimos, bajamos, abrimos una nueva hoja...

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]

"D" arranca siendo la celda B122, y luego pasa -sucesivamente- a ser: B246, B370, B494, B618, B742 y B1048576 (ó B65536 en Excel 2003).

Mientras que Rows.Count...

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í