Msgbox modification cellule

Bonjour à tous,

je suis nouveau sur ce forum

je viens vers vous car j'aimerais créer une sorte de fenêtre pop up qui aurait pour but de confirmer une saisie

je m'explique, dès que l'on souhaite modifier la valeur d'une cellule, une fenêtre de confirmation s'ouvre type "attention, vous vous apprêtez à modifier cette valeur. Continuer ?" et on aurait la possibilité de répondre par oui ou par non.

il faudrait que cette fenêtre intervienne sur N'IMPORTE QUELLE CELLULE de la feuille excel. En gros moindre petit changement = message de confirmation

j'ai vaguement entendu parler des msgbox et de visualbasic ?

quelqu'un peut m'aider svp ?? merci

Bonjour

Faites ceci :

  • Clique droite sur l'onglet de la feuille concernée
  • Choisir l'option "visualiser le code"
  • Coller les deux codes ci-dessous dans la fenêtre
  • Enregistrer le fichier avec l'extension XLSM
Dim val
Dim ok As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
Dim a
If ok = True Then Exit Sub
If Not Intersect(Target, Cells) Is Nothing Then
    a = MsgBox("Attention, vous vous apprêtez à modifier cette valeur. Continuer ?", vbYesNo + vbQuestion, "Archiver")
    If a = vbYes Then Exit Sub Else: ok = True: Target = val
End If
ok = False
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
val = Target.Value
End Sub

Si ok, lors de votre réponse merci de cloturer le fil en cliquant sur la case à cocher verte à coté du bouton EDITER

Cordialement

Hello Yac200 & Dan, le forum,

J'arrive trop tard mais teste cette proposition.

Bonne journée.

177yac200.xlsm (15.07 Ko)

ça marche, merci Dan!

nonesofar13 : oui trop tard mais merci quand même

Rechercher des sujets similaires à "msgbox modification"