pb d'incompatibilité de type sous Vba - Matériels & problèmes divers - Hardware
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
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???
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).
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