Copiar dados de uma coluna após localizar

Srs. Boa Noite.

Estou aprendendo a programar em VBA, e tenho uma dúvida. Como faço para buscar uma informação dentro de uma planilha, pelo cabeçário, copiar a respectiva coluna (Pode ter células em brando) e colar em outro arquivo.

Usei o seguinte código (Com ajuda do gravador de Macros):

Windows("RELATÓRIO DE VANDALISMO.xls").Activate
Cells.Find(What:="BDN", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Windows("Vandalismo.xlsx").Activate
ActiveSheet.Paste

Porém, se encontra alguma célula em branco no meio, não copia as demais.

Desde já, muito obrigado.

Ola seja bem vindo ao forum;

Amigão, este fórum é exclusivo para Ms Access, a sua duvida pode ser colocada no nosso parceiro ExpertAccess (Sala Excel).

http://www.expertaccess.com.br/forumnew/forum_topics.asp?FID=12&SID=96bc6cfdzc5498573d9b82daffd2f4bf