View Single Post
  #6   Report Post  
Cameron Young
 
Posts: n/a
Default

Gents,
Thanks for your responces.
Bob:: Workbook_Open() code is in the ThisWorkbook module.
Dave:: Have already sert the macro security to low. And still nothing.
--
Cheers,
Cameron


"Dave Peterson" wrote:

Close that workbook (if it's open)
tools|macro|security...|security level tab

Change it to medium (to be prompted each time a workbook containing macros
opens)
or
change it to low (to always allow macros to run)



Cameron Young wrote:

Hi Bob,

Actually, all of it. For some reason the Workbook_Open() event just doesn't
seem to fire.
--
Cheers,
Cameron

"Bob Phillips" wrote:

Which bit doesn't work?

--
HTH

Bob Phillips

"Cameron Young" wrote in message
...
Hi all,

Have whipped the following code in Excel/VBA and placed in the
'ThisWorkbook' module. The problem that I have is that it works well with
other users using Excel 2003 Standard edition.
I'm using Beginners edition - is that why the code won't run?

The vba code:
[-- code start --]
Private Sub Workbook_Open()

'Prompt user on opening XLS to Print Worksheet and quit.

Dim Resp

Resp = MsgBox("Do you wish to Print and Exit ?", _
vbYesNo + vbQuestion, _
"Print & Exit ?")

If Resp = vbYes Then
ActiveWorkbook.PrintOut
Application.Quit
End If

End Sub
[-- code end --]

Please help - this is driving me nuts.
--
Cheers,
Cameron




--

Dave Peterson