XL2013 - Convertir colonne en nombre

Bonjour,

Voici le code que j'ai trouvé pour sommer ma colonne 8 de ma listbox. Cela fonctionne si les données sont prises telles quelles. Cela me met un message d'erreur Erreur d'exécution '13', Incompatibilité de type seulement quand j'applique un calcul sur 3 textbox.

Le problème vient du format de ma dernière colonne, il n'est pas en nombre.

Dim T As Single 'déclare la variable T (Total) / Type à adapter
Dim I As Integer
With ListBox1 'prend en compte la ListBox1 (à adapter)
    For I = 0 To .ListCount - 1 'boucle sur tous les lignes de la ListBox1
       T = T + .Column(7, I) 'définit le total T de la 8ème colonne
    Next I 'prochaine ligne de la boucle
    TextBox11.Value = T 'renvoie dans la TextBox1 le total T (à adapter)
    Range("A11").Resize(.ListCount, .ColumnCount) = .List 'renvoie la da la cellule A1 la les éléments de la ListBox1
End With 'fin de la prise en compte de la ListBox1
End If

Est-ce que quelqu'un saurait me dire la ligne de code à mettre sur le code présent ci-dessus ?

Merci de votre aide.

Namco

Bonjour Namco, bonjour le forum,

Un petit fichier exemple nous permettrait de tester une éventuelle solution...

Bonjour à toi TauThème

J'ai réussi à trouver la solution.

Je te remercie d'avoir pris le temps de jeter un coup d'oeil.

La solution à mon problème : J'ai juste converti avec la fonction Format au moment du calcul ^^

A+

Namco