Erreur d'execution 13

Erreur d'execution 13 - VB/VBA/VBS - Programmation

Marsh Posté le 14-10-2008 à 11:19:13    

Bonjour,  
En fait j'ai l'erreur d'execution 13 " incompatibilité de type " lorsque j'essaie d'executer mon code.
 
La ligne d'où provient le problème est la suivante : Range("F30:M30" ) = (Range("F3:M3" ) / Range("F1:F1" )) * 100
 
Et pourtant toutes les cellules contiennent des nombres.
 
Merci d'avance.

Reply

Marsh Posté le 14-10-2008 à 11:19:13   

Reply

Marsh Posté le 14-10-2008 à 11:28:45    

Tu devrais plutôt parcourir chaque cellule dans une boucle et faire la division sur le contenu de la cellule par sur le range si je me trompe pas...


---------------
Instagram - Mon PVT en Australie.
Reply

Marsh Posté le 14-10-2008 à 13:20:51    

Essayes de remplacer "Range("F30:M30" ) = (Range("F3:M3" ) / Range("F1:F1" )) * 100" par

Code :
  1. for i = 6 to 13
  2. cells(30, i) = ( cells(30, i) / cells(1,6) ) * 100
  3. next i


si cela te rend encore une erreur, c'est que tu as un probleme dans les valeurs contenues dans tes cellules...
 
Cordialement.
 
EDIT : pfiou orthographe (Non, verifiez pas scrupuleusement, y'en a encore :d )


Message édité par Moonschild le 14-10-2008 à 13:22:03

---------------
Si Le Travail C'est La Santé, Donnez Le Mien A Quelqu'un De Malade
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed