I have an excel db with a field "Surname & Name", I want to split Surname and Name and the Name to be at a separate Column the L for example.
I use this code
iRow = 0
Do Until 1 = 0 'Endless Loop!
iRow = iRow + 1
If ActiveCell.Offset(iRow, 1).Value <> "" Then
x = Split(ActiveCell.Offset(iRow, 1).Value, " ")
ActiveCell.Offset(iRow, 11).Value = x(1)
But this code do that I want only for the first 30-40 fields but there are at least another 40 fields and with that do nothing!
What is wrong, is there another better solution?