selection de la cellule

[nabil192]

salut a tous
j'avais une formulaire sous excel qui possède des champs verrouiliés je veux déplacer la sélection avec la touche entrée du clavier juste dans les champs non verrouillée.
j'ai essayé de faire un exemple qui est :
je vérifi la cellule sélectionnée
si elle est A1,
si jappuis sur la touche entrée le cursur se déplace vers la cellule C3
mais elle na pas marché

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells.Select = ("A1") Then
If keypress = 13 Then
Cells.Select = ("C3")
End If
End If
End Sub

 

[GIBI]

Re : selection de la cellule

Bonjour,

Il faut faire référence à la cellule passée en poaramètre (TARGET)


donc il faut écrire le premier test comme ceci

If Target.Address(False, False, xlA1) = ("A1") Then

je n'ai pas compris ce que tu veux faire, mis ci-dessous un exmple de fonction qui te fais passer à C3 si ti selectionne A1

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Target.Address(False, False, xlA1) = ("A1") Then
EnableEvents = False
Range("C3").Select
EnableEvents = True
End If

End Sub



GIBI

 

[job75]

Re : selection de la cellule

Bonjour Nabil,

Si j'ai bien compris, il n'y a pas besoin de macro :

- vérifier que les cellules dont vous voulez imposer la sélection ne sont pas verrouillées (menu Format-Cellule-Protection et décocher la case)

- menu Outils-Protection-Protéger la feuille, puis décocher l'option "Sélectionner les cellules verrouillées". L'entrée d'un mot de passe est facultatif (à vous de voir).

Quand on fait <Entrée>, la sélection passe à la cellule non verrouillée suivante.

A+

 

[job75]

Re : selection de la cellule

Re, et salut GIBI,

Si vous ne vous voulez pas protéger la feuille, voici une solution par macro, qui utilise la variable publique Sel (à déclarer en haut de la page de code, l'adresse de la sélection précédente est ainsi conservée) :

Public Sel$

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sel = "$A$1" Then [C3].Select
Sel = Target.Address
End Sub

A+

Edit : bien entendu, et je suis sûr que vous le savez, la macro est à placer dans le code de la feuille (clic droit sur l'onglet et Visualiser le code).