bonjour le forum
une nouvelle question a vous poser svp,
comment faire en sorte que les nombres de ma listbox s'affiche au format "0.00" ?
j'ai essayé sa mais comme vous l'aurez compris sa ne fonctionne pas du-tout, du moins sa créer une erreur " incompatibilité de type"
Dim aa, i&, x&, y&
With Sheets("BD_Prod")
aa = .Range("A4:Q" & .Range("A" & Rows.Count).End(3).Row)
End With
For i = 1 To UBound(aa)
aa(i, UBound(aa, 2)) = i + 3
Next i
L3.List = aa
With L3
For y = 7 To 14
For x = 0 To L3.ListCount - 1
L3.List(x, y) = Format(L3.List(x, y), "0.00")
Next x
Next y
End With
la listbox (L3) poséde 14 colonnes en commencent par zéro bien-sur et les colonnes concerné sont le 7 jusqu’à la dernière qui est le 14
merci de m'avoir lu
petite précision les valeurs concernées sont issus de formule de calcul de la feuille excel