Lijnen van groepsvak(ken) onzichtbaar maken.

In Excel Tip 035 hebben we besproken hoe we keuzerondjes maken en deze te groeperen in groepsvakken.

In deze tip bespreken we het onzichtbaar maken van de lijnen van deze groepsvakken.

We kunnen dit enkel doen d.m.v. VBA. (Voor degene die de cursus Excel automatiseren gevolgd hebben die hebben nu al een stap voor, voor degene die de cursus nog niet gevolg hebben raad ik aan deze eerst eens door te nemen)

We slaan eerst het bestand op met de extensie .xlsm
Klik hiervoor de knop “Bestand” in de menubalk, en kies “Opslaan als” in het drop-downmenu.
Kies in het venster dat verschijnt de optie “Excel-werkmap met macro’s”.

Klik vervolgens op “Opslaan”

We openen nu de VBA editor.
Ga op het lint naar “Ontwikkelaars”(1) en klik op “Visual Basic”(2), of druk ALT+ F11 (de functie-toets F11).

De Visual basic editor wordt geopend.

We typen in het rechtervenster (het programma code venster):
“Private Sub workbook_Open”
en druk Enter

Excel past automatisch de code als volgt aan(3):

We typen nu onder de eerste regel de volgende code:
“Blad1.GroupBoxes.Visible = False” en drukken Enter.

Uitleg bij de code:

“Private Sub workbook_Open”

Dit betekent dat er iets moet gebeuren bij het openen van het bestand.

Blad1.Groupboxes.Visible = False

Dit betekent: Blad1 lijnen van groepsvakken niet zichtbaar.

Vervolgens klikken we op het icoon “Opslaan”(4) op de werkbalk en sluiten de VBA Editor(5).

We sluiten het bestand en openen het terug en de lijnen van de groepsvakken zijn nu onzichtbaar.

Opgelet:

De verwijzing naar blad1 in de code “Blad1.GroupBoxes.Visible = False” is een verwijzing naar de naam die Excel geeft aan het blad(6), voor diegene die werken met de Engelstalige versie van Excel is de code “Sheet1. GroupBoxes.Visible = False”

Wil je verwijzen naar de tabbladnaam dan moet je de code als volgt aanpassen:
Sheets (“Blad1”) . GroupBoxes.Visible = False (7)

Deze methode heeft echter een nadeel ,nl. wanneer naderhand de naam van het blad op het tabblad gewijzigd wordt dan werkt de code niet meer.

Wil je de lijnen naderhand terug zichtbaar maken dan verander je “False” door “True”
Dus “Blad1.GroupBoxes.Visible = False” wordt dan “Blad1.GroupBoxes.Visible = True”.

Ter informatie: Swotster.com denkt aan zijn cursisten, denk ook aan Swotster.com

Cursussen

• Downloading iPad Apps
• Lesson 1: Introduction to Publisher
• Lesson 65: File Formats