I
ianb
Hi there. I have a simple piece of code that was written in Excel 2007, but
saved in 97-2003 Excel format. This code seems to work fine in both Excel
2007 and 2003, but not in Excel 2000. He gets a 1004 error message when he is
clicking on the drop-down box. When debugging, the error seems to be occuring
on the first 'entirerow.hidden' instruction. No movements between worksheets
occur. Any help would be appreciated!
Thanks, Ian
Sub ColourMonoChoose()
'
' DropDown29_Change Macro
'
'
Application.ScreenUpdating = False
If Range("d8") = "Colour" And Range("d6") = "MFP" Then
Rows("10:13").Select
Selection.EntireRow.Hidden = False
Rows("11:13").Select
Selection.EntireRow.Hidden = True
Rows("63:64").Select
Selection.EntireRow.Hidden = False
Rows("67:68").Select
Selection.EntireRow.Hidden = False
Rows("73:82").Select
Selection.EntireRow.Hidden = False
Rows("87:88").Select
Selection.EntireRow.Hidden = False
End If
Application.ScreenUpdating = True
End Sub
saved in 97-2003 Excel format. This code seems to work fine in both Excel
2007 and 2003, but not in Excel 2000. He gets a 1004 error message when he is
clicking on the drop-down box. When debugging, the error seems to be occuring
on the first 'entirerow.hidden' instruction. No movements between worksheets
occur. Any help would be appreciated!
Thanks, Ian
Sub ColourMonoChoose()
'
' DropDown29_Change Macro
'
'
Application.ScreenUpdating = False
If Range("d8") = "Colour" And Range("d6") = "MFP" Then
Rows("10:13").Select
Selection.EntireRow.Hidden = False
Rows("11:13").Select
Selection.EntireRow.Hidden = True
Rows("63:64").Select
Selection.EntireRow.Hidden = False
Rows("67:68").Select
Selection.EntireRow.Hidden = False
Rows("73:82").Select
Selection.EntireRow.Hidden = False
Rows("87:88").Select
Selection.EntireRow.Hidden = False
End If
Application.ScreenUpdating = True
End Sub