Quand en VBA on ajoute =E0 un document une zone de texte de=20
largeur d=E9termin=E9e, comment peut-on d=E9finir sa hauteur=20
pour =EAtre certain que l'enti=E8ret=E9 du texte soit visible.=20
Le texte est de longueur variable et provient d'une=20
variable elle-m=EAme aliment=E9e par une base Access.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Anacoluthe
Bonjour !
"Patrick Cambier" nous a écrit ...
Quand en VBA on ajoute à un document une zone de texte de largeur déterminée, comment peut-on définir sa hauteur pour être certain que l'entièreté du texte soit visible. Le texte est de longueur variable et provient d'une variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False maTextBox.Height = maTextBox.Height + 1 Loop
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
Bonjour !
"Patrick Cambier" nous a écrit ...
Quand en VBA on ajoute à un document une zone de texte de
largeur déterminée, comment peut-on définir sa hauteur
pour être certain que l'entièreté du texte soit visible.
Le texte est de longueur variable et provient d'une
variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False
maTextBox.Height = maTextBox.Height + 1
Loop
Anacoluthe
« Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. »
- Proverbe alsacien
Quand en VBA on ajoute à un document une zone de texte de largeur déterminée, comment peut-on définir sa hauteur pour être certain que l'entièreté du texte soit visible. Le texte est de longueur variable et provient d'une variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False maTextBox.Height = maTextBox.Height + 1 Loop
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
nuindacil
Bonjour anacoluthe,
On peut pas mettre un truc auto qui ajuste la forme à la taille du texte ? du genre: Selection.ShapeRange.TextFrame.AutoSize = True
nuindacil mvp word
Anacoluthe a écrit:
Bonjour !
"Patrick Cambier" nous a écrit ...
Quand en VBA on ajoute à un document une zone de texte de largeur déterminée, comment peut-on définir sa hauteur pour être certain que l'entièreté du texte soit visible. Le texte est de longueur variable et provient d'une variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False maTextBox.Height = maTextBox.Height + 1 Loop
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
Bonjour anacoluthe,
On peut pas mettre un truc auto qui ajuste la forme à la taille du texte
? du genre:
Selection.ShapeRange.TextFrame.AutoSize = True
nuindacil
mvp word
Anacoluthe a écrit:
Bonjour !
"Patrick Cambier" nous a écrit ...
Quand en VBA on ajoute à un document une zone de texte de
largeur déterminée, comment peut-on définir sa hauteur
pour être certain que l'entièreté du texte soit visible.
Le texte est de longueur variable et provient d'une
variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False
maTextBox.Height = maTextBox.Height + 1
Loop
Anacoluthe
« Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. »
- Proverbe alsacien
On peut pas mettre un truc auto qui ajuste la forme à la taille du texte ? du genre: Selection.ShapeRange.TextFrame.AutoSize = True
nuindacil mvp word
Anacoluthe a écrit:
Bonjour !
"Patrick Cambier" nous a écrit ...
Quand en VBA on ajoute à un document une zone de texte de largeur déterminée, comment peut-on définir sa hauteur pour être certain que l'entièreté du texte soit visible. Le texte est de longueur variable et provient d'une variable elle-même alimentée par une base Access.
Il faut tester la propriété Overflowing avec qqch comme :
Do Until maTextBox.TextFrame.Overflowing = False maTextBox.Height = maTextBox.Height + 1 Loop
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
Anacoluthe
Hello !
"nuindacil" nous a écrit ...
On peut pas mettre un truc auto qui ajuste la forme à la taille du texte ? du genre: Selection.ShapeRange.TextFrame.AutoSize = True
Evidemment, mais où avais-je la tête ??? ;-) ça marche aussi très bien a posteriori sur une textbox déjà surbookée, je n'y pensais pas ! C'est plus simple, voui.
Déjà que tu me bats sur les proverbes africains, alors maintenant en vba ... Il est urgent que je me recycle ! ... en xml peut-être ? ... :-D
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
Hello !
"nuindacil" nous a écrit ...
On peut pas mettre un truc auto qui ajuste la forme
à la taille du texte ? du genre:
Selection.ShapeRange.TextFrame.AutoSize = True
Evidemment, mais où avais-je la tête ??? ;-)
ça marche aussi très bien a posteriori sur une textbox
déjà surbookée, je n'y pensais pas ! C'est plus simple, voui.
Déjà que tu me bats sur les proverbes africains,
alors maintenant en vba ... Il est urgent que je me recycle !
... en xml peut-être ? ... :-D
Anacoluthe
« Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. »
- Proverbe alsacien
On peut pas mettre un truc auto qui ajuste la forme à la taille du texte ? du genre: Selection.ShapeRange.TextFrame.AutoSize = True
Evidemment, mais où avais-je la tête ??? ;-) ça marche aussi très bien a posteriori sur une textbox déjà surbookée, je n'y pensais pas ! C'est plus simple, voui.
Déjà que tu me bats sur les proverbes africains, alors maintenant en vba ... Il est urgent que je me recycle ! ... en xml peut-être ? ... :-D
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
nuindacil
Anacoluthe a écrit:
Hello !
Evidemment, mais où avais-je la tête ??? ;-)
Ouf, j'ai eu peur de dire une bêtise !!! :-)))
"Les hommes ont toujours raison, mais les femmes n'ont jamais tort." (Proverbe Alsacien)
ça marche aussi très bien a posteriori sur une textbox déjà surbookée, je n'y pensais pas ! C'est plus simple, voui.
Déjà que tu me bats sur les proverbes africains, alors maintenant en vba ... Il est urgent que je me recycle ! ... en xml peut-être ? ... :-D
Anacoluthe « Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. » - Proverbe alsacien
Anacoluthe a écrit:
Hello !
Evidemment, mais où avais-je la tête ??? ;-)
Ouf, j'ai eu peur de dire une bêtise !!! :-)))
m@rina
"Les hommes ont toujours raison, mais les femmes n'ont jamais tort."
(Proverbe Alsacien)
ça marche aussi très bien a posteriori sur une textbox
déjà surbookée, je n'y pensais pas ! C'est plus simple, voui.
Déjà que tu me bats sur les proverbes africains,
alors maintenant en vba ... Il est urgent que je me recycle !
... en xml peut-être ? ... :-D
Anacoluthe
« Ce n'est que quand l'arbre est tombé qu'on peut voir sa hauteur. »
- Proverbe alsacien
