如何在SHEET后面添加新的SHEET?

Question

If k > 3 Then xlApp.Worksheets.Add
                Set xlSheet = xlBook.Worksheets(k)
                xlSheet.Name = oFile.Name
                xlSheet.Activate '激活工作表.
怎么跑到原来的3个sheet的前面去了,我本想在默认的3个sheet后面添加一个新的sheet,是要设置这个xlApp.Worksheets.Add参数吗?

Answer 1

Worksheets.Add(after:=Sheets(3))after:=sheets(index) 添加在哪个 sheet 之后
before:=sheets(index) 添加在哪个 sheet 之前