我要将excel中的1张工作表复制500份,有能够使用的宏指令吗? 怎么用?

电脑

=Sheets(3) End Sub。这里的Sheet1就是你要复制的工作表名字，你得把这个代码修改一下，变成循环500次的。像这样：Sub CopyManySheets() Dim n As Integer For n = 1 To 500 Sheets(Sheet1).Copy After:=Sheets(Sheets.Count) Next n End Sub。不过这个宏在运行的时候可能会比较耗时，取决于你的电脑性能。