JZB
07-11-2009, 03:09 AM
Hi Guys
I am creating a holiday calendar. I am trying to go down a cell range and delete any dates that are non business.
I could try:
For nloop = 1 to nlastrow
If activecell = vbsunday or activecell = vbsaturday then
activecell.entirerow.delete
Else
Activecell.offset(1,0).select
End if
Next nloop
But i am sure there is an easier way to do it that i just have not come accross. :dunno
I would also like to include festive holidays like easter, christmas etc
Thanks for the help in advance
Cheers
Jon
I am creating a holiday calendar. I am trying to go down a cell range and delete any dates that are non business.
I could try:
For nloop = 1 to nlastrow
If activecell = vbsunday or activecell = vbsaturday then
activecell.entirerow.delete
Else
Activecell.offset(1,0).select
End if
Next nloop
But i am sure there is an easier way to do it that i just have not come accross. :dunno
I would also like to include festive holidays like easter, christmas etc
Thanks for the help in advance
Cheers
Jon