Générer un n° de facture

Résolu
Bonjour !

J'aimerai générer un n° de facture aléatoire compris entre 0001 et 9999 mais lorsque je ferme mon fichier et que je l'ouvre à nouveau, mon n° ne doit pas changer ! Après serait-il possible de copier mon fichier et lorsque j'ouvre la copie un autre n° se génère ?

Si quelqu'un pourrait m'aider ça serait génial.

Merci d'avance.

1 réponse

  1. J'espère que cela va t'aider un peu :

    Private Sub Workbook_Open()
        If IsEmpty(Range("A1")) Then
            Randomize
            Range("A1").Value = Int((10000 * Rnd) + 1)
        End If
    End Sub
    


    Tu mets ce code dans "ThisWorkbook" dans l'éditeur VBA et tu auras un numéro de facture aléatoire (dans la case A1) lorsque tu ouvres le fichier, sauf s'il y en avait déjà un.
    0