merging cells

  • Thread starter Thread starter jon
  • Start date Start date
J

jon

hi

I have some data from a web query in which occasionally
spans two cells ie...
A B
67/9097/9 - how it should be
67/ 9097/9 - how the odd cell comes out

is there anything I can write into a macro to merge the
two rogue cells back together into one?
 
try this where your selection is the range of the 67/7. In this case
[a2:a200]

Sub putemback()
For Each c In Selection
If Len(c) < 6 Then c.Value = c & c.Offset(, 1)
Next
End Sub
 
Back
Top