我想将EXCEL表格在同一个文件里，按指定行数，生成新的工作表，哪位高人会，请指点，谢谢

Sub chaigfen()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
10 If Sheets(1).Cells(2, 1) = "" Then Exit Sub
Sheets.Add after:=Sheets(Sheets.Count)
Sheets(1).Activate
Sheets(1).Range("1:200").Copy
Sheets(Sheets.Count).Paste
Sheets(1).Range("1:200").Delete
GoTo 10
End Sub
右键点击工作表标签，选择查看代码，粘贴上面的代码，执行

可以写宏代码执行。

如果记录是现成的，建议建50个表（sheet），然后手工复制→粘贴

如果记录会变（不断更新），建议建50个表（sheet），然后，手工复制→选择性粘贴→粘贴链接。