Quote:
Originally Posted by Guessed
You really don't want the entire contents of the cell. The entire contents of a table cell is found by looking at the text and paragraph marks that you can see and then adding two more invisible characters - a paragraph character and an end-of-cell character. I normally use a function to strip these out along with trailing paragraph marks that people tend to put in because their quality control is poor.
Code:
Public Function CellText(aCell As cell) As String
Dim str As String
With aCell
str = .Range.Text
str = Left(str, Len(str) - 2)
While Right(str, 1) = Chr(13)
str = Left(str, Len(str) - 1)
Wend
CellText = Trim(str)
End With
End Function
You would use this in the earlier code's If line like this
Code:
If CellText(.Cell(rw, 4) = "5" And CellText(.Cell(rw, 5)) = "A" Then
|
Thank you so much , it was good to know that there are some invisible characters that you should be aware of .
Your recommendation worked very well with my code . Thank you