• 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.

rijen verbergen aan de hand van een waarde in een cel

Status
Niet open voor verdere reacties.

Evertblokdijk

Gebruiker
Lid geworden
3 okt 2019
Berichten
45
Goede dag allemaal

Weet iemand hoe ik, aan de hand van een waarde in een cel, een aantal rijen zichtbaar kan laten worden of juist verborgen

Het idee ...
cel E13 heeft een waarde tussen 1 en 3
Rij 13 is altijd zichtbaar (immers de waarde is minimaal 1)
maar als de waarde in cel E12 een twee word, wil ik dat pas dan regel 14 zichtbaar wordt.
En natuurlijk .... als de warde in Cel E13 3 zou zijn, dan wil ik dat zowel regel 14 als regel 15 zichtbaar worden
Rijen 14 & 15 zullen standaard verborgen zijn .....

Alvast bedankt voor het meedenken.
 
Dat kan, plaats even een voorbeeldbestandje aub
 
zo:

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(13, 5).Value = 2 Then Rows(14).Hidden = False Else Rows(14).Hidden = True
If Cells(13, 5).Value = 3 Then Rows(15).Hidden = False Else Rows(15).Hidden = True
End Sub
 
Als bijlage een voorbeeld bestandje
Blad 1... Zoals het er nu uitziet
Blad 2 .. Zoals ik graag zou zien dat het er uit gaat zien
(e.e.a) afhanekleijk van de waarden in cel F9 / F12 / F15 / F18 .. enz..
 

Bijlagen

SjonR,

In jouw formule, als de waarde in cel E13 3 word . .verdwijnt regel 14 weer ..
Als de waarde in cel E3 3 is .. dan is het d ebedoeling dat je zowel regel 13 als 14 als 15 ziet
 
Ja, Excuus

HTML:
Private Sub Worksheet_Change(ByVal Target As Range)
If Cells(13, 5).Value > 1 Then Rows(14).Hidden = False Else Rows(14).Hidden = True
If Cells(13, 5).Value = 3 Then Rows(15).Hidden = False Else Rows(15).Hidden = True
End Sub
 
in 1 rechte beweging, zonder die If ... Then ... Else ...
Code:
Rows(14).Hidden = (Cells(13, 5).Value <= 1)
 
Ook zonder haken

Code:
Rows(14).Hidden = Cells(13, 5) <= 1
 
:thumb::thumb:
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan