Re-bonjour,
Dans ton texte tu dis que tu veux deux lignes de moins s’il ne s’agit pas d’un support ‘banderole’ mais dans ta macro – lorsque c’est un support autre que ‘banderole’, tu masques 3 lignes : la 33, la 34 et la 35. Si tu ne veux masquer que deux lignes tu dois donc modifier cette partie du code en conséquence.
Dans ton code - au cas où il s’agit d’un support ‘banderole’ - tu rouvres des lignes qui n’ont pas été masquées au préalable, les lignes 32 et 36. Pourquoi ??
En fait il serait logique de ne rouvrir que les 2 seules lignes nécessaires masquées.
Avec le code ci-dessous, placé dans le fichier ci-joint, 2 lignes sont masquées s’il s’agit d’un cas autre que ‘banderole’ et vice-versa.
Sub banderole()
If Range("B16").Value = "banderole" Then
Rows("34:35").EntireRow.Hidden = False
Else
Rows("34:35").EntireRow.Hidden = True
End If
End Sub
Si le code proposé ci-dessus ne te convient pas, explique moi pourquoi il ne te convient pas.
Si l’instruction ‘Application.ScreenUpdating = 0’ semble peu utile pour un code si court, l’instruction Application.ScreenUpdating = -1 semble utile seulement dans un nombre infinitésimal de cas (dont aucun qui me soit personnellement connu pour l'instant ).
Amicalement.