CorelDRAW X4 :: Macro - Selecting All Objects In Template

I am working on creating a macro we can save with a template to ready the designed art for print. So the designer can create the design, run this macro and export a PDF. The macro needs to:

1. Turn off template layer.2. Select all objects layer 1.3. Group all objects layer 1.4. Rotate -90 degrees.5. Set layout to landscape.I have everything working except the Select all "Objects Part". the macro will only select objects that are there during the creation of the macro, and not select the designed work.

Is there anyway to just add a keystroke of "Ctrl+A" to the macro?

Here is the macro i got:
____________________________________________________________________

Sub Adstand_Rotate()    ' Recorded 5/17/2012    ActivePage.Layers("Template").Visible = False    Dim s1 As Shape    Set s1 = ActiveLayer.CreateRectangle(0#, 70#, 39.75, 0#)    s1.Fill.ApplyNoFill    s1.Outline.SetProperties 0.006945, OutlineStyles(0), CreateCMYKColor(0, 0, 0, 100), ArrowHeads(0), ArrowHeads(0), cdrFalse, cdrFalse, cdrOutlineButtLineCaps, cdrOutlineMiterLineJoin, 0#, 100, MiterLimit:=45#    s1.Outline.SetNoOutline    s1.Rotate -90#    Windows.FindWindow("C:Documents and SettingsdreesdmDesktopAd Stand Template.cdr").ActiveView.SetViewPoint 35#, 19.875, 100    With ActiveDocument.MasterPage        .SetSize 39.75, 70#        .Orientation = cdrLandscape        .PrintExportBackground = True        .Bleed = 0#        .Background = cdrPageBackgroundNone    End WithEnd Sub
____________________________________________________________________