salut a tous, salut Ti, dis moi g une erreure qui se produit qd je veu imprimer le bl "type d'argument byref imcompatible, g essayé de comprendre mais euh?????????
l'erreur se trouve ds se module
Private Sub BoutImprime_Click()
Dim PlageBL As Range
Dim Boucle As Integer, Nb
Dim NbPainsSelect As Byte
If ListBoxClient.ListIndex = -1 Then
MsgBox "Aucun client sélectionnée...", vbExclamation, "Impression commande"
Exit Sub
End If
RemplitBL NbPainsSelect <---------- c surligné
If NbPainsSelect = 0 Then
MsgBox "Aucun pain commandé..", vbExclamation, "Impression commande"
Else
Worksheets("BL").PrintOut