在所有的SHEET中的表格是完全一样的,只有一点不一样--就是其中一个地方是号码例如001 在sheet2中同样的位置号码是002 如果这样的SHEET有100个怎么办 怎样批量的使这100个SHEET中的号码同时递进不用在费事的一个一个的修改
谢谢各位大侠!!!
參考答案:正好我也有这样的疑问,搜索了下,终于找到了解决之道。
可这样,按ALT+F11,调出编辑器,添加如下代码:
Sub Maco1()
For i = 1 To Sheets.Count
Sheets(i).Cells(1, 1) = "'" & Application.WorksheetFunction.Text(0 + i, "000")
Next
End Sub
保存后回到EXCEL状态
按ALT+F8,在窗口中按执行即可。