For Each Loop to sort column in multiple sheets

[kbryan]

Hello, I have a workbook with multiple sheets and all but one of the sheets need to be sorted by date (found in column K). The sheet names vary by week so making this a static reference to a sheet name isn't possible. I'm having a bit of trouble establishing the range that will work with a loop.

With the code below I'm getting a Run Time Error 1004 saying the sort reference is not valid. I tried removing the ws from in front of the sort range and it works perfectly, but only for a single sheet.

I'm new to VBA so I apologize if this is easy. I've done many searches and can't find an answer.

Help please! Thanks!

Please Login or Register  to view this content.

[AlphaFrog]

The Key1 range should reference the ws as well.
key1:=Range("K2"),


Try this...

Please Login or Register  to view this content.

[kbryan]

The Key1 range should reference the ws as well.
key1:=Range("K2"),


Try this...

Please Login or Register  to view this content.

Ah ha! I knew it was something simple that I was forgetting but I just couldn't put my finger on it! Thanks!