Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

  • Initiateur de la discussion Initiateur de la discussion Primatexcel
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

P

Primatexcel

Guest
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.
 

Pièces jointes

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

Salut Primatexcel, le Forum

Pas très excellien mais essaye un
Code:
On Error Resume Next
avant
Code:
For k = 1 To .ListItems.Count
du
Code:
Private Sub TTotal()

Bonne Journée
 

Pièces jointes

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

Re,

Sans le On Error Resume Next

essaye cela

Code:
  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
 

Pièces jointes

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.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
3
Affichages
313
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…