pb d'incompatibilité de type sous Vba

pb d'incompatibilité de type sous Vba - Matériels & problèmes divers - Hardware

Marsh Posté le 07-07-2011 à 10:50:50    

Bonjour à tous,  
J'ai réalisé une macro avec le peu de connaissances que j'ai de Vba concernant la somme de plusieurs valeurs de cellules, toutes espacées entre elles de 5 colonnes. La première valeur à prendre en compte est dans la cellule H6. La somme doit être la valeur de la cellule B6 et insérer des colonnes ne doit pas poser problème dans son calcul automatique. Mon souci est que le message "incompatibilité de type" s'affiche et que je ne sais pas ce qu'il faut faire. Voici donc la macro en question :
 
Private Sub CommandButton6_Click()
 Somme
End Sub
 
Sub somme()
 
Dim J as integer
Dim s as single
 
For J=8 to 10 000 Step 5
S = s + cells (6,J)
Next j
 
Cells(6,2).value = s
 
End Sub

Reply

Marsh Posté le 07-07-2011 à 10:50:50   

Reply

Marsh Posté le 07-07-2011 à 10:55:54    

A quelle ligne apparaît la fameuse "incompatibilité de type"?

 

Il y a des problèmes de cohérence majuscules/minuscules, c'est peut-être là que se situe le couac.

 

PS: mauvaise section, c'est supposé être en section programmation ça :o


Message édité par Gigathlon le 07-07-2011 à 10:56:33
Reply

Marsh Posté le 07-07-2011 à 11:06:12    

l'incohérence majuscules/minuscules est du au fait que j'ai du la réécrire sous Word. Mais sous Vba c'est corrigé automatiquement. Donc pas de pb de ce coté là.  
 
L'incompatibilité de type n'apparaît pas spécialement sur une ligne... mais d'autres m'ont fait remarqué que cela concernait "dim s as integer", ce que j'ai modifié immédiatement. J'ai tenté single et double, mais aucun des deux ne corrige le fameux message d'erreur.
 
Merci pour t'être attardé sur mon message...
 
PS : comment fait-on pour déplacer le message de section???
 

Reply

Marsh Posté le 07-07-2011 à 11:17:14    

Gros chiffres?
 
Il y aurait une multiplication, ça pourrait renvoyer ça, mais du moment que la somme ne dépasse pas 2 milliards et des brouettes ça devrait passer pour l'addition.
 
Vérifie si il n'y a pas de "long integer" en VBA (entiers 64bits).

Reply

Sujets relatifs:

Leave a Replay

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