Agrandir cellules flexgrid

Question

Bonsoir


J'ai 25 lignes et 8 colonnes je voudrais agrandir tous les cellules je vous demande d'aide s'il vous plait merci d'avance de tous aide que vous pouvez faire.

cs_DARKSIDIOUS · Answer

Utilise les propriétés RowHeight et ColWidth, elle sont faîtes pour cà.

Philppe2007 · Answer

Merci de d'avance de votre réponse je vous demande comment utiliser ces propriétés Rowheight et ColWidth j'ai essayé d'utiliser ces propriétés mais ça n'a pas marché en faisant   :
Private Sub flexgrid_Click()
flexgrid.RowHeight = 200
flexgrid.ColWidth =200  
end sub       
je vous demande de m'expliquer la procédure à suivre et je veux le faire pour une impression   merci d'avance.

cs_lermite222 · Answer

Bonjour,


salut DARKSIDIOUS, les mots clés que tu donne sont pour le VBA, en flexgrid ce serrait plutôt
flexgrid .ColWidth(Numéro colonne)
flexgrid .RowHeight(Numéro ligne)
il y a aussi
FX.ColAlignment(alignement) , en MSHflexgrid de 0 à 9


A+


louis

cs_lermite222 · Answer

correction,


flexgrid .ColWidth(Numéro colonne)= largeur
flexgrid .RowHeight(Numéro ligne)=hauteur

Slyders · Answer

Je crois que pour imprimer il ya une fonctino genre

le_nom_de_ton_tableau.printform

Philppe2007 · Answer

Merci bien j'ai un probléme pour utiliser:
 FX.ColAlignment(alignement) , en MSHflexgrid de 0 à 9
parce que j'ai 25 lignes et 8 colonnes pour faire 1 à 1 ces long je veux utiliser ce boucle pour définir tous les lignes à la fois mais les autres marches trés bien .
merci d'avance

cs_lermite222 · Answer

Bonsoir,


un petit exemple...


dim i as integer


for i=flexgrid.fixedcols to  8
   flexgrid .ColWidth(i)=largeurColonne
   flexgrid .ColAlignment(i)=4 'alignement Centre/centre.
next i
'FixedCols= nombre de colonne(s) en titre

'for i = flexgrid.fixedrows to   Range("A65536").End(xlUp).Row  'Va jusqu'a la dernière ligne initialisée, dans ton cas 25, mais si tu ajoute des lignes celà se ferra automatiquement.

for i = flexgrid.fixedrows to   Range("A65536").End(xlUp).Row  
   flexgrid .RowHeight(i) = hauteurLigne
next i
Mais si toute les lignes on la même hauteur et toute les colonnes on la même largeur, tu peu définit les hauteurs et largeurs par défaut dans les options de la feuille sans passé par VBA.
Répondre à Sliders : PrintForm imprime toute la feuille y compris les encadrements, les contrôles tel que bouton etc.. et la barre de titre de la forme. 
Quand à imprimer la grille c'est Beaucoup plus compliqué, il faut faire une fonction et je doit dire que j'ai galèré pour la faire et que ce n'est pas encore au point.
Mais ont ne sait jamais, met un nouveau topic pour l'impression flexgrid




A+



louis

Philppe2007 · Answer

Bonsoir 

Merci d'avance de votre aide mais quand je lance il me dit:
 méthode range de l'objet global à échoué.
et
Pour flexgrid.ColAlignment(i) = 2 'alignement Centre/centre.
numéro de colonne non valide pour l'alignement.je ne sais pas c'est quel numéro de colonne j'ai essayé les autres mais j'ai la méme réponse. 

Merci d'avance

Agrandir cellules flexgrid

8 réponses

Votre réponse

Discussions similaires