Thanks SirJB7...... I had to make one change. I replaced second RIGHT with a LEFT, as the result was cutting off the first character.
Dim c As Range
For Each c In Range("DataTable[Pred_Description]")
With c
If Right(.Value, 1) = "~" Then .Value = Left(.Value, Len(.Value) - 1)
End...
I like this thought..... but here is what I tried.
I would like to do this to multiple cells in a particular column (Field)
Range("DataTable[Pred_Description]").Select
With Selection
If Right(.Value, 1) = "~" Then .Value = Right(.Value, Len(.Value) - 1)
End With
I would like to create vba code to remove the last character in a cell, but only in the case that the last character is a ~. It is ok for the ~ character to occur elsewhere, just not as the last character.
Thanks in advance.
I need to use a process similar to text to columns, but make them appear in new rows.
Any help is appreciated.
Scott
Here is some sample data:
ColumnA ColumnB ColumnC ColumnD ColumnE
NFL NFCWest Seattle; San Francisco; St Louis; Arizona Seahawks; 49ers; Rams; Cardinals 2013
NFL NFC...