手动插入的话只能是先插入后按住拖动到最后,若采用宏命令自动插入的话可以直接实现一步插入到最后。sub 插入新表()Sheets.Add After:=Worksheets(Sheets.Count) End Sub