假设字符串 "文件编号:NO0001" 存放在sheet1的a1单元格中.
alt+f11
双击thisworkbook
粘贴下面代码即可
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
With Sheets("sheet1").Range("a1")
.Value = "文件编号:NO" & Format(Right(.Value, 4) + 1, "0000")
End With
End Sub
你没保存一次 文件编号 就累加一次 那么你在一次编辑修改中 如果中途也有几次保存 那么你的文件号岂不是 要累加很多次? 那么这个文件号 还有什么意义哪……
这个需求需要用到vba……
应该考虑重新 规划 你的需求……我认为这不是最好的 解决你遇到问题的最好办法……
你的文件编号在什么地方?