J
jlclyde
What I am trying to do with this macro is concatenate G1 & B(Whatever
row is selected) & G2. So for instance I woudl like G4 to = G1 & B4 &
G2. Then go to G5 and that woudl be G1 & B5 & G2. I woudl like to do
this through a loop. I am sure the loop part is right, it is just the
stuff int he middle that is messed up.
Thank you,
Jay
Here is my code
Sub Monkey()
Dim G1 As Range
Dim G2 As Range
Set G1 = Range("G1")
Set G2 = Range("G2")
Dim nextRow As Long
nextRow = Selection.Row
Do Until Selection.Offset(0, -5) = ""
Selection = G1 & Range("B" & nextRow) & G2
Selection.Offset(1, 0).Select
Loop
End Sub
row is selected) & G2. So for instance I woudl like G4 to = G1 & B4 &
G2. Then go to G5 and that woudl be G1 & B5 & G2. I woudl like to do
this through a loop. I am sure the loop part is right, it is just the
stuff int he middle that is messed up.
Thank you,
Jay
Here is my code
Sub Monkey()
Dim G1 As Range
Dim G2 As Range
Set G1 = Range("G1")
Set G2 = Range("G2")
Dim nextRow As Long
nextRow = Selection.Row
Do Until Selection.Offset(0, -5) = ""
Selection = G1 & Range("B" & nextRow) & G2
Selection.Offset(1, 0).Select
Loop
End Sub