Discussion :

[developpeur82]

Bonjour,

je souhaite executer cette fonction (qui permet simplement d'ecrire TOTO dans une cellule):

Code :

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

ActiveCell.Value = "TOTO"

mais mon probleme est que je souhaite interdire l'utilisateur d'executer cette fonction en dehors de la colonne C (n'importe quelle cellule de la colonne C c'est OK).

Je ne connais pas quelle commande dois je utiliser. Besoin d'aide. Merci beaucoup.

[Kaëléphine]

Bonjour;

juste avant tu mets une condition :

Code :

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

1
2
3
If ActiveCell.Column = 3 Then
ActiveCell.Value = "TOTO"
End If

En espérant t'avoir aidé.

[mercatog]

Utilise l'évènement Change de ta feuille.
Code à mettre dans le module de ta feuille

Code :

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

1
2
3
4
5
6
7
8
Private Sub Worksheet_Change(ByVal Target As Range)
 
If Target.Count = 1 Then
    If UCase(Target.Value) = "TOTO" Then
        If Target.Column <> 3 Then Application.Undo
    End If
End If
End Sub

[developpeur82]

excellent! Merci