Pessoal, bom dia!

Não sei se existe um termo correto, mas eu gostaria de saber como "otimizar" o codigo abaixo, pois a minha planilha tinha 400k, quando inclui a macro com esse codigo ela foi pra 20MB! Queria otimizar o codigo para ver se consigo reduzir a memoria ocupada!
Quando digo otimizar, eu pergunto se consigo fazer o exemplo abaixo com o codigo que vou deixar no final da mensagem

Como era
Worksheets("Plan1").Select
Variável = Range("A1").Value

Como ficou:
Variável = Worksheets("Plan1").Range("A1").Value

O MEU CODIGO (ele seleciona uma coluna enquanto houver celular preenchidas, copia e cola em uma coluna em outra sheet.)
Sheets("minha_aba").Select
Range("F3").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("aba de destino").Select
Range("B11").Select
ActiveSheet.Paste

Eu tentei reduzir ele, mas ele so esta copiando a primeira linha, quando na verdade na minha coluna tem dados preenchidos em outras linhas (e a quantidade de celulas preenchidas sempre varia).

Obrigada!