Hi to someone,
Please help !

the template sheet i have has an autofilter on a range...

on one of the filter along column A...
it is set-up this way
custom
show rows where
"is greater than" [i put zero] 0.

i need to incorporate a *code* to auto-refresh or repeat the set-up again on
the same location on each populated sheets...
show rows where
"is greater than" [i put zero] 0.

---here's the brief code below:
Sub USetUp()

Application.Calculation = xlManual

Dim ws1 As Worksheet, ws2 As Worksheet, ws3 As Worksheet, ws4 As Worksheet
Dim irow As Long, orow As Long
Dim Lastrow As Long

Dim wsname As String
Dim wsnum As String

Set ws1 = Worksheets("LIST")
Set ws2 = Worksheets("N0_TEMP")

With ws1

Lastrow = .Cells(Rows.Count, 1).End(xlUp).Row

For irow = 2 To Lastrow
wsname = .Cells(irow, 1)
wsnum = .Cells(irow, 2)
Sheets("N0_TEMP").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = wsname
ActiveSheet.Range("E5") = wsnum

Next irow

End With
Application.Calculation = xlAutomatic
End Sub
------

sure this is very simple for the group...
TIA
--
regards,
from someone

*****
- dive with Jonathan Seagull