Refer to other objects within a "With" block?

[Glory]

Eg:

With theSheet.[COLOR=red]PageSetup[/COLOR]
[COLOR=#ff0000][/COLOR] 
    If a2 = 1 Then PrintArea = "A1:E21": .Zoom = 150
    If a2 = 2 Then .PrintArea = "A1:E43"
    If a2 = 3 Then .PrintArea = "A1:K21"
    .[COLOR=red]PrintOut[/COLOR]
[COLOR=#ff0000][/COLOR] 
'clears settings after printing
 
    .PageSetup.PrintArea = False
    .PageSetup.CenterVertically = False
    .PageSetup.Zoom = 91
End With

.Printout applies to a worksheet object, not the pagesetup object.

Is there a statement that allows a temporary break from the conditions of a with-block inside itself?

 

[tusharm]

You can always refer to any object inside a With block. Just use the object name and then .method. So, if you want to refer to the worksheet's PrintOut method use ActiveSheet.PrintOut or Workbooks(1).Worksheets(1).PrintOut or whatever else you want to do.

Just remember that all that the With block does is that *if* you start a property or method reference with a dot, it refers to the object in the With statement. *Nothing* stops you from referring to any other object inside the block.

 

[Glory]

Guess I should've tried it out before posting.

Thanks T.