Sub CombineText()
Dim RowLooper As Integer
Dim ColumnLooper As Integer
For RowLooper = 1 To 3
For ColumnLooper = 1 To 10
Range("O" & RowLooper).Value = Range("O" & RowLooper).Value & Cells(RowLooper, ColumnLooper).Value
Next
Next
End Sub
Be the first to comment
You can use [html][/html], [css][/css], [php][/php] and more to embed the code. Urls are automatically hyperlinked. Line breaks and paragraphs are automatically generated.
Be the first to comment
You can use [html][/html], [css][/css], [php][/php] and more to embed the code. Urls are automatically hyperlinked. Line breaks and paragraphs are automatically generated.