Bouton Formulaire de saisie avec message de confirmation

senecartour Messages postés 324 Date d'inscription   Statut Membre Dernière intervention   -  
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai crée un formulaire de saisie avec un bouton "Enregistrer" permettant de copier les données dans ma feuille nommée "Base".

Seulement, je souhaiterais qu'avant la copie des données, c'est à dire après avoir cliquer sur le bouton "Enregistrer", obtenir un message de type "Voulez-vous enregister la saisie?".
-Si je répond "Oui" les données sont enregistrées
-Si je répond "Non" je quitte le formulaire de saisie

Merci pour votre aide.


A voir également:

1 réponse

Réponse 1 / 1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

A adapter selon le besoin: 

Private Sub CommandButton1_Click()
Dim rep As Integer

    rep = MsgBox("Voulez-vous enregister la saisie ?", vbYesNo, "Enregistrement")
    
    If rep = vbYes Then
        'code pour insérer les données
    Else
        Unload Me 'Fermeture du formulaire
    End If
    
End Sub
0

Discussions similaires

Où est la touche SHIFT sur mon clavier d'ordi ?
joe! -
fernando-_ytb -

18 réponses
SMS message vocal arnaque ?
kikidefer -
brucine -

9 réponses