Microsoft 365 réduire l'espace entre les lignes

[ricky1977]

Bonjour,
je suis novice totalement avec Excel, mais j'ai récupéré un fichier que j'essai d'adapter a mes besoins.
Ici je voudrais simplement réduire l'espace qu'il y a entre les lignes, souligné en rouge sur l'image
il y a la ligne filed - value mais l'espace entre 2 field est trop grand, si quelqu'un a une idée de comment réduire cette espace ?
merci d'avance

 

[fanfan38]

Bonjour
Je n'ai jamais essayé de mettre des macros sur une image...
De plus tu mets les propriétés de la page et non de la liste
est ce un combobox, un listbox ou un listview ?
Bref, sans fichier...
A+ François

 

[ricky1977]

Bonjour François,
Merci de le préciser car étant novice : ici j'ai récupéré un fichier que j'essai d'améliorer, mais c'est du bricolage
Je ne saurais pas répondre ( je pense combobox )
j'envoi le fichier
merci beaucoup
richard
Edit ( je met un copié collé du rendu, j'aimerai que ce soit moins espacé entre les textes, mais c'est la ou le bricolage ne fonctionne plus )

 

[fanfan38]

C'est quoi cette usine à gaz...
201 labels pour afficher les données...
il faut déplacer le 1er pour voir les 200 autres cachés dessous d'une hauteur de 30 d'où l'espace
Que veux-tu faire exactement ?

A+ François

 

[ricky1977]

merci beaucoup pour la réponse .
J'avoue que j'ai juste récupéré le template, je n'ai aucune idée du comment c'est empilé.
Merci d'avoir pris le temps de répondre
c'est a peut prêt ce que je voulais faire.
Sans vouloir abuser, est ce possible de ne masquer les lignes grises ?

 

[ricky1977]

en revanche ça ne masque plus le fichier excel derriere ? comment faire pour n'afficher que la "console" (si ça s'appelle comme ça ? )

ça a l'air de bouffer les lignes également, je ne sais pas si c'est possible de résoudre cela aussi ?

 

[fanfan38]

Je l'ai fait pour les 15 premiers

consola.gf_14.Height = Range(pos_x1 & pos_y & "14").Height
consola.gv_14.Height = Range(pos_x2 & pos_y & "14").Height

à mettre au début des commandes par label ... dans le module init_gerneral
les macros first_part et second_part...

A+ François

 

[ricky1977]

Je l'ai fait pour les 15 premiers

consola.gf_14.Height = Range(pos_x1 & pos_y & "14").Height
consola.gv_14.Height = Range(pos_x2 & pos_y & "14").Height

à mettre au début des commandes par label ... dans le module init_gerneral
les macros first_part et second_part...

A+ François

Désolé de la réponse tardive.
Merci beaucoup, je pense que je vais m'en sortir
Bonne soirée

 

[ricky1977]

finalement je pense que je n'ai pas tout a fait compris
comment est ce que je peux copier ceci dans les macros first_part et second_part ?
je séche

 

[fanfan38]

Bonjour

[COLOR=rgb(184, 49, 47)][B]consola.gf_13.Height = Range(pos_x1 & pos_y & "13").Height[/B][/COLOR]
consola.gf_13.Caption = Range(pos_x1 & pos_y & "13").Text
consola.gf_13.Font.Size = Range(pos_x1 & pos_y & "13").Font.Size
consola.gf_13.ForeColor = Range(pos_x1 & pos_y & "13").Font.Color
[COLOR=rgb(184, 49, 47)][B]consola.gv_13.Height = Range(pos_x2 & pos_y & "13").Height[/B][/COLOR]
consola.gf_13.BackColor = Range(pos_x1 & pos_y & "13").Interior.Color
consola.gv_13.Caption = Range(pos_x2 & pos_y & "13").Text
consola.gv_13.Font.Size = Range(pos_x2 & pos_y & "13").Font.Size
consola.gv_13.ForeColor = Range(pos_x2 & pos_y & "13").Font.Color
consola.gv_13.BackColor = Range(pos_x2 & pos_y & "13").Interior.Color
[COLOR=rgb(184, 49, 47)][B]consola.gf_14.Height = Range(pos_x1 & pos_y & "14").Height[/B][/COLOR]
consola.gf_14.Caption = Range(pos_x1 & pos_y & "14").Text
consola.gf_14.Font.Size = Range(pos_x1 & pos_y & "14").Font.Size
consola.gf_14.ForeColor = Range(pos_x1 & pos_y & "14").Font.Color
consola.gf_14.BackColor = Range(pos_x1 & pos_y & "14").Interior.Color
[COLOR=rgb(184, 49, 47)][B]consola.gv_14.Height = Range(pos_x2 & pos_y & "14").Height[/B][/COLOR]
consola.gv_14.Caption = Range(pos_x2 & pos_y & "14").Text
consola.gv_14.Font.Size = Range(pos_x2 & pos_y & "14").Font.Size
consola.gv_14.ForeColor = Range(pos_x2 & pos_y & "14").Font.Color
consola.gv_14.BackColor = Range(pos_x2 & pos_y & "14").Interior.Color
[COLOR=rgb(184, 49, 47)][B]consola.gf_15.Height = Range(pos_x1 & pos_y & "15").Height[/B][/COLOR]
consola.gf_15.Caption = Range(pos_x1 & pos_y & "15").Text
consola.gf_15.Font.Size = Range(pos_x1 & pos_y & "15").Font.Size
consola.gf_15.ForeColor = Range(pos_x1 & pos_y & "15").Font.Color
consola.gf_15.BackColor = Range(pos_x1 & pos_y & "15").Interior.Color
[COLOR=rgb(184, 49, 47)][B]consola.gv_15.Height = Range(pos_x2 & pos_y & "15").Height[/B][/COLOR]
consola.gv_15.Caption = Range(pos_x2 & pos_y & "15").Text
consola.gv_15.Font.Size = Range(pos_x2 & pos_y & "15").Font.Size
consola.gv_15.ForeColor = Range(pos_x2 & pos_y & "15").Font.Color
consola.gv_15.BackColor = Range(pos_x2 & pos_y & "15").Interior.Color

Etc....
A+ François

 

[ricky1977]

Ça marche avec la première formule
Il manquait certains, et d'autres étaient en doublons. Maintenant ça fonctionne.
Merci encore
J'ai plus que 70 a taper looool.
Il y aurait un raccourci ?

 

[fanfan38]

Et non... sinon je l'aurai fait... lol
Bon courage
A+ François

 

[ricky1977]

Et non... sinon je l'aurai fait... lol
Bon courage
A+ François

c'est ce que je me disais
alors c'est parti
merci encore

 

[ricky1977]

j'ai un autre soucis, maintenant entre la ligne 34-35, ça ne fonctionne pas et je ne comprend pas pourquoi?
je ne pense pas avoir fait d'erreur ( j'ai rentré les 50 premiers )

 

[fanfan38]

Erreur Ligne 340 (c'est marqué en haut sous outils)
consola.gf_33.Height = Range(pos_x1 & pos_y & "33").Height
au lieu de
consola.gf_34.Height = Range(pos_x1 & pos_y & "34").Height
+ GF35 qui était un poil trop bas...
A+ François