If your userform is adding the new data in the first available row beneath
the existing data could you just add the following at the end of the code you
are using to add the data to each worksheet?

Range("A2").Select
Selection.CurrentRegion.Select
Selection.Sort Key1:=Range("B2"), Key2:=Range("D2")

?? does this help?

"jhyatt" wrote:

I have been working on this for a while with no luck. I have a list in 3
different sheets for different departments. I am using a userform to enter
the new data and i need some way to set the new range to sort when new data
is added. i need to sort using column b and d.

for example
a b c d e f
1 Charlie 7-27-07 sick
2 Zach 8-21-07 late
3 charlie 1-30-07 off
4 Steve 9-02-07 late