Met behulp van VBA code (Visual Basic for Applications) bepaalde kolommen
verbergen of tonen.

In onderstaand voorbeeld wordt door het intypen van waarde 1 t/m 4 een bepaalde route getoond en de overige routes verborgen.

• Start Excel met een leeg bestand
• Zet in Cel A1 de tekst: Route
• Zet in Cel A2 de tekst: Chauffeur
• Zet in Cel C1 de tekst: Route 1
• Zet in Cel C2 de tekst: Route 2
• Zet in Cel C3 de tekst: Route 3
• Zet in Cel C4 de tekst: Route 4

• Vul de gegevens van de route en de namen van de chauffeur in.

• Open de VBA Editor met Alt-F11
• Dubbel-Klik aan de linkerkant op de naam van het werkblad waar je de gegevens hebt staan.

• In beeld komt een leeg blad waar de code kan worden ingevuld.
• Kopieer daar onderstaande code.
  [De groene regels zijn commentaar regels en kunnen zo nodig worden gewist]

Private Sub Worksheet_Change(ByVal Target As Range)
'Toon kolom C - route 1
If Range("B1").Value = 1 Then Columns("D:F").Hidden = True
If Range("B1").Value = 1 Then Columns("A:C").Hidden = False
'Toon kolom D - route 2
If Range("B1").Value = 2 Then Columns("C:C").Hidden = True
If Range("B1").Value = 2 Then Columns("D:D").Hidden = False
If Range("B1").Value = 2 Then Columns("E:F").Hidden = True
'Toon kolom E - route 3
If Range("B1").Value = 3 Then Columns("C:D").Hidden = True
If Range("B1").Value = 3 Then Columns("E:E").Hidden = False
If Range("B1").Value = 3 Then Columns("F:F").Hidden = True
'Toon kolom F - route 4
If Range("B1").Value = 4 Then Columns("C:E").Hidden = True
If Range("B1").Value = 4 Then Columns("F:F").Hidden = False
'Toon alles bij waarde 0 of 5
If Range("B1").Value = 5 Then Columns("A:F").Hidden = False
If Range("B1").Value = 0 Then Columns("A:F").Hidden = False
End Sub

• Afhankelijk van uw instellingen kunt U nu een melding krijgen dat je het bestand in een ander formaat moet opslaan omdat anders de macro VBA-code niet gebruikt kan worden.

• Kies dan 'Nee' en kies daarna voor het formaat: Excel werkmap met macro's

• Pas nu de opmaak naar eigen smaak aan.
• Met het invullen van een waarde 0,1,2,3,4 of 5 in B1 kan je nu naar wens een bepaalde route tonen.