View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Rick Rothstein \(MVP - VB\)[_1500_] Rick Rothstein \(MVP - VB\)[_1500_] is offline
external usenet poster
 
Posts: 1
Default if today is last day of month then, else

If Day(Date) = 1 Then
' << Today is the first day of the month
Else
' << Today is not the last day of the month
End If

Rick


"pswanie" wrote in message
...
jip all that worked but... i only later noticed and relized that it
should
be if today is the first day of the month

"pswanie" wrote:

sory little error on previous post


i got a macro to copy and special paste data in order to get a
accumalative
sales data. i want to add to it so that it check if today is the last
day of
the month.

something like

if now() = lastday of month then
range a1.value =""
else
run mymacro
end if


thanx
Phillip