macro is not working?

  • Thread starter Thread starter Derrick
  • Start date Start date
D

Derrick

I opened up my workbook this morning, and a security warning for my macro
showed up. now, my macros - the code i inserted into the sheet - is not
working. I set my security level to low, i've saved it, re-typed it, ...
any ideas?
 
Hi,

Not working isn't a very good description of the problem, perhaps you could
post the code to let us see what your trying to do.

Mike
 
Lets redo that Derrick.

Set the Security level to low/medium in (Tools|Macro|Security). From
workbook launch VBE using short-key Alt+F11. From menu 'Insert' a module and
paste the macro. Save. Get back to Workbook. Run macro from Tools|Macro|Run
<selected macro()>

If this post helps click Yes
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B3")) Is Nothing Then Exit Sub
Rows("6:47").EntireRow.Hidden = False

If Range("B3") = "Standardized Module Width" Then
Rows("6:6").EntireRow.Hidden = False
Range("C6,D6") = 0
Rows("8:8").EntireRow.Hidden = True
Range("C8,D8") = 0
:
:
Range("F46") = 0
Rows("47:47").EntireRow.Hidden = False
ElseIf Range("B3") = "Standardized Module Height" Then
Rows("6:6").EntireRow.Hidden = True
Range("C6,D6") = 0
Rows("8:8").EntireRow.Hidden = False
Range("C8,D8") = 0
Rows("8:8").EntireRow.Hidden = False
:
:
Rows("45:46").EntireRow.Hidden = False
Rows("47:47").EntireRow.Hidden = True
ElseIf Range("B3") = "Non-Modular Frame" Then
Rows("6:6").EntireRow.Hidden = True
Range("C6,D6") = 0
Rows("8:8").EntireRow.Hidden = True
Range("C8,D8") = 0
Rows("10:10").EntireRow.Hidden = True
Rows("15:47").EntireRow.Hidden = False
End If
End Sub
 
ok..
i've done that, and i continuously get the 'security is set to high'/'macros
disables' schpeel from excel, even though its set to low.
 
OK! got it. i had to save and close the workbook, before the settings took
place.
thanks for the help though.
 
Back
Top