In worksheet One, starting with A3, I have 10 columns and 10 rows full of
number data. Using VBA, I would like to go to worksheet Two, column A, Row
3, and enter the following: Concatenate (One!A3," ",One!A4," ",One!A5) and
copy this formula (relatively) from A3 through A12.



Can someone tell me how this is done or point me in the right direction?



Thanks!

Worksheets("Two").Range("A3:A12").Formula = _
"=One!A3&"" ""&One!A4&"" ""&One!A5"

- Jon
-------
Jon Peltier, Microsoft Excel MVP
Tutorials and Custom Solutions
Peltier Technical Services, Inc. - http://PeltierTech.com
_______


"medirate" wrote in message
...
In worksheet One, starting with A3, I have 10 columns and 10 rows full of
number data. Using VBA, I would like to go to worksheet Two, column A, Row
3, and enter the following: Concatenate (One!A3," ",One!A4," ",One!A5) and
copy this formula (relatively) from A3 through A12.



Can someone tell me how this is done or point me in the right direction?



Thanks!

Maybe

Sub sonic()
Sheets("Sheet2").Range("A3").Formula = _
"=Sheet1!A3 &"" ""& Sheet1!A4 & "" ""&Sheet1!A5"
Sheets("Sheet2").Range("A3").AutoFill Destination:=Range("A3:A12")
End Sub

Mike

"medirate" wrote:

In worksheet One, starting with A3, I have 10 columns and 10 rows full of
number data. Using VBA, I would like to go to worksheet Two, column A, Row
3, and enter the following: Concatenate (One!A3," ",One!A4," ",One!A5) and
copy this formula (relatively) from A3 through A12.



Can someone tell me how this is done or point me in the right direction?



Thanks!