Masquer des lignes

[mabys]

Bonjour,

J'utilise la macro suivante pour masquer des lignes si la cellule E69 n'est pas égale à 20 :
'Masque les lignes 72 à 85 si la case E69 est différent de 20
If Range("E69") <> "20" Then
Rows("72:88").Select
Selection.EntireRow.Hidden = True
End If

'Affiche les lignes 72 à 85 si la case E69 est égal à 20
If Range("e69") <> "0" Then
Rows("72:88").Select
Selection.EntireRow.Hidden = False
End If
Mais j'ai une erreur de compilation "Instruction incorrecte à l'extérieur d'une procédure". Que dois-je faire (Ultra débutant VBA !) Merci

 

[JCGL]

Re : Masquer des lignes

Bonjour à tous,

Peux-tu essayer en enlevant les " qui encadrent 20 et 0

A+

 

[Pierrot93]

Re : Masquer des lignes

Bonjour Mabys,

si j'ai bien compris, manque peut être la déclaration et la fin de procédure...

Option Explicit
Sub test()
If Range("E69") <> "20" Then
    Rows("72:88").EntireRow.Hidden = True
End If
End Sub

bonne journée
@+

Edition :bonjour Jean-Claude