Hi Ryan,

Sub Test()
Dim cLastRow As Long
Dim i As Long

cLastRow = Cells(Rows.Count, "A").End(xlUp).Row
For i = 1 To cLastRow
With Cells(i, "A")
.Value = Right(.Value, Len(.Value) - 1)
End With
Next i

End Sub

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Neutron1871" wrote in message
...
I have a macro that pulls a date into a column. This column is updated
everyday as the days of the month pass. So, the column for today would
have
all the dates of March up to 03-23-05. Tomorrow the column will have all
the
dates of March up to 03-24-05.

The problem with this current macro is that it is pulling the dates from
another spreadsheet. This other spreadsheet has 1 space in front of the
date. Because of this, I am unable to change the format of the way I want
the date to look. Right now it looks like this " 03/23/2005". Notice the
space in front of the date. I want it to format like this "23-Mar-05".

Can someone help me create a macro or VB code that I can install in my
current macro to eliminate that space in front of the date? Remember the
column today would have 23 rows, but tomorrow it will have 24 rows because
of
the update. I'm sure some sort of relative referencing would be needed?

Please help!!! Thanks!!!

Ryan