Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Range.PasteSpecial en VBA

| Sin comentarios

El Range.PasteSpecial nos ayuda a poder pegar un rango de datos que requerimos, desde  una hoja o libro en específico para luego pegarlo con alguna función adicional. La función Range.PasteSpecial nos ayuda de gran manera ahorrando tiempo en realizar funciones repetitivas u optimizando el trabajo cuando tenemos datas de gran tamaño, previniendo así poder equivocarnos al realizar algún cálculo manualmente.

Para una mejor compresión a continuación se presentan los siguientes ejemplos:

Ejemplo 1. Seleccionar y Copiar un rango y pegarlo desde un botón

De un rango de datos  podemos seleccionar los datos que  necesitamos:

Captura1 1 Range.PasteSpecial en VBA

En el programador se puede emplear el siguiente código:

Captura2 1 300x177 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Luego, para hacerlo práctico,  insertamos una recuadro y le asignamos la macro creada.

Captura3 1 300x217 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Damos doble clic en la primera macro que aparece para asignarla al recuadro:

 

Captura14 300x116 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Seleccionamos y copiamos el rango requerido, luego se sitúa en la celda que se desea pegar y se da clic en el botón azul para que se aplique la macro.

Captura6 1 300x81 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Quedando de la siguiente manera:

Captura7 1 300x66 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Ejemplo 2: Sumar dos rangos de celdas (Rango A y Rango B) y colocar el resultado en el Rango B.

Se tiene una hoja de excel con la data:

Captura9 300x77 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Se coloca la siguiente codificación, donde el rango de Censor2 a Censor34 es el factor de corrección que se va a sumar al rango Censor34 (AK2 : AK34) y el resultado se va a colocar en el Censor 34.

Captura10 300x230 Range.PasteSpecial en VBA

(Para mayor visualización de  la imagen, hacer click en la misma)

Después, se procede a ejecutar la macro:

Captura12 Range.PasteSpecial en VBA

Se realiza la suma en el rango establecido.

Captura15 Range.PasteSpecial en VBA

La macro se encuentra en el siguiente Link:  Range.PasteSpecial en VBA

Por: Mirella Aucapiña

Deja una respuesta

Los campos requeridos estan marcados con *.