IMPRIMER UNE MSFLEXGRID
cs_clementpat
Messages postés
406
Date d'inscription
lundi 2 décembre 2002
Statut
Membre
Dernière intervention
25 janvier 2014
-
19 juin 2005 à 13:01
celemida Messages postés 1 Date d'inscription mercredi 29 mars 2006 Statut Membre Dernière intervention 3 mai 2006 - 3 mai 2006 à 16:14
celemida Messages postés 1 Date d'inscription mercredi 29 mars 2006 Statut Membre Dernière intervention 3 mai 2006 - 3 mai 2006 à 16:14
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/32145-imprimer-une-msflexgrid
https://codes-sources.commentcamarche.net/source/32145-imprimer-une-msflexgrid
3 mai 2006 à 16:14
Tu pourras supprimer la ligne 42 et remplacer Numpage par Printer.Page sur les lignes 40 et 47.
Célestin.
27 juin 2005 à 08:42
Je n'ai jamais écrit qu'il fallait supprimer les currentX mais certains currentY.
le ; conserve la même ligne et vous réglez la tabulation avec currentX.
D'autre part il est facilement de déterminer le nombre de colonnes et leut largeur avec :
s$ = "col0|col1|colonne2|col3|col4|col5|col6"
Me.Grile.FormatString = s$
Ce qui donne 6 colonnes.
Vous verrez que la colonne 2 aura une largeur différente réglée sur le texte auquel on peut ajouter des espaces pour élargir encore la colonne.
Ou s$ peut être créé en saisie dans un textbox en fonction des besoins
L'impression et la tabulation peuvent alors être gérées par une boucle en fonction du nombre de colonnes et de leur largeur réelle.
21 juin 2005 à 11:56
si je mets currentx=un nombre, cela permet de garder la tabulation de la colonne ce que ne permet pas le ;(je crois). De toute façon, nous avons chacun nos habitudes de programmation(bonnes ou mauvaises), le but de ces publications étant de donner un piste pour résoudre un pb. La mienne et de lire chaque cellule d'une grille et d'en programmer le mise en page.
Cordialment à tous...Joël Vuillaume
20 juin 2005 à 16:44
effectivement, j'ai supprimé mes lignes pour n'en garder qu'une dizaine et je n'ai gardé que 5 colonnes et là, ça fonctionne:-)
@+
Guy FALESSE
20 juin 2005 à 16:15
Sinon fait un test avec une grille de 5 colonnes et une dizaines de rangs
20 juin 2005 à 16:10
20 juin 2005 à 15:45
J'ai fait tut ce que tu as proposé et toujours cette même page vierge :-(
Guy FALESSE
20 juin 2005 à 15:25
Au bout des lignes 28, 29, 30, 31 mettez un ;
Vous pourrez supprimer aux lignes 29, 30, 31 et 32 Printer.CurrentY = Y puiqu'on reste sur la même ligne.
De même ligne 36 otez Printer.CurrentY Y et mettez Printer.CurrentY Y avant la boucle entre la ligne 34 et 35
20 juin 2005 à 15:14
Vous pouvez également supprimer tous Me.
20 juin 2005 à 06:33
J'ai voulu tester cette fonction, résultat, une page vierge avec dans le fond à gauche:"Fin/Page 1
Désolé, i y avait des données pour plusieurs pages.
Guy FALESSE
19 juin 2005 à 13:01