我按照以下方法试过,还是不行。请高手指教。
假设这个需自动编号的单元格在sheet1中的A1单元格,先右键点击A1单元格,依次点"设置单元格格式"→"自定义",在类型下面的输入框,输入00000000,这个编号需要多为位就输入多少个0,然后点击确定。
然后按alt+f11打开VBA编辑器,双击窗口左边工程窗口中的ThisWorkbook,在弹出的代码编辑区粘贴如下代码:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.Range("A1") = Sheet1.Range("A1") + 1
End Sub