vba保存事件之前更改单元格的值?

我试图将用户点击保存时,我的单元格R3的值设置为“RDC模式”。

当工作簿正在保存时,已更改的值需要保存。

出于某种原因,这段代码不会改变我的价值。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Worksheets("Place Orders").Range("R3").Value = "RDC Mode" End Sub 

请有人告诉我我要去哪里错了吗?

如果代码位于适当的位置,则代码工作正常。

在这里输入图像说明

它放在ThisWorkbook代码区域。