1st line
application.screenupdating=false
last line
application.screenupdating=true

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Connie Martin" wrote in message
...
Okay, this works now! Thank you. It's rather neat looking at the screen
"shaking" as it goes through the column removing the weekends! I'd shake,
too, if the weekends were removed from me! Ha! Thanks, Don. Another one
to
print. Connie

"Don Guillett" wrote:

Was tested. somehow an EXTRA . in front of END. change to ONE dot.

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Connie Martin" wrote in message
...
Don, I tried the macro as well as Jim and Sean's method, which work. I
am
having a Compile Syntax error message with the macro, and the rows it's
highlighting a
For i = Cells(Rows.Count, 1) _
..End(xlUp).Row To 1 Step -1
Anyway, since it can be done without a macro, I think I'll take that
route.
Thank you for responding. Much appreciated. Connie

"Don Guillett" wrote:

Sub deletesatsun()
Dim md As String
For i = Cells(Rows.Count, 1) _
..End(xlUp).Row To 1 Step -1
md = Left(Format(Cells(i, 1), "ddd"), 3)
If md = "Sat" Or md = "Sun" Then
Rows(i).Delete 'MsgBox i
End If
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Connie Martin" wrote in
message
...
In Col. A there are dates, formatted as dates in the format of Sun -
Jan
01,
2010 and it goes to the end of 2010. How do I delete all the
Saturday
and
Sunday's in one shot? Connie

.


.