VBA Remove Header and Footer but not the Watermark

Good day everyone,

Please help.

I have the following VBA code:

With ActiveSheet.PageSetup
.CenterHeader = ""
.RightHeader = ""
.LeftFooter = ""
.CenterFooter = ""
.RightFooter = ""

I use vba to add headers and footers based on a cell reference and after the document is saved in PDF or printed it resets/clear all. But now it clears the watermark also. How can I remove the text but keep the watermark?

Thank you in advance