How can I repeat a code with different range and make it work?

Hello,

I am tryingo to do a code so when I double click a cell (A5) a checkmark appears and rows 6 to 8 get hidden. When double click again, checkmark disappears and rows 6 to 8 disappear.

I got the code (I don't remember where I got it from) working with a few changes. However, I want to repeat the code for other cells. For example.


I want people choose to double click cell A5 to hide rows 6 to 8, and/or double click cell D5 to hide rows 9 to 11 and/or double click cell F5 to hide rows 12 to 14, etc.

I get the first one perfectly done! But when I try to copy paste the sub and change values, it just ignores it and does nothing.


Is there a way to do it?

Here is the code:
Note: the "a" is the checkmark with font Marlett, and the "r" is an X in font Marlett. When you double click it changes from X to checkmark.

Please Login or Register  to view this content.

This will do D5 as well, just add another ElseIf for F5

Please Login or Register  to view this content.

Thanks all for the replies,

I gave only three examples, but in realiy, I am writing a report with 7 categories, which will have many sub categories. These subcategories are the cells I want to hide because they will not apply to every report.

So, for the sake of example, imagine that I am listing categories like fruits, animals, cars, etc.

There will be a list for each category, so fruits will be like:

Fruits:
A5 D5 F5 I5 J5
1 2 3 4 5

1) Apple
2) Banana
3) Orange
4) Grape
5) Watermelon

If they double click in cell A5, the row for Apple will be hidden, if they double click it again, it will show again. If Apple, Banana, and Grape don't apply to the report, they will double click A5, D5 and F5 to hide their corresponding rows. It will be like that for every category. Also, If they click the category. In my actual report, it has numbers and subtotals and all to make graphs, etc.

Hope I got to explain myself better, and thanks again for all your help. I appreciate it a lot!

How about

Please Login or Register  to view this content.

As you haven't said what rows to hide for I5 & J5 I've guessed.
You can expand this by adding for cells to the range in blue & the choose in red.