Hi All,

Can anyone provide a VBA script that can expand on the following code to
automate looping through Row number 2 to Row number 60: populating each Row's
First Empty Cell with data from two non-adjacent columns (BG2:BG60 and BI2:
BI60). The data in BG2 and BI2 should be concatenated and placed in the First
Empty Cell of that Row (number 2) and the same for Row number three to Row
number 60 - concatenating Column's BG and BI Row data accordingly.

Current Code for First Row (Row number 2):

Rows("2:2").Find(What:="", After:=[BR2], SearchOrder:=xlByColumns).Select
Selection.Value = Range("BG2") & " " & Range("BI2")

Thanks
Sam

--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...mming/200606/1