NISANDSYSTEMS
Messages postés146Date d'inscriptionvendredi 1 novembre 2002StatutMembreDernière intervention13 décembre 2014 27 juil. 2010 à 15:56
Bonjour,
Que de code pour un résultat médiocre!
Créer des fonctions de dessin dans un module non dans la feuille.
Comme dit Renfield, chaque variable doit etre déclarée explicitement.
Dim Ax1, Ay1, Bx1, By1, Cx1, Cy1 As Single
devient
! = as single
& = as long
% =as integer
# = as double
Dim Ax1!, Ay1!, Bx1!, By1!, Cx1!, Cy1!
Bon courage.
@+
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 27 juil. 2010 à 14:14
Dim Ax1, Ay1, Bx1, By1, Cx1, Cy1 As Single
dans ce genre de codes, seul CY1 est un Single
les autres seront des Variant
27 juil. 2010 à 15:56
Que de code pour un résultat médiocre!
Créer des fonctions de dessin dans un module non dans la feuille.
Comme dit Renfield, chaque variable doit etre déclarée explicitement.
Dim Ax1, Ay1, Bx1, By1, Cx1, Cy1 As Single
devient
! = as single
& = as long
% =as integer
# = as double
Dim Ax1!, Ay1!, Bx1!, By1!, Cx1!, Cy1!
Bon courage.
@+
27 juil. 2010 à 14:14
dans ce genre de codes, seul CY1 est un Single
les autres seront des Variant