Do until loop vba

Sub combineNamesWhile()
 i = 2
 Do While Not IsEmpty(Cells(i, 1)) OR Not IsEmpty(Cells(i, 2))
   If IsEmpty(Cells(i, 1)) Then
     Cells(i, 3).Value = Cells(i, 2)
   ElseIf IsEmpty(Cells(i, 2)) Then
     Cells(i, 3).Value = Cells(i, 1)
   Else
     Cells(i, 3).Value = Cells(i, 1) & " " & Cells(i, 2)
   EndIf
   i = i +1
   Loop
End Sub

Source: spreadsheeto.com

Do until loop vba

Not IsEmpty(Cells(i, 1)) OR Not IsEmpty(Cells(i, 2))

Source: spreadsheeto.com

Similar codes

0 vote196 views1 answer
Excel vba join variant array
VBA
2 votes216 views1 answer
Excel vba extract file name
VBA
0 vote217 views1 answer
Visual stuiod not recognising desgined labels
VBA
7 votes203 views1 answer
Vba array declaration
VBA
3 votes207 views1 answer
Vba not equal
VBA
1 vote202 views1 answer
Add control vb
VBA
0 vote203 views1 answer
Excel vba StartUpPosition
VBA
1 vote200 views2 answers
Vba find last row in range for certain criteria
VBA
22 votes483 views1 answer
Excelvba check for directory
VBA
-1 vote202 views2 answers
How close excel through visual basic
VBA