worksheet functions with dates

M

Michele

I have a wooksheet that you enter the date in one column(07-05-04), then the
vendor in the next column, discription in the next, who's file is is under,
blank column, then price. What I want to do is when i type the date
(07-05-04) it will automaticlly write the month (July) in the empty column.
So if i type (08-02-04) in the next row, it will automaticlly add the word
August in the cell speciified. Is this possible.

Thanks for you help
 
D

Don Guillett

right click sheet tab>view code>copy/paste this. SAVE
Now if you type a date in col A below row 1 col B will get the month

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 2 Or Target.Column <> 1 Then Exit Sub
If IsDate(Target) Then
Target.Offset(, 1) = Format(Month(Target), "mmmm")
End If
End Sub
 
P

Peo Sjoblom

One way, in the empty column cell put

=IF(A2="","",TEXT(A2,"mmmm"))

replace A2 with whatever date cell reference(s)

Regards,

Peo Sjoblom
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top