Take a look at my code and tell me what is wrong with this

[yl358]

I have many word documents (all with the same template), and I am tryin
to extract the info from all the .doc files and compile them into on
Excel database. I have the code done and it works.... but I ran int
one problem: The resulting String values in Excel have weird squar
symbols in them.

Take a look at it in the attachments. I've attached both the .do
template and a general database as a reference.

Please fix my problem: how do I get rid of these square symbols

+-------------------------------------------------------------------
|Filename: POV_HELP.doc
|Download: http://www.excelforum.com/attachment.php?postid=5142
+-------------------------------------------------------------------

 

[yl358]

oops, here is the excel database attache

 

[Guest]

More than likely they are chr(10) or chr(13) or both. Check for each
characters ASC value.

ChasAA

 

[yl358]

how do I check if the Range has chr(10) or chr(13)?

 

[Tom Ogilvy]

Try running this and see if they go away:

Sub ReplaceLittleSquares()
Cells.Replace What:=Chr(10), _
Replacement:="", _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
MatchCase:=False
Cells.Replace What:=Chr(13), _
Replacement:="", _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
MatchCase:=False
End Sub