View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
GavinS GavinS is offline
external usenet poster
 
Posts: 18
Default How to Write Error Trap

I have the following code to toggle between print preview and normal
view but I need to add an error statement just in case there is no
sheet open.

Can someone please suggest how I might write this.

Thanks

Sub TogglePrintView()

If ActiveWindow.View = xlPageBreakPreview Then
ActiveWindow.View = xlNormalView
ElseIf ActiveWindow.View = xlNormalView Then
ActiveWindow.View = xlPageBreakPreview
End If
End Sub