TRAIT SUR USF VBA

econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 - 12 janv. 2008 à 09:08
dedederidiny Messages postés 42 Date d'inscription dimanche 1 février 2004 Statut Membre Dernière intervention 15 mai 2011 - 13 janv. 2008 à 15:01

Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/45393-trait-sur-usf-vba

dedederidiny Messages postés 42 Date d'inscription dimanche 1 février 2004 Statut Membre Dernière intervention 15 mai 2011
13 janv. 2008 à 15:01

Re bonjour et Merci pour vos commentaires.
Je crois que le code d'origine a ete trove sur comment ca marche
mais helas je ne connais plus son auteur.
Vous savez comment on fait, suite a un pb, on cherche, on telecharge et apres on teste.
Si ca marche on est content mais helas on ne sait plus d'ou vient la source.

Mille merci a cet auteur inconnu.

Pour dessiner d'un label a un USF ou a un autre objet je pense qu'il suffit de memoriser les coordonnees avant de tracer. Ce ne doit pas etre trop difficile.

A +

us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
13 janv. 2008 à 11:02

... pour effacer le trait sur les contrôles, seulement...

us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
13 janv. 2008 à 11:00

Oui. Tout comme vouloir dessiner avec LineTo en direct dans un contrôle précis sans déborder ou plutôt ne pas afficher les débordements, pour que le dessin reste dans une Image, par exemple... comme pour la vraie instruction en VB6...

Bien que à la réflexion pour ta remarque, un Refresh de l'ensemble des contrôles peut être une solution... c'est qu'une simple hypothèse...

Amicalement,
Us.

econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 24
13 janv. 2008 à 10:42

Bien sûr qu'avec UserForm_MouseDown, on ne détectera pas le clic sur le label, mais la véritable instruction Line se moque bien de savoir quel objet se trouve sur l'une de ses terminaisons, elle se dessine de X1,Y1 vers X2,Y2, quels que soient les choix de ces points.

Par contre, gérer ce point, çà complexifie pas mal le code ...

us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
13 janv. 2008 à 10:26

Bonjour,

Euh... normal la mémorisation est faites dans UserForm_MouseDown. Ce dernier ne se déclenche pas sur les autres objets. Mais je ne crois pas que l'intérêt soit là, mais plutôt contrer la limitation que Microsoft à mis pour les traits en VBA (pour utiliser que les feuilles graphiques)... et a oublié au passage de retirer la reconnaissance dans l'IDE de l'instruction LINE pour VB6... m'enfin...

Il serait bien aussi de retrouver l'auteur original...

Amicalement,
Us.

econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 24
12 janv. 2008 à 09:08

Salut,

Un seul regret, la détection du clic sur autre chose que le UserForm ne passe pas.
Un premier clic sur le formulaire, un deuxième clic sur le label ... et pas de trait. Ce deuxième clic n'est pas mémorisé.

Discussions similaires

Comment fonctionne la fonction FormulaR1C1

fonction modulo en VBA

Dernière cellule non vide d'une colonne

A quoi sert la fonction Set ?

Modulo pour chiffres à virgule

Votre réponse

Discussions similaires