Changing a Cells Value on A Specific Sheet and Cells after Printing

[iamjonbeamer]

I am looking to change the value within specific cells on a specific sheet. On my sheet named "Gift Card Log" I log my guests information. To print it later on I change column M to "YES" which compiles the information I need to another sheet, which is then printed. After I click my print button using the below VBA, I would like for the "YES" in column M to be changed to "COMPLETE" which would then show others that they do not need to print this out anymore. So after printing I just need any cells in column M with the text value "YES" to change to "COMPLETE." I would like for this to occur immediately after printing, without any additional buttons, if possible. Can anybody alter my VBA to achieve this, or create a new one?


Sub PrintExec()

Dim ToID

Set mainWB = ActiveWorkbook

ToID = mainWB.Sheets("Compile").Range("N1").Value 'Pages

Worksheets("Shipping Form").PageSetup.Zoom = 100
Sheets("Shipping Form").PrintOut From:=1, To:=ToID

End Sub