PC Review


Reply
Thread Tools Rate Thread

Automatically hide/unhide rows

 
 
JStiehl
Guest
Posts: n/a
 
      23rd Apr 2010
I'm a VBA newbie and have searched for an answer for how to do this, but must
be doing something wrong when I've tried other codes. I need to have rows
automatically hide or unhide based on a value in column D. If the value in
column D is Y, the row should not be hidden; if the value is N, the row
should be hidden. These values may change, so the rows need to be able to
hide/unhide automatically.

When I've entered codes in before, I click on the tab for this worksheet,
select View Code, choose Insert Module, and then insert the code. There is
already a code in this worksheet for something else, so I can't just add it
in after selecting View Code. Am I putting the code in the wrong spot?
Should I be choosing something else other than Insert Module?

I've tried out so many different codes thinking that was the problem, but
now I think I may just be entering it wrong. I appreciate your help.
 
Reply With Quote
 
 
 
 
Jacob Skaria
Guest
Posts: n/a
 
      23rd Apr 2010
Select the sheet tab which you want to work with. Right click the sheet tab
and click on 'View Code'. This will launch VBE. Paste the below code to the
right blank portion. Get back to to workbook and try out.


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 4 Then Rows(Target.Row).Hidden = (UCase(Target.Text) = "N")
End Sub

--
Jacob (MVP - Excel)


"JStiehl" wrote:

> I'm a VBA newbie and have searched for an answer for how to do this, but must
> be doing something wrong when I've tried other codes. I need to have rows
> automatically hide or unhide based on a value in column D. If the value in
> column D is Y, the row should not be hidden; if the value is N, the row
> should be hidden. These values may change, so the rows need to be able to
> hide/unhide automatically.
>
> When I've entered codes in before, I click on the tab for this worksheet,
> select View Code, choose Insert Module, and then insert the code. There is
> already a code in this worksheet for something else, so I can't just add it
> in after selecting View Code. Am I putting the code in the wrong spot?
> Should I be choosing something else other than Insert Module?
>
> I've tried out so many different codes thinking that was the problem, but
> now I think I may just be entering it wrong. I appreciate your help.

 
Reply With Quote
 
JStiehl
Guest
Posts: n/a
 
      23rd Apr 2010
I followed your directions and entered the code and there was no change. My
rows with an N in column D are not hidden.

"Jacob Skaria" wrote:

> Select the sheet tab which you want to work with. Right click the sheet tab
> and click on 'View Code'. This will launch VBE. Paste the below code to the
> right blank portion. Get back to to workbook and try out.
>
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> If Target.Column = 4 Then Rows(Target.Row).Hidden = (UCase(Target.Text) = "N")
> End Sub
>
> --
> Jacob (MVP - Excel)
>
>
> "JStiehl" wrote:
>
> > I'm a VBA newbie and have searched for an answer for how to do this, but must
> > be doing something wrong when I've tried other codes. I need to have rows
> > automatically hide or unhide based on a value in column D. If the value in
> > column D is Y, the row should not be hidden; if the value is N, the row
> > should be hidden. These values may change, so the rows need to be able to
> > hide/unhide automatically.
> >
> > When I've entered codes in before, I click on the tab for this worksheet,
> > select View Code, choose Insert Module, and then insert the code. There is
> > already a code in this worksheet for something else, so I can't just add it
> > in after selecting View Code. Am I putting the code in the wrong spot?
> > Should I be choosing something else other than Insert Module?
> >
> > I've tried out so many different codes thinking that was the problem, but
> > now I think I may just be entering it wrong. I appreciate your help.

 
Reply With Quote
 
Jacob Skaria
Guest
Posts: n/a
 
      23rd Apr 2010
The earlier code only works for new entries made....If you want a macro to
hide the existing entries try the below

--From workbook launch VBE using short-key Alt+F11.
--From menu 'Insert' a module and paste the below code.
--Get back to Workbook.
--Run macro from Tools|Macro|Run <selected macro()>


Sub MyMacro()
Dim lngRow As Long
For lngRow = 1 To Cells(Rows.Count, "D").End(xlUp).Row
Rows(lngRow).Hidden = (UCase(Range("D" & lngRow)) = "N")
Next
End Sub


--
Jacob (MVP - Excel)


"JStiehl" wrote:

> I followed your directions and entered the code and there was no change. My
> rows with an N in column D are not hidden.
>
> "Jacob Skaria" wrote:
>
> > Select the sheet tab which you want to work with. Right click the sheet tab
> > and click on 'View Code'. This will launch VBE. Paste the below code to the
> > right blank portion. Get back to to workbook and try out.
> >
> >
> > Private Sub Worksheet_Change(ByVal Target As Range)
> > If Target.Column = 4 Then Rows(Target.Row).Hidden = (UCase(Target.Text) = "N")
> > End Sub
> >
> > --
> > Jacob (MVP - Excel)
> >
> >
> > "JStiehl" wrote:
> >
> > > I'm a VBA newbie and have searched for an answer for how to do this, but must
> > > be doing something wrong when I've tried other codes. I need to have rows
> > > automatically hide or unhide based on a value in column D. If the value in
> > > column D is Y, the row should not be hidden; if the value is N, the row
> > > should be hidden. These values may change, so the rows need to be able to
> > > hide/unhide automatically.
> > >
> > > When I've entered codes in before, I click on the tab for this worksheet,
> > > select View Code, choose Insert Module, and then insert the code. There is
> > > already a code in this worksheet for something else, so I can't just add it
> > > in after selecting View Code. Am I putting the code in the wrong spot?
> > > Should I be choosing something else other than Insert Module?
> > >
> > > I've tried out so many different codes thinking that was the problem, but
> > > now I think I may just be entering it wrong. I appreciate your help.

 
Reply With Quote
 
JStiehl
Guest
Posts: n/a
 
      23rd Apr 2010
Thanks so much for your help. I don't know what my problem is, but it still
isn't working. I pasted the code per your directions, but when I run the
macro "My Macro", nothing changes or happens.

"Jacob Skaria" wrote:

> The earlier code only works for new entries made....If you want a macro to
> hide the existing entries try the below
>
> --From workbook launch VBE using short-key Alt+F11.
> --From menu 'Insert' a module and paste the below code.
> --Get back to Workbook.
> --Run macro from Tools|Macro|Run <selected macro()>
>
>
> Sub MyMacro()
> Dim lngRow As Long
> For lngRow = 1 To Cells(Rows.Count, "D").End(xlUp).Row
> Rows(lngRow).Hidden = (UCase(Range("D" & lngRow)) = "N")
> Next
> End Sub
>
>
> --
> Jacob (MVP - Excel)
>
>
> "JStiehl" wrote:
>
> > I followed your directions and entered the code and there was no change. My
> > rows with an N in column D are not hidden.
> >
> > "Jacob Skaria" wrote:
> >
> > > Select the sheet tab which you want to work with. Right click the sheet tab
> > > and click on 'View Code'. This will launch VBE. Paste the below code to the
> > > right blank portion. Get back to to workbook and try out.
> > >
> > >
> > > Private Sub Worksheet_Change(ByVal Target As Range)
> > > If Target.Column = 4 Then Rows(Target.Row).Hidden = (UCase(Target.Text) = "N")
> > > End Sub
> > >
> > > --
> > > Jacob (MVP - Excel)
> > >
> > >
> > > "JStiehl" wrote:
> > >
> > > > I'm a VBA newbie and have searched for an answer for how to do this, but must
> > > > be doing something wrong when I've tried other codes. I need to have rows
> > > > automatically hide or unhide based on a value in column D. If the value in
> > > > column D is Y, the row should not be hidden; if the value is N, the row
> > > > should be hidden. These values may change, so the rows need to be able to
> > > > hide/unhide automatically.
> > > >
> > > > When I've entered codes in before, I click on the tab for this worksheet,
> > > > select View Code, choose Insert Module, and then insert the code. There is
> > > > already a code in this worksheet for something else, so I can't just add it
> > > > in after selecting View Code. Am I putting the code in the wrong spot?
> > > > Should I be choosing something else other than Insert Module?
> > > >
> > > > I've tried out so many different codes thinking that was the problem, but
> > > > now I think I may just be entering it wrong. I appreciate your help.

 
Reply With Quote
 
JStiehl
Guest
Posts: n/a
 
      26th Apr 2010
The security level was set at medium, I changed it to low...it's still not
working when I run the macro. Any other ideas? Thanks so much for your help.

"Jacob Skaria" wrote:

> Set the Security level to low/medium in (Tools|Macro|Security) and reopen excel
>
> --
> Jacob (MVP - Excel)
>
>
> "JStiehl" wrote:
>
> > Thanks so much for your help. I don't know what my problem is, but it still
> > isn't working. I pasted the code per your directions, but when I run the
> > macro "My Macro", nothing changes or happens.
> >
> > "Jacob Skaria" wrote:
> >
> > > The earlier code only works for new entries made....If you want a macro to
> > > hide the existing entries try the below
> > >
> > > --From workbook launch VBE using short-key Alt+F11.
> > > --From menu 'Insert' a module and paste the below code.
> > > --Get back to Workbook.
> > > --Run macro from Tools|Macro|Run <selected macro()>
> > >
> > >
> > > Sub MyMacro()
> > > Dim lngRow As Long
> > > For lngRow = 1 To Cells(Rows.Count, "D").End(xlUp).Row
> > > Rows(lngRow).Hidden = (UCase(Range("D" & lngRow)) = "N")
> > > Next
> > > End Sub
> > >
> > >
> > > --
> > > Jacob (MVP - Excel)
> > >
> > >
> > > "JStiehl" wrote:
> > >
> > > > I followed your directions and entered the code and there was no change. My
> > > > rows with an N in column D are not hidden.
> > > >
> > > > "Jacob Skaria" wrote:
> > > >
> > > > > Select the sheet tab which you want to work with. Right click the sheet tab
> > > > > and click on 'View Code'. This will launch VBE. Paste the below code to the
> > > > > right blank portion. Get back to to workbook and try out.
> > > > >
> > > > >
> > > > > Private Sub Worksheet_Change(ByVal Target As Range)
> > > > > If Target.Column = 4 Then Rows(Target.Row).Hidden = (UCase(Target.Text) = "N")
> > > > > End Sub
> > > > >
> > > > > --
> > > > > Jacob (MVP - Excel)
> > > > >
> > > > >
> > > > > "JStiehl" wrote:
> > > > >
> > > > > > I'm a VBA newbie and have searched for an answer for how to do this, but must
> > > > > > be doing something wrong when I've tried other codes. I need to have rows
> > > > > > automatically hide or unhide based on a value in column D. If the value in
> > > > > > column D is Y, the row should not be hidden; if the value is N, the row
> > > > > > should be hidden. These values may change, so the rows need to be able to
> > > > > > hide/unhide automatically.
> > > > > >
> > > > > > When I've entered codes in before, I click on the tab for this worksheet,
> > > > > > select View Code, choose Insert Module, and then insert the code. There is
> > > > > > already a code in this worksheet for something else, so I can't just add it
> > > > > > in after selecting View Code. Am I putting the code in the wrong spot?
> > > > > > Should I be choosing something else other than Insert Module?
> > > > > >
> > > > > > I've tried out so many different codes thinking that was the problem, but
> > > > > > now I think I may just be entering it wrong. I appreciate your help.

 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Enabling option „Format rows“ to hide/unhide rows using VBA-code? ran58 Microsoft Excel Misc 0 28th Jul 2009 03:46 PM
Automatically hide/unhide rows John C Microsoft Excel Programming 2 25th Jun 2008 10:26 PM
Hide Rows (Current Date) / Unhide Rows =?Utf-8?B?Sm9lIEsu?= Microsoft Excel Programming 1 10th Oct 2007 05:37 PM
Hide Unhide Rows =?Utf-8?B?YmxhY2tzdGFy?= Microsoft Excel Misc 2 6th Feb 2006 09:36 PM
How to hide and unhide rows Michael168 Microsoft Excel Programming 1 6th Oct 2003 11:52 AM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 11:16 PM.