I don't quite follow you there.Hi mirabeau,
Sorry, I meant to say the produced sheet names are in reverse alphabetical order.
That code was designed to produce sheets in normal alphabetical order and has always done so for me.
However, just to try something, in the line
.Cells(1).Resize(rws, cls).Sort .Cells(cc), 2, Header:=xlYes
if you change the 2 to 1, does it make any difference to the order of your produced sheets?