code

Re : code

Bonjour Aiglon74, le Forum,

Essaie ceci:


@+

Re : code

bonjour sergio

voici le code en entier
Sub ModifOrdre()

' Macro enregistrée le 02/11/2007 par Aiglon74

Application.ScreenUpdating = True

Sheets("ModifOrdre").Select
Range("G65").Select


On Error GoTo Erreur
ActiveSheet.Unprotect
Rows("1:56").Select
Selection.EntireRow.Hidden = False
Exit Sub
Erreur:
Message = MsgBox("Le mot de passe est erroné, recommencez !", vbExclamation, "Erreur Mot de passe")
'End Sub



' ActiveSheet.Unprotect
'Rows("1:56").Select
'Selection.EntireRow.Hidden = False
ActiveSheet.Protect

Range("E18").Select
Sheets("ModifOrdre").Select


ActiveSheet.Unprotect

Range("E10").Select


ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True



End Sub

apres modif
j'ai bien le message d'erreur et la 2eme possibilite de rentre mon code
sans resultat

si le code et bon au premier coup tout s'ouvre mais selectionne la celule a1
et la feuille et grisé comme si la macro n'aller pas a son terme

Re : code

Re,

Il faut mettre la gestion d'erreur à la fin du code


Tu déprotéges et protèges ta feuille 2 fois dans le code, 1 seule fois peut suffire.

@+

Re : code

Re,


gagner merci pour l'aide
tout marche comme voulu



A+ AIGLON74