• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Kolom verbergen met code VBA

Status
Niet open voor verdere reacties.
O

Onno1982

Nieuwe gebruiker
Lid geworden
14 feb 2020
Berichten
2
Hoi,

Ik heb een bestand met 170 kolommen (kolom C tot en met kolom FP) . Elk kolom is genummerd van 1 tot en met 170. Nu wil ik in één cel (B1) een kolomnummer invullen (van één van de kolommen) en dat de andere kolommen automatisch verborgen worden. Dus als ik 4 invul, dan moeten de kolommen 1 tot en met 3 EN 4 tot en met 170 verborgen worden.

Kan iemand mij helpen met de juiste VBA-code?
 
Zo las ik het ook @OctaFish.
Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "B1" Then
 If Target.Value > 0 And Target.Value < 171 Then
     Columns("c:fp").Hidden = True
     Columns(2 + Target.Value).Hidden = False
   Else
     Columns("c:fp").Hidden = False
 End If
End If
End Sub
 
Hoi,

Sorry, ik had in de vraagstelling alle kolommen meegenomen. De code werkt. Super bedankt. Je hebt mij enorm geholpen.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan