red "X" disable
 

i want to try the code i got but will the "red X" be enabled/visible next
time i open a work sheet? its just for this one sheet that i need it not to
show.

http://groups.google.ca/group/micros...d264901943f109

or use Google Group search for: red x disable group:*excel*

the code that im looking at now are on that link..


i want to prevent ppl closing the workbook with the "X"

i got a button with a macro that saves, print and quit the workbook. and
another that just save and quit the workbook.

thanx

red "X" disable
 

Please don't start a new thread; it is very confusing. You should continue
the discussion in the original thread.

Did you try my suggestion? I don't think you should be playing with API
calls unless you are an expert user.
__________________________________________________ _______________________


"pswanie" wrote in message
...
i want to try the code i got but will the "red X" be enabled/visible next
time i open a work sheet? its just for this one sheet that i need it not
to
show.

http://groups.google.ca/group/micros...d264901943f109

or use Google Group search for: red x disable group:*excel*

the code that im looking at now are on that link..


i want to prevent ppl closing the workbook with the "X"

i got a button with a macro that saves, print and quit the workbook. and
another that just save and quit the workbook.

thanx

red "X" disable
 

nope no expert at all.... so i will skip the API thingie

i tried that but it gave me an error...

this is wat i did

with the workbook open i right click on the green thingie on left top coner
view code
paste


Public fMacro As Boolean

Private Sub Workbook_BeforeClose()
If Not fMacro Then Cancel = True
End Sub

and then in my macro that save and print and quit

change

ActiveWorkbook.Save
Application.Quit

to this
ActiveWorkbook.Save
ThisWorkbook.fMacro = True



this did not work.

red "X" disable
 

You still need Application.Quit as the last line.
__________________________________________________ _______________________

"pswanie" wrote in message
...
nope no expert at all.... so i will skip the API thingie

i tried that but it gave me an error...

this is wat i did

with the workbook open i right click on the green thingie on left top
coner
view code
paste


Public fMacro As Boolean

Private Sub Workbook_BeforeClose()
If Not fMacro Then Cancel = True
End Sub

and then in my macro that save and print and quit

change

ActiveWorkbook.Save
Application.Quit

to this
ActiveWorkbook.Save
ThisWorkbook.fMacro = True



this did not work.

red "X" disable
 

Also, my mistake, sorry. Should be:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
__________________________________________________ _______________________


"pswanie" wrote in message
...
nope no expert at all.... so i will skip the API thingie

i tried that but it gave me an error...

this is wat i did

with the workbook open i right click on the green thingie on left top
coner
view code
paste


Public fMacro As Boolean

Private Sub Workbook_BeforeClose()
If Not fMacro Then Cancel = True
End Sub

and then in my macro that save and print and quit

change

ActiveWorkbook.Save
Application.Quit

to this
ActiveWorkbook.Save
ThisWorkbook.fMacro = True



this did not work.

red "X" disable
 

thats exactly what i needed!!!

thanx...



"Vasant Nanavati" wrote:

Also, my mistake, sorry. Should be:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
__________________________________________________ _______________________


"pswanie" wrote in message
...
nope no expert at all.... so i will skip the API thingie

i tried that but it gave me an error...

this is wat i did

with the workbook open i right click on the green thingie on left top
coner
view code
paste


Public fMacro As Boolean

Private Sub Workbook_BeforeClose()
If Not fMacro Then Cancel = True
End Sub

and then in my macro that save and print and quit

change

ActiveWorkbook.Save
Application.Quit

to this
ActiveWorkbook.Save
ThisWorkbook.fMacro = True



this did not work.

red "X" disable
 

Great, glad it worked!
__________________________________________________ _______________________

"pswanie" wrote in message
...
thats exactly what i needed!!!

thanx...



"Vasant Nanavati" wrote:

Also, my mistake, sorry. Should be:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
__________________________________________________ _______________________


"pswanie" wrote in message
...
nope no expert at all.... so i will skip the API thingie

i tried that but it gave me an error...

this is wat i did

with the workbook open i right click on the green thingie on left top
coner
view code
paste


Public fMacro As Boolean

Private Sub Workbook_BeforeClose()
If Not fMacro Then Cancel = True
End Sub

and then in my macro that save and print and quit

change

ActiveWorkbook.Save
Application.Quit

to this
ActiveWorkbook.Save
ThisWorkbook.fMacro = True



this did not work.