Hi Tom,

Tom Ogilvy schrieb:
Using Resize might be clearer in terms of intent. Just offered for
consideration.

Range("A2").Resize(Range("B1").Value ,1).Value = Range("A1").Value

thus it goes naturally also :-)

--
Mit freundlichen Grüssen

Melanie Breden
- Microsoft MVP für Excel -

http://excel.codebooks.de (Das Excel-VBA Codebook)