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 vote359 views1 answer
Excel filter by date not working vba
VBA
0 vote351 views1 answer
Convert number to minutes in vba
VBA
0 vote306 views1 answer
Excel vba arrondir
VBA
0 vote332 views1 answer
Vba exit while
VBA
8 votes466 views1 answer
Vba make a short integer from two bytes
VBA
0 vote332 views1 answer
Excel vba current folder
VBA
1 vote352 views1 answer
Vb.net get name by Selection Changed
VBA
3 votes334 views1 answer
Vba folderexists
VBA
0 vote328 views1 answer
Vba first line of string
VBA
0 vote421 views2 answers
Excel vba store array and write to sheet
VBA