I have a .xlsm workbook (Excel 2007) that has macros, and the macros (and their code) are visible in Developer/VisualBasic as you would expect. However, their routine names are not visible in Developer/Macros.
The macros involve .ProtectSharing method, which likely caused the problem, but now I want to fix this issue before proceeding to debug the macros.
Last edited by wadevcamp; 12-22-2011 at 03:11 PM.
More information...
The workbook's current state is unshared and unprotected. The macros are not Private, and have no protection according to the VBA project properties I view in Developer/Visual Basic editor.
Maybe they are functions; functions don't appear in the macros dialog
Maybe the sub are declared Private.
Or the setting 'Option Private Module' has been used at the top of the module.
Or the subroutine has arguments.
They are subroutines, not functions. Also, they appeared in the Macros pull down before I started running the macros.
In the Macros dialog, there is a 'Macros in:' box - is that set correctly?
Remember what the dormouse said
Feed your head
Andy, they are not declared as Private, nor is 'Option Private Module' used.
rompstomper,
Macros in: is set to All Open Workbooks
Would save a lot of guessing if you could post example.
You can remove data and code within the routines if confidential.
The macros code is:
-------------------------------
Public Sub ProtectAllSheets(pswd As String)
Dim n As Integer
For n = 1 To ActiveWorkbook.Sheets.Count
If Not ActiveWorkbook.Sheets(n).ProtectContents Then
ActiveWorkbook.Sheets(n).Protect Password:=pswd
ActiveWorkbook.Sheets(n).EnableSelection = xlUnlockedCells
End If
Next n
End Sub
Sub UnProtectAllSheets(pswd As String)
Dim n As Integer, admin As Boolean
admin = Application.Run("'PERSONAL.xlsb'!IsAdmin")
If admin Then ', param1, param2
For n = 1 To ActiveWorkbook.Sheets.Count
ActiveWorkbook.Sheets(n).Unprotect Password:=pswd
Next n
Else
MsgBox ("You do not have the required priveledges for this action.")
Exit Sub
End If
End Sub
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code. Posting code without them makes your code hard to read and difficult to be copied for testing. Highlight your code and click the # at the top of your post window. For more information about these and other tags, found here
Not exactly what I meant but it shows the problem, which was as I suggested.
Or the subroutine has arguments.
I couldn't see the forest for the trees!
Thank you.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks