I have this code but this show an error-Run-time error '1004': Unable to set the hidden property of the range class
And one thing more i want to use same code on different sheets in same Workbook.
Sub Hide_Unhide()
'
' Hide_Unhide Macro
' Macro recorded 5/9/2017
'
' Keyboard Shortcut: Ctrl+s
'
If Range("T3069").Value = 30 Then
Rows("3070:3121").EntireRow.Hidden = True
Else
Rows("3070:3121").EntireRow.Hidden = False
End If
End Sub
Lovekush
Hi lovekush
The above code works fine when tested:
Please Login or Register to view this content.
Last edited by sintek; 05-10-2017 at 05:13 AM.
Good Luck
I don't presume to know what I am doing, however, just like you, I too started somewhere...
One-day, One-problem at a time!!!
If you feel I have helped, please click on the star to left of post [Add Reputation]
Also....add a comment if you like!!!!
And remember...Mark Thread as Solved.
Excel Forum Rocks!!!
You are not specifying the sheet names in the code.
Teach me Excel VBA
by default that will work with ActiveSheet - whatever this is :-)Originally Posted by ImranBhatti
If you are pleased with a member's answer then use the Star icon to rate it.
Sir,
I say that here are many sheets like that- Sheet1, Sheet2,...
Put the code in ThisWorkBook module
EDITED:
double-click on ThisWorkbook below the sheets in VB and paste your code
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks