Calcul dans listbox

bonjour le forum,

j'ai un petit problème avec un code, si quelqu'un peut m'aide svp, merci

je veux multiplier par 2 les valeurs de la colonne 12 de ma listbox et pour sa j'ai tapé un petit code mais erreur d'objet requis!

Private Sub CommandButton3_Click()
Dim i, a
a = L1.ListCount
 With L1
  For i = 0 To a
   .List(i, 12).Value = Me.L1.List(i, 12) * 2
  Next i
 End With
End Sub

Bonsoir,

Private Sub CommandButton3_Click()
    Dim i%, a%
    a = L1.ListCount
    With L1
        For i = 0 To a - 1
            .List(i, 12) = CDec(.List(i, 12)) * 2
        Next i
    End With
End Sub

Les colonnes aussi se numérotent à partir de 0, es-tu sûr du 12 ?

bonjour MFerrand ,

merci de me repondre , oui je sais que sa commence a 0 et c'est bien 12 !!

j'ai modifié comme tu l'as ecrit plus d'erreur mais rien ne ce passe !

enfaite quand je rajoute (".value") sa crée l'erreur !

re

toute mes excuse sa marche niquel !!

merci encore!!