Excel, cacher des lignes sous coudition
ARodriguezzz
-
via55 Messages postés 14512 Date d'inscription Statut Membre Dernière intervention -
via55 Messages postés 14512 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aimerai pouvoir faire apparaitre/disparaitre les lignes 20 à 67 en fonction de la réponse en cellule E18 :
- Si "oui" alors faire apparaitre lignes
- Si "non" : qu'elles n'apparaissent pas
Je pensais que ce serait simple, mais incapable d'y arriver...
J'aimerai pouvoir faire apparaitre/disparaitre les lignes 20 à 67 en fonction de la réponse en cellule E18 :
- Si "oui" alors faire apparaitre lignes
- Si "non" : qu'elles n'apparaissent pas
Je pensais que ce serait simple, mais incapable d'y arriver...
Configuration: Macintosh / Safari 13.1.1
A voir également:
- Excel, cacher des lignes sous coudition
- Liste déroulante excel - Guide
- Aller à la ligne excel - Guide
- Word et excel gratuit - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
1 réponse
Bonsoir
Faisable par une macro mise dans worksheet de la feuille concernée
ALT+F11 pour ouvrir l'éditeur VBA
Sélectionner la feuille dans l'arborescence à gauche par double-clic
Copier-coller la macro ci-dessous
Fermer l'éditeur
Cdlmnt
Via
Faisable par une macro mise dans worksheet de la feuille concernée
ALT+F11 pour ouvrir l'éditeur VBA
Sélectionner la feuille dans l'arborescence à gauche par double-clic
Copier-coller la macro ci-dessous
Fermer l'éditeur
Private Sub Worksheet_Change(ByVal Target As Range)
' si modification en E18
If Not Intersect(Target, Range("E18")) Is Nothing Then
' plage à selectionner
Rows("20:67").Select
' si oui en E18 on masque la selection
If Target.Value = "oui" Then
Selection.EntireRow.Hidden = True
Else
'sinon on demasque la selection
Selection.EntireRow.Hidden = False
End If
' cellule où se positionner après le choix en E18
Range("F18").Select
End If
End Sub
Cdlmnt
Via
