Security Alert "This file contains encrypted macros...&

[bem]

I beg your mercy.

I just loaded Excel 2007, and then opened a workbook I wrote that made pretty extensive use of macros and code. I knew enough to first set up Excel via the "Trust Center" to allow ALL macros to run, against MS's, or more likely against MS's lawyer's, recommendations. btw, does anyone have a clue as to what "Trust access to the VBA project module" is all about? Apparently MS doesn't, for I have searched Help and the KB for it in vain. Anyway, I brought the old xls workbook in, then saved it as a macro-enabled spreadsheet, .xlsm. Then I open it, and uhg, a most distasteful surprise. Even though I specifically went in and set Excel to run all freaking macros, someone at MS has decided I am too stoooopid to make this decision, and all macros have been automatically disabled. OK, so let us click where it says "Options" on this warning bar. A window pops up telling me that this file contains encrypted macros that have been disabled...". Do a search on that, again, MS, MS kb, even Google, and you are not going to find it (In quotes). There is ONE freaking option with a radio button now, telling me "Help protect me from unknown content" - again, I try a Google search, an MS search and an MS kb search... nothing directly addressing it; but I do the logical intuitive thing - there is a selected radio button there, so click it to unselect it. Click the idiot thing until the cows come home, darn it, it won't do a thing! I even tried an Alt-p as they have the "p" underlined - all that does is select the statement, it remains selected, tap the space bar, hit the space bar, stand on the space bar... First they disable all the macros. OK, I can live with going in and fixing that, but then deciding that I am too dumb to make that choice so don't allow me to turn them on in my own freaking code??? Yes, it has been several hours and I am still pissed off beyond belief. Please, can anyone out there have sympathy on me and help me with this???

 

[bem]

Tracy -

Thank-you for your insight and help. Please do not waste any more time on me. After a number of imports from the xls file format and working with saves and other trials, I can't believe they actually released this puppy - it reminds me of when they tricked IBM into prematurely releasing DOS 4.0 I think it was, when IBM's highly flawed product left them looking pretty poor, but this time it is MS/ I suspect internal pressure resulted in a premature release of product.

I suspect it is fine on basic workbooks, and probably does fine on complex workbooks entirely created therein, but as to bringing in anything complex created in a previous version, it fails miserably. As I expect most large businesses will not have this as their primary office suite for at least a year to come, and even then most small businesses won't, it would be an entirely useless exercise for me to force it's use. Too bad, it sure was pretty, but as the old saying goes, "You can put lipstick on a pig, but it's still a pig."

 

[Bundy]

Re: Security Alert "This file contains encrypted macros...&

Anyone know if updating to SP2 fixes this problem? Currently we have SP1 here, but the "support" article seams to suggest it will help.

http://support.microsoft.com/kb/927150

 

[andi_brown]

Re: Security Alert "This file contains encrypted macros...&

Hi,

I've found that the reason for the error lies with the workbook protection which is a problem if you want to protect the structure etc of your document. If you turn the protection off the the workbook will open fine. However if you want to continue to protect your workbook try the following

I have written the following into workbook within the microsoft objects

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If ThisWorkbook.ProtectStructure = True Then
SheetProtected = True
Else
SheetProtected = False
End If

If SheetProtected = False Then ThisWorkbook.Protect Password:="enter your password here"
End Sub

and

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Unprotect "enter password here"
End Sub

This way it unprotects the workbook before closing it but then on re-opening and a sheet being selected the workbook re-protects itself