malik641
12-10-2005, 11:19 AM
In my list box I added cell text and some of the cells use the "Alt+Enter" method to right text. When I add these items to the userform, they show up as ?. How can I replace these with spaces??? Or is there a way to format the list box (like a wrap text...or something)??
I tried the following:
For Each cell In CriteriaRange
If InStr(1, cell.Text, Chr(182), vbTextCompare) Then
cell = Replace(cell.Text, Chr(182), " ")
End If
lstCriteria.AddItem cell
Next cell
But this doesn't seem to effect the display in the list box :mkay
Any ideas??
I tried the following:
For Each cell In CriteriaRange
If InStr(1, cell.Text, Chr(182), vbTextCompare) Then
cell = Replace(cell.Text, Chr(182), " ")
End If
lstCriteria.AddItem cell
Next cell
But this doesn't seem to effect the display in the list box :mkay
Any ideas??