Hide / unhide Rows

NullVBA · #1 12-08-2015, 06:19 AM

Good Afternoon,

i am little bit new to VBA code.

I am working on an excel sheet with different contract Articles, I need to have a code when i double click on the Article heading it hides all its sub Articles, and double click again it unhides them. the problem is i need to repeat this code to all the Articles i have which would be like 100 Article heading. All the codes i find online is fixing the rows to hide like A3:A9 !. i need a criteria to stop the hide maybe until it reaches a blank space.

it is easier for me if i just double click on the Cell that contains the Article name.

Any idea ??? Please help

charlesdh · #2 12-08-2015, 09:20 AM

Hi,

Can you provide a workbook? It will make it easier for the members.
Also if you posted on another forum let us know.

charlesdh · #3 12-08-2015, 06:10 PM

HI,

Try this code in the worksheet code module.
When you double click in "A1" the code will hide all of the rows to the "1st" empty row.
If you need to do this several time then you will need a different code.
That's why I asked for file to look at. In the file indicate where you need the "Hide" action to take place.

When you double click on range "A1" again it will unhide the rows.

Code:

Option Explicit
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim i As Long
i = Range("A1").End(xlDown).Row
If Target.Column = 1 Then
    Cancel = True
    If Range("A" & Target.Row + 1).Rows.Hidden Then
        Range("A:A").Rows.Hidden = False
    Else
        Range("A" & Target.Row + 1 & ":A" & i + 1).Rows.Hidden = True
    End If
End If
End Sub

NullVBA · #4 12-09-2015, 02:32 AM

I thought I did yesterday, probably wasn't a successful post. Find attached a similar excel sheet. I want to be able to hide/ un hide the sun articles by double clicking of their main article.

Yes I did post in other forum but didn't receive a reply yet.

Thank you.

macropod · #5 12-09-2015, 05:10 AM

Quote:

Originally Posted by NullVBA

Yes I did post in other forum but didn't receive a reply yet.

Since you've cross-posted on other forums, please provide the relevant links - plus links to this forum on those other forums as well.

This is all part of the standard cross-posting etiquette, for which please read: http://www.excelguru.ca/content.php?184

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Hide/Unhide Text Based on Drop Down Selection	gw1500se	Word	3	02-19-2015 12:17 PM
Hide/Unhide a Block of Text Based on Choice Selection	inquirer	Word VBA	7	09-22-2014 04:41 PM
VBA Code Needed that will Hide / Unhide a row when used with a "Check Box"	barryoffshore	Excel Programming	4	06-23-2014 05:07 AM
Hide/Unhide pictures	maloneb	PowerPoint	1	01-18-2012 03:34 PM
Unhide and Re-hide in Excel 2003	thorgal67	Excel	1	07-16-2009 07:06 AM