Makro ile hücre aralığı kopyalama hk

[OoParadiSeoO]

Arkadaşlar,

Range("B2:E2").Select
Range(Selection, Selection.End(xlDown)).Copy

yukarıdaki kodun yaptığı işlemi select kullanmadan farklı bir şekilde nasıl yapabiliriz? B2:E2 aralığından itibaren son dolu hücreye kadar kopyalayacak..

 

[hamitcan]

Bu şekilde deneyin.

Range("B2:E"&[B65536].END(3).ROW).COPY