Wilder1626
asked on
VB6 - Remove apostrophe from MSHFlexgrid1 cells
Hi again.
I have a problem were i want to remove any apostrophe entered in cell 18 of each row, it would replace them by an empty space.
Ex:
"DRY VAN ' NEEDED" would be changed to "DRY VAN Â NEEDED"
how can i do that?
Thanks again
I have a problem were i want to remove any apostrophe entered in cell 18 of each row, it would replace them by an empty space.
Ex:
"DRY VAN ' NEEDED" would be changed to "DRY VAN Â NEEDED"
how can i do that?
Thanks again
Private Sub note_cell_18_Click()
Dim lngMSH_Row As Long
For lngMSH_Row = 1 To MSHFlexGrid1.Rows - 1
If InStr(1, MSHFlexGrid1.TextMatrix(lngMSH_Row, 18), "'") > 0 Then
InStr(1, MSHFlexGrid1.TextMatrix(lngMSH_Row, 18) = " "
End If
Next
End Sub
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER