XL 2010 Recherche le numéro suivant dans un fomulaire

[GUYANAIS]

Bonjour,
Je voudrais afficher dans un comboBox le numéro suivant pour l'enregistrement. Dans l'onglet result en cliquant sur enregistrer et valider on ouvre un formulaire et dans le comboBox "Numéro de facture" je voudrais afficher le numéro suivant qui sera enregistrer dasn l'onglet BDD.
Merci de votre aide

 

[vgendron]

Hello
il te suffit d'aller chercher la dernière facture et lui faire +1
dans ton initialize

Private Sub UserForm_Initialize()

    TextBox1 = Date
    TextBox2 = Sheets(7).Range("G2").Text
    TextBox3.Value = Sheets(2).Range("S6").Value
    TextBox4.Value = Sheets(2).Range("S7").Value
    Label18.Caption = ListView1.ListItems.Count 'On affiche le Nb enregistrement
 With ListView1
        .Gridlines = True 'affiche les lignes
        .View = lvwReport 'style de rapport
        .FullRowSelect = True 'permet de selectionner une ligne dans la liste
        .ColumnHeaders.Add Text:="Noms", Width:=40
        .ColumnHeaders.Add Text:="Prénom", Width:=50
        .ColumnHeaders.Add Text:="Grade", Width:=30
        .ColumnHeaders.Add Text:="Libellé unité", Width:=80
        .ColumnHeaders.Add Text:="PCE", Width:=50
        .ColumnHeaders.Add Text:="Libellé rubrique", Width:=80
        .ColumnHeaders.Add Text:="Montant", Width:=50
       
    End With
    With Sheets("BDD")
        DernièreFacture = Format(.Range("B" & .Rows.Count).End(xlUp), "mm/yyyy")
        Me.TextBox5 = Format(DateSerial(Year(DernièreFacture), Month(DernièreFacture) + 1, 1), "mm/yyyy")
    End With

'Call Actualisation 'on appelle la procédure de remplissage du listview
End Sub