evenement

bonjour aurelie,

il faut copier cette macro sur la page code de la feuille,

Private Sub Worksheet_Change(ByVal Target As Range)
Set isect = Application.Intersect(Target, Columns(6))
If isect Is Nothing Then
MsgBox "aucune action"
Else
MsgBox "action"
End If
End Sub

isabelle

Bonjour,

Je ne connais pas vraiment les evenements sous VBA mais je pense que c'est
ce dont j'ai besoin, je vous explique:
J'aimerai que quand l'utilisateur de mon fichier excel documente les
cellules d'une colonne particulière (colonne F par exemple), en fonction de
ce qu'il y met: "oui" ou "non", je documente automatiquement les cellules
voisines ou non.
L'événement qui déclanche tout est donc l'écriture d'un texte dans une
cellule donnée, mais je ne sais pas codé ceci!

Merci d'avance pour votre aide

Cordialement

Aurélie

Bonjour,

Associé à ta feuille :

Private Sub Worksheet_Change(ByVal target As Range)
If Cells(ligne, colonne) = "oui" Then
[...]
End If
End Sub
--
Arrivederci

mais je ne sais pas codé ceci!

Merci à vous deux, ça marche très bien!

Bonjour,

Associé à ta feuille :

Private Sub Worksheet_Change(ByVal target As Range)
If Cells(ligne, colonne) = "oui" Then
[...]
End If
End Sub
--
Arrivederci

mais je ne sais pas codé ceci!

Bonjour
Précisons peut-être pour notre amie, dans son cas particulier :
Private Sub Worksheet_Change(ByVal target As Range)
'on sort s'il ne s'agit pas de la colonne F
If Target.column <> 6 Then Exit Sub
'Sinon on teste la valeur
If Cells(Target.row, Target.column) = "oui" Then _
'on affecte une valeur à la cellule située dans la colonne de droite
Cells(Target.row,Target.Column + 1)="Il a dit oui"
End If
End Sub

Cordialement
Pascal


"Quetzalcoatl" <razleboldesspams@free.fr.invalid> a écrit dans le message de
news:42fc7299$0$3113$8fcfb975@news.wanadoo.fr...

Bonjour,

Associé à ta feuille :

Private Sub Worksheet_Change(ByVal target As Range)
If Cells(ligne, colonne) = "oui" Then
[...]
End If
End Sub
--
Arrivederci

mais je ne sais pas codé ceci!