2 Macros | 1° Pegar como valor | 2° Pegar como valor y traspuesto

[ggorino]

Hola Exceleros, cómo están?

Estoy buscando la manera de crear dos macros, ya intenté de manera casera (grabando los pasos y eliminando la parte de "copiar" en el codigo, pero al momento de pegar...

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í

 

[Macro Antonio]

1) Activecell.PasteSpecial Paste:=xlValues
2) Activecell.PasteSpecial Paste:=xlValues, Transpose:=True

 

[ggorino]

1) Activecell.PasteSpecial Paste:=xlValues
2) Activecell.PasteSpecial Paste:=xlValues, Transpose:=True

Me tira error al ejecutarla con un...

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í

 

[Macro Antonio]

¿Y el Copy? Porqué no subes tu archivo.

 

[ggorino]

¿Y el Copy? Porqué no subes tu archivo.

Yo lo que necesito es un shortcut, para pegar como valor. No necesito que la macro copie, eso 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í

 

[Macro Antonio]

Estoy buscando la manera de crear dos macros

¿?

 

[Leopoldo Blancas]

Me tira error al ejecutarla con un valor copiado, estoy utilizando este codigo:

Sub PasteValues()
'
' Acceso directo: CTRL+f
'...

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í

 

[ggorino]

A ver amigo... este código funciona muy bien, solo que a lo mejor se te olvido "copiar" primero antes de ejecutar esta macro.

Y preguntas...

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í

 

[ggorino]

1) Activecell.PasteSpecial Paste:=xlValues
2) Activecell.PasteSpecial Paste:=xlValues, Transpose:=True

Antes corría esta macro que pegaba...

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í

 

[Macro Antonio]

A ver amigo... voy a intentar ser mas explicito con "la mecánica" a la que haces referencia.

Estando en cualquier celda de cualquier pestaña...

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í

 

[ggorino]

Pues bien, me ratifico en la respuesta del post #2.
Si subes un archivo te adapto las macros para que te funcionen.

Gracias por tu ayuda...

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í