Excel, cacher des lignes sous coudition Fermé

Question

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... 

Configuration: Macintosh / Safari 13.1.1

via55 · Answer

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

Excel, cacher des lignes sous coudition

1 réponse

Discussions similaires