Excel 2003

j.sparo83 Messages postés 109 Statut Membre -  
eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   -
bonjour,

Comment je pourrais faire l'evenement suivant :

Lors de l'insertion dans une cellule A1 dés que je sors de cette cellule il vérifie si la cellule A6 est vide,si c'est le cas il affiche une exception.

Merci à vous

1 réponse

  1. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour,

    un exemple pour forcer la saisie en A6 (et annule la saisie en A1) :
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Target = [A1] And [A6] = "" Then
            MsgBox ("Saisir A6 avant")
            Application.EnableEvents = False
            Application.Undo
            Application.EnableEvents = True
            [A6].Select
        End If
    End Sub

    mais tout dépend du fonctionnement que tu désires, prend les bouts qui t'interessent.

    eric
    0