Recherche syntaxe pour simplifier le code de mon formulaire ?

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

Entraide Applications Microsoft Office Excel Recherche syntaxe pour simplifier le code de mon formulaire ?

2 réponses

Thierry

04/10/2009 à 22:02

Bonsoir,
pour positionner des Frames ds un formulaire, j'utilise le code suivant:

With Ecran1
.Frame1.Left=276
.Frame2.Left=276
.Frame3.Left=276
.Frame4.Left=276
etc ...
End With

Comment simplifier ce code?
Du style..

With Ecran1
For f=1 to 12
.Frame(f)=276
Next f
End With

Cordialement,
Thierry

2 réponses

Thierry

04/10/2009 à 22:41

Ok, j'ai trouver,

With Ecran1

For f=1 to 12
.Controls("Frame" & f ).Left'6
Next f
End With

Cordialement,
Thierry

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

Bonsoir,
pour positionner des Frames ds un formulaire, j'utilise le code suivant:

With Ecran1
.Frame1.Left'6
.Frame2.Left'6
.Frame3.Left'6
.Frame4.Left'6
etc ...
End With

Comment simplifier ce code?
Du style..

With Ecran1
For f=1 to 12
.Frame(f)'6
Next f
End With

Cordialement,
Thierry

Philippe.R

05/10/2009 à 06:34

Merci du retour
Ca peut servir
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/web/mpfe
News://news.microsoft.com/microsoft.public.fr.excel
"Thierry" a écrit dans le message de
news:

Ok, j'ai trouver,

With Ecran1
For f=1 to 12
.Controls("Frame" & f ).Left'6
Next f
End With

Cordialement,
Thierry

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

Bonsoir,
pour positionner des Frames ds un formulaire, j'utilise le code suivant:

With Ecran1
.Frame1.Left'6
.Frame2.Left'6
.Frame3.Left'6
.Frame4.Left'6
etc ...
End With

Comment simplifier ce code?
Du style..

With Ecran1
For f=1 to 12
.Frame(f)'6
Next f
End With

Cordialement,
Thierry

Recherche syntaxe pour simplifier le code de mon formulaire ?

2 réponses

Veuillez sélectionner un problème