boite de dialogue

[lemak]

Bonjour à toutes et à tous
Bonjour le forum
J’ai un classeur pour édition de bulletin de salaire, je veux à chaque changement des données de l’employé soit manuellement ou bien automatiquement,une boite de dialogue apparaître avec le message suivant'actualisation des éléments de salaire pour l’employé(x)' pour (x) représente le nom de l'employé indiqué dans la cellule B5
Merci d’avance

 

[porcinet82]

Salut Lemar,

Je pense qu'avec un code dans ce genre tu devrais pouvoir faire ce que tu souhaites (a placer dans le module de la feuille adéquate) :

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range('a1:d10')) Is Nothing Then
        MsgBox 'Actualisation des éléments de salaire pour l’employé ' & Cells(5, 2).Value
    End If
End Sub

Je suppose que tu ne veux pas faire apparaitre une msgbox a chaque changement de cellule dans l'ensemble de la feuille c'est pourquoi j'ai ajouté une confition avec un Intersect, la plage est bien entendu a adapter.

@+