Discussion :

[celine31190]

Bonjour,

J'aimerais protéger ma feuille "SYNTHÈSE panneaux" mais si je le fais via Révision dans le ruban, mon code VBA ne fonctionne plus. Je souhaiterais que la personne qui ouvre cette feuille ne puisse rien toucher, juste imprimer.

Voici mon code :

Code :

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_Activate()
        Dim x As Integer
    For x = 3 To 676
        If Cells(x, 1) = "" Or Cells(x, 1) = 0 Then
            Rows(x).EntireRow.Hidden = True     'masque
        Else
            Rows(x).EntireRow.Hidden = False    'affiche
        End If
    Next x
End Sub

J'ai trouvé quelques codes intéressants sur les forums mais je n'arrive pas a l'appliquer a mon cas.

Merci d'avance

[Philippe Tulliez]

Bonjour,
Si l'on souhaite protéger une feuille pour empêcher un utilisateur d'entrer ou modifier des données dans des cellules de cette feuille mais que l'on souhaite pouvoir le faire par VBA, il faut utiliser la propriété UserInterfaceOnly de la méthode Protect.
Je te renvoie vers l'aide en ligne du VBA pour en savoir plus.