Coorection code afficher masquer selon le nombre

chaelie2015

XLDnaute Accro

• 24 Juillet 2015

• #2

Re : Coorection code afficher masquer selon le nombre

re
ci joint fichier teste
Salutations

 

Pièces jointes

• CHARLIE MASQUER AFFICHER ENTETE.xlsm

  20.4 KB · Affichages: 20

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 24 Juillet 2015

• #3

Re : Coorection code afficher masquer selon le nombre

BONSOIR FORUM
EST CE QUE MON SOUCI A ETE BIEN POSE?
Salutations

 

Vote positif 0 Vote négatif

Ilino

XLDnaute Barbatruc

• 24 Juillet 2015

• #4

Re : Coorection code afficher masquer selon le nombre

Bonsoir CHAELIE
Essayez ceci

Code:

Private Sub Worksheet_Change(ByVal R As Range)
  
  If R.Address = "$M$1" Then
        
    Rows("4:13").Hidden = 1
    If R <> "" And IsNumeric(R) Then Rows("3:" & 3 + Int(R)).Hidden = 0
    
    Rows("652:655").Hidden = 1
    Rows("637:651").Hidden = 1
    If R <> "" And IsNumeric(R) Then Rows("637:" & 641 + Int(R)).Hidden = 0
    If R <> "" Then Rows("652:655").Hidden = 0
End If
End Sub

A+

 

Vote positif 0 Vote négatif

chaelie2015

XLDnaute Accro

• 24 Juillet 2015

• #5

Re : Coorection code afficher masquer selon le nombre

BONSOIR ILINO
Merci pour la réponse ; ça fonctionné comme je veux C'est nickel
PBLM est RESOLU

 

Vote positif 0 Vote négatif