Somme des colonnes listview ("erreur d'exécution 13" incompatibilité de types)

[Primatexcel]

Bonjour le forum,

ma question est simple. j'ai un petit soucis d’exécution de macro lorsque j'utilise mon programme ("erreur d’exécution 13" incompatibilité de types).

le résumé est sur la feuille excel de la pièce jointe.

merci de votre attention.

 

[Dull]

Re : Somme des colonnes listview ("erreur d'exécution 13" incompatibilité de types)

Salut Primatexcel, le Forum

Pas très excellien mais essaye un

On Error Resume Next

avant

For k = 1 To .ListItems.Count

du

Private Sub TTotal()

Bonne Journée

 

[Dull]

Re : Somme des colonnes listview ("erreur d'exécution 13" incompatibilité de types)

Re,

Sans le On Error Resume Next

essaye cela

  For k = 1 To .ListItems.Count
      Ttl = Ttl + IIf(.ListItems(k).ListSubItems(1).Text = "", 0, .ListItems(k).ListSubItems(1).Text)
      Ttl1 = Ttl1 + IIf(.ListItems(k).ListSubItems(2).Text = "", 0, .ListItems(k).ListSubItems(2).Text)

a tester

Bonne Journée

 

[Primatexcel]

Re : Somme des colonnes listview ("erreur d'exécution 13" incompatibilité de types)

Salut Dull,

je ne dirais qu'une chose "action --> réaction".

Merci de ta réponse cela marche exactement comme je le souhaitais.

Tu es un chef.

Une bonne journée à toi aussi et au forum.

A plus.