Protection cellules EXCEL 2000

[Vik Leroy]

Bonjour,

Dans EXCEL 2000, comment fait-on pour bloquer les cellules à la saisie, mais aussi pour les bloquer à la sélection ?

Je m'explique, je peux me positionner dessus, la case est sélectionnée, mais je ne peux pas modifier le contenu.
Dans EXCEL 2002, c'est bien bloqué comme je veux (on ne peut pas aller sur la cellule).

Cette spécificité n'existe-t-elle pas dans la version 2000 ?
Et si elle existe, comment fait-on ?

Merci
Vik

 

[Ti]

hélas non, ça n'existe pas dans Excel 2000, et pourtant cette option est bien pratique...

 

[Vik Leroy]

Ben oui c'est pratique, parce que ça évite de cliquer bêtement sur des cellules que tu n'as pas le droit de sélectionner.
On se demande à quoi ils pensent chez Microsoft!
Enfin, tant pis, merci.

 

[mDF]

Bonjour Vik
Bonjour Ti

Avec Excel 2000, je ne sais pas mais avec Excel 97, j'ai l'habitude d'utiliser par VBA :

With Worksheets(1)
.EnableSelection = xlUnlockedCells
.Protect Contents:=True, UserInterfaceOnly:=True
End With

Comme ça, les cellules verrouillées ne sont plus sélectionnables!

Cordialement.
DIDIER

 

[Vik Leroy]

OK, la méthode de Didier marche Nickel.

Ptite question, j'ai mis le code dans les évènements. Alors ça marche plutôt bien, sauf au démarrage, lorsque j'ouvre la feuille pour la première fois et que j'arrive sur l'onglet, ce n'est plus protégé. Donc il ne conserve rien, mais à la limite c'est pas trop grave si seulement la fonction/l'évènement pouvait être activée d'entrée à l'ouverture.

C'est possible ça ?

Vik

 

[mDF]

Il te faut mettre ce code à l'ouverture du document, donc dans l'objet Workbook, évènement Open :

Private Sub Workbook_Open()
...
End Sub


DIDIER

 

[Vik Leroy]

Merci.

En fait, j'avais réussi à trouver 😀

Par contre, avec ce coding pour le blocage des cellules, je ne peux plus naviguer entre les cellules avec la touche TAB, c'est normal ?

Vik

 

[mDF]

Je n'ai pas ce problème avec la touche TAB pour ma part.
(Ni même avec les touches de direction ou la touche Entrée).

DIDIER