excel 2007 åbne i fuld skærm

Hej
Jeg sidder her og prøver at få min prisberegner til at åbne i fuld skærm, hvor fanerne skal kunne ses.
Jeg har her på eksperten fundet en kode, men den virker tilsyneladende ikke
Den ser sådan ud:
Sub FullScreen()
\' Skjuler formelbar og statusbar
        Application.DisplayFormulaBar = False
        Application.DisplayStatusBar = False
\' Skjuler værktøjslinier
        Application.CommandBars(\"Standard\").Visible = False
        Application.CommandBars(\"Formatting\").Visible = False
\' Skjuler række/kolonne header
        Dim ws As Worksheet
        Dim wsA As Worksheet
        Application.ScreenUpdating = False
        Set wsA = ActiveSheet
   
        For Each ws In ActiveWorkbook.Worksheets
            ws.Activate
            ActiveWindow.DisplayHeadings = False
        Next ws
    wsA.Activate
End Sub

Disse efterfølgende linier går i rød, og da jeg ikke kender synderligt meget til VBA, kan jeg ikke se hvorfor

\' Skjuler formelbar og statusbar

\' Skjuler værktøjslinier
        Application.CommandBars(\"Standard\").Visible = False
        Application.CommandBars(\"Formatting\").Visible = False
\' Skjuler række/kolonne header

Håber i kan hjælpe mig

Peter