Macro Simple

13/06/2012 - 23:59 por sebas270 | Informe spam

¡ Hola !
tengo 2 datos en las celdas c2 y c3, quiero hacer una macro simple que copie estos 2 datos y luego los pegue de manera sencilla (no transpuesta ni con diferentes formatos) en la celda que yo escoja, es decir, en la celda en la que yo este parado en ese momento (celda activa).

ya logre que las copie con:

Range("C2:C3").Select
Selection.Copy
Range("C8").Select
ActiveSheet.Paste

el problema de esta es que solo pega los datos en la celda c8 y yo quiero que los pegue en la celda activa.

muchas gracias

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

linea de macro a un simple formato de celda

Leer las respuestas

#1 Pedro F. Pardo

14/06/2012 - 13:38 | Informe spam

El miércoles, 13 de junio de 2012 22:58:54 UTC+1, sebas270 escribió:

¡ Hola !
tengo 2 datos en las celdas c2 y c3, quiero hacer una macro simple que copie
estos 2 datos y luego los pegue de manera sencilla (no transpuesta ni con
diferentes formatos) en la celda que yo escoja, es decir, en la celda en la que
yo este parado en ese momento (celda activa).

ya logre que las copie con:

Range("C2:C3").Select
Selection.Copy
Range("C8").Select
ActiveSheet.Paste

el problema de esta es que solo pega los datos en la celda c8 y yo quiero que
los pegue en la celda activa.

muchas gracias

Es muy sencillo, basta modificar la macro que tu tienes eliminando un par de líneas. En lugar de Seleccionar y después copiar puedes copiar directamente utilizando el comando Copy directamente después del Range y luego sin seleccionar nada, pegas. Las celdas se pegarán en la celda que tengas seleccionada. Así de fácil:

Range("C2:C3").Copy
ActiveSheet.Paste

Saludos ;-)
Pedro

Responder a este mensaje

#2 sebas270

14/06/2012 - 16:16 | Informe spam

sebas270 escribió el 13/06/2012 23:59 :

¡ Hola !
tengo 2 datos en las celdas c2 y c3, quiero hacer una macro simple que copie
estos 2 datos y luego los pegue de manera sencilla (no transpuesta ni con
diferentes formatos) en la celda que yo escoja, es decir, en la celda en la que
yo este parado en ese momento (celda activa).

ya logre que las copie con:

Range("C2:C3").Select
Selection.Copy
Range("C8").Select
ActiveSheet.Paste

el problema de esta es que solo pega los datos en la celda c8 y yo quiero que
los pegue en la celda activa.

muchas gracias

muchas gracias

funcionó perfecto

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida