My PC installed this security update automatically this past week and
now when I open a spreadsheet that I use daily with the following code
in it, I get "Automation Error-Catastrophic failure" when I
unistalled this update, the code runs fine again.

The code is:

Function NEXTSATURDAY(d As Date) As Date
Dim TestDay As Date
TestDay = d + 1
Do Until Weekday(TestDay) = 7
TestDay = TestDay + 1
Loop
NEXTSATURDAY = TestDay

Any help you can give would be appreciated.

Also, I cannot remember the character to place at the front of a line
of code to disable it.

Thanks, Steve