Discussion :

[nath-0-0]

Bonjour,

Lorsqu'on fait mafeuille.Unprotect , toutes les protections définies sur une feuilles sont levées? non?

Et lorsqu'on fait Mafeuille.protect, tout est vérouillé comment avant,non?

j'ai mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
Dim cell As Range
 
WsVentilation.Unprotect
            For Each cell In WsVentilation.Range("VentilListeContrat")
                If UCase(cell) = UCase(strNomContrat) Then
                    cell.Activate
                    supprimerLigneRecapVentil
                End If
            Next cell
            WsVentilation.Protect

il bug sur cell.activate avec pour msg d'erreur : la méthode Activate de al classe Range a échoué.

NAth

[Jean-Philippe André]

salut,
ta feuille est protegee, certes, mais avec un mot de passe ou pas ?
Si c'est le cas, il faut fournir a vba le code

[nath-0-0]

non pas de mot de passe

[Pierre Fauconnier]

Salut.

Je ne vois pas en quoi la protection empêcherait l'activation.

Il faudrait tester ton code sur une feuille non protégée en supprimant les lignes VBA de déprotection/reprotection pour voir si c'est cela qui pose problème

[nath-0-0]

ohlallalalaalalallaalalal j'ai fini par trouvé...pfffff, quelle !!!!

voilà auparavant il faut mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim cell As Range
 
WsVentilation.Unprotect
WsVentilation.aCtivate
            For Each cell In WsVentilation.Range("VentilListeContrat")
                If UCase(cell) = UCase(strNomContrat) Then
                    cell.Activate
                    supprimerLigneRecapVentil
                End If
            Next cell
            WsVentilation.Protect

[Pierre Fauconnier]

Pffiouuu...

Jamais pensé que ta feuille pouvait ne pas être active...

Cela étant... Je ne sais pas ce que tu fais dans la procédure supprimerLigneRecapVentil, mais je suis pratiquement certain que tu n'as pas besoin d'activer une cellule pour utiliser cette procédure

Ton code gagnerait en clarté et en rapidité