try
Sub DeleteTabCharacters()
Cells.Replace What:="Chr(9)", Replacement:="_", LookAt:=xlPart,
SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub
Sub DeleteTabCharacters()
Cells.Replace What:=Chr(9), Replacement:="_", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, _
SearchFormat:=False, ReplaceFormat:=False
End Sub
Thanks. The mistake I made when trying that approach was assuming that
I could test it by pasting a TAB character into Excel from Notepad,
but it gets pasted in as a space, but I assumed it was the Find() that
was not working. The actual spreadsheets are very large and on a
colleague's PC.