Afficher / Maquer des lignes suivant le contenu d'une cellule
Bonjour,
Je commence en VBA.
J'ai une cellule AB4 qui peut contenir 169 contenus différents. Elle se remplit automatiquement suivant une formule de type :
AB4 = V4&X4&Z4 => R1 (Rouge AS)& RR (Rouge Roi) & D (DEALER) = R1RRD (main AS/ROI suité position DEALER)
Si AB4 = R1RRD alors je veux :
Masquer les lignes (19:36)
Afficher les lignes (37:44)
Masquer les lignes (46:5224)
sinon je passe à une autre possibilité.
Quelqu'un peut il m'aider ?
J'ai essayé ce code pour 2 possibilités mais cela ne fonctionne pas :
Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("Table 3 joueurs").Range("AB4").Value Like "*R1R1D*" Then
Dim FR1$, FR2$
FR1 = "19:26": FR2 = "28:5224"
Rows(FR1).Hidden = False
Rows(FR2).Hidden = True
then
If Sheets("Table 3 joueurs").Range("AB4").Value Like "*R1R1BB*" Then
Dim FR1$, FR2$
FR1 = "19:37": FR2 = "38:5224"
Rows(FR1).Hidden = False
Rows(FR2).Hidden = True
End If
End Sub
Bonsoir,
Quelqu'un peut il m'aider ?
Merci