Création d'une boite de dialogue sous VBA

Question

Bonjour, 

J'ai crée une facture sous excel avec plusieurs onglets: facture,liste facture, détail facture.
J'ai également crée un bouton de commande archiver avec VBA afin d'archiver mes factures dans les onglets liste facture et détail facture lors de chaque enregistrement.

Je dois maintenant créer sous VBA deux instructions:

-créer une instruction qui me permette lorsque je clique sur le bouton archiver de créer une boite de dialogue qui m'indique :" la facture est archivé". J'ai réussi a effectuer cette instruction 

-créer une instruction qui m'indiquerait que "la facture a déjà été acrhivé" si tel est le cas notamment en recherchant dans les onglets liste facture et détail facture.
C'est cette instruction qui me pose probleme et je ne sais pas comment faire.

pouvez vous m'aidez???????

Merci


Configuration: Windows 7 / Internet Explorer 8.0

gbinforme · Answer

bonjour

En supposant que tu as créé tes factures avec un numéro unique, il te suffit de lancer une recherche (find) sur ta colonne numéro dans ta liste des factures et si tu la trouve cela indiquerait que "la facture a déjà été archivé".

gbinforme · Answer

bonjour

comment tu écris l'instruction sous VBA?

Comme ceci par exemple avec tes numéros de facture en colonne A :

Dim numero As String
Dim facture As Range
    numero = "ton numéro"
    Set facture = Columns("A:A").Find(What:=numero, After:=Range("A1"), LookIn:=xlValues, LookAt:=xlWhole)
    If Not facture Is Nothing Then
        MsgBox "la facture " & numero & " est archivée"
        ' procédure de sortie
    Else
        ' procédure d'archivage
    End If

Création d'une boite de dialogue sous VBA

2 réponses

Discussions similaires

Newsletters