In coulmn C:C I have dates (1/2/2013). I want to loop thru C:C and change the long date to just the month number.
example: 1/2/2013 change to 1, 2/12/2013 change to 2 and so on. The code I am using is not doing want I want I cannot figure out why. It cahnges 1/2/2013 to 1/2/2020.
Dim oCell As Range
For Each oCell In Selection
If oCell.Value = "" Then GoTo EndRow
oCell.Value = Left(oCell, Len(oCell) - 2)
Set oCell = Nothing
Any help would be appreciated.