Copiar rango al portapapeles

Question

Me gustaría copiar un rango (especificado en el código VBA: A1: I1) en el portapapeles, para que el usuario pueda pegarlo donde quiera. ¿Cómo podría hacer esto?

Answer 1

gama tiene un método de copia en él, por lo que para copiar un rango que puede simplemente hacer:

Sub Macro1() 
    Range("A1:I1").Copy 
End Sub