Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

boutons

7 réponses
Avatar
Michel
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille
et soit tous alignés sur la vertical, c'est possible ?

Merci

M.

7 réponses

Avatar
isabelle
bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille
et soit tous alignés sur la vertical, c'est possible ?

Merci

M.




Avatar
Michel
isabelle a couché sur son écran :
bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille et
soit tous alignés sur la vertical, c'est possible ?

Merci

M.





Merci je regarde
Avatar
rthompson
Bonjour Isabelle

Au risque de te contredire (J'ose quand même, hein? :-)))))))

Je crois que le plus facile est de les sélectionner tous (tenir Shift
enfoncé)
Un click droit, choisir "Format Control"
Choisir une dimension
Et puis tant qu'ils sont sélectionnés
Sur la barre de dessin choisir alignement

Et voilà le travail

A bientôt

Rex



"isabelle" a écrit dans le message de news:

bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille et
soit tous alignés sur la vertical, c'est possible ?

Merci

M.






Avatar
Mgr T. Banni
bonjour le trio québéco-anglo-belge :-)

sauf que monsieur michel, il a dit, rex mon fils :
"Je cherche un moyen automatique"

Mgr T.B.

"rthompson" a écrit dans le message de
news: %23biu$
Bonjour Isabelle

Au risque de te contredire (J'ose quand même, hein? :-)))))))

Je crois que le plus facile est de les sélectionner tous (tenir Shift
enfoncé)
Un click droit, choisir "Format Control"
Choisir une dimension
Et puis tant qu'ils sont sélectionnés
Sur la barre de dessin choisir alignement

Et voilà le travail

A bientôt

Rex



"isabelle" a écrit dans le message de news:

bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille et
soit tous alignés sur la vertical, c'est possible ?

Merci

M.










Avatar
rthompson
ZUT !!!!!


Je ferais mieux soit de lire, soit de me taire

Dans ce cas ci, il ne me reste plus qu'à me confesser

Bénissez-moi, Monseigneur parce que j'ai pêché

Une belle truite arc-en-ciel que je vais me farcir en papillote

A plus tard et bonne appétit

Rex


"Mgr T. Banni" a écrit dans le message de news:

bonjour le trio québéco-anglo-belge :-)

sauf que monsieur michel, il a dit, rex mon fils :
"Je cherche un moyen automatique"

Mgr T.B.

"rthompson" a écrit dans le message de
news: %23biu$
Bonjour Isabelle

Au risque de te contredire (J'ose quand même, hein? :-)))))))

Je crois que le plus facile est de les sélectionner tous (tenir Shift
enfoncé)
Un click droit, choisir "Format Control"
Choisir une dimension
Et puis tant qu'ils sont sélectionnés
Sur la barre de dessin choisir alignement

Et voilà le travail

A bientôt

Rex



"isabelle" a écrit dans le message de news:

bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :
Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille
et soit tous alignés sur la vertical, c'est possible ?

Merci

M.













Avatar
isabelle
Mmmm sur un lit d'amandes au beurre c'est délicieux,
à quel heure le repas sera prêt ? ;-)
isabelle

rthompson a écrit :
ZUT !!!!!


Je ferais mieux soit de lire, soit de me taire

Dans ce cas ci, il ne me reste plus qu'à me confesser

Bénissez-moi, Monseigneur parce que j'ai pêché

Une belle truite arc-en-ciel que je vais me farcir en papillote

A plus tard et bonne appétit

Rex


"Mgr T. Banni" a écrit dans le message de news:


bonjour le trio québéco-anglo-belge :-)

sauf que monsieur michel, il a dit, rex mon fils :
"Je cherche un moyen automatique"

Mgr T.B.

"rthompson" a écrit dans le message de
news: %23biu$

Bonjour Isabelle

Au risque de te contredire (J'ose quand même, hein? :-)))))))

Je crois que le plus facile est de les sélectionner tous (tenir Shift
enfoncé)
Un click droit, choisir "Format Control"
Choisir une dimension
Et puis tant qu'ils sont sélectionnés
Sur la barre de dessin choisir alignement

Et voilà le travail

A bientôt

Rex



"isabelle" a écrit dans le message de news:


bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :

Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille
et soit tous alignés sur la vertical, c'est possible ?

Merci

M.

















Avatar
rthompson
Trop tard

La prochaine fois que je fais quelque chose de beau
Je t'enverrai des photos :-))))

Bonne nuit, enfin bonne soirée pour toi

Rex


"isabelle" a écrit dans le message de news:
%
Mmmm sur un lit d'amandes au beurre c'est délicieux,
à quel heure le repas sera prêt ? ;-)
isabelle

rthompson a écrit :
ZUT !!!!!


Je ferais mieux soit de lire, soit de me taire

Dans ce cas ci, il ne me reste plus qu'à me confesser

Bénissez-moi, Monseigneur parce que j'ai pêché

Une belle truite arc-en-ciel que je vais me farcir en papillote

A plus tard et bonne appétit

Rex


"Mgr T. Banni" a écrit dans le message de news:


bonjour le trio québéco-anglo-belge :-)

sauf que monsieur michel, il a dit, rex mon fils :
"Je cherche un moyen automatique"

Mgr T.B.

"rthompson" a écrit dans le message
de news: %23biu$

Bonjour Isabelle

Au risque de te contredire (J'ose quand même, hein? :-)))))))

Je crois que le plus facile est de les sélectionner tous (tenir Shift
enfoncé)
Un click droit, choisir "Format Control"
Choisir une dimension
Et puis tant qu'ils sont sélectionnés
Sur la barre de dessin choisir alignement

Et voilà le travail

A bientôt

Rex



"isabelle" a écrit dans le message de news:


bonjour Michel,

voici un exemple,

Sub Macro1()
For Each bt In ActiveSheet.OLEObjects
x = x + 50
With bt
.Left = 10
.Width = 80
.Height = 40
.Top = x
End With
Next
End Sub

isabelle

Michel a écrit :

Bonjour,
(Excel 2007)

Sur une feuille j'ai des boutons de controles

Je cherche un moyen automatique pour qu'ils aient tous la même taille
et soit tous alignés sur la vertical, c'est possible ?

Merci

M.