the macro recorder is your friend
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 5/5/2007 by Donald B. Guillett
'

'
Sheets(Array("Sheet2", "Sheet3")).Select
Sheets("Sheet3").Activate
Rows("3:4").Select
Selection.Delete Shift:=xlUp
Sheets("Sheet1").Select
End Sub
but a for/next might even be better

for each ws in worksheets
if ws.name < "keepthisone" then ws.rows("3:4").delete
next ws

--
Don Guillett
SalesAid Software

"Filo" wrote in message
...
I tried to write VB code that selects four worksheets, and then deletes
rows
3 to 4, but what happens is that it only deletes the data from the active
worksheet. If we use VB code, do we just have the option to perform the
deletion one worksheet at a time, or is there a way to do the deletion on
all
four worksheets at the same time?

Thank you.