Comment boucler sur des commandbuttons et leur donner les m=EAmes=20
dimensions et les m=EAmes couleurs , par groupe, pour les commandbutton d=
e=20
la feuille active
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
JB
Bonsoir,
For i = 1 To 10 ActiveSheet.OLEObjects("commandbutton" & i).Width = 100 ActiveSheet.OLEObjects("commandbutton" & i).Height = 20 Next i
JB
On 5 sep, 19:08, PST wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes dimensions et les mêmes couleurs , par groupe, pour les commandbutton de la feuille active
ex;
vert commandbutton1 commandbutton2
vert commandbutton3 commandbutton4
etc...
merci
Bonsoir,
For i = 1 To 10
ActiveSheet.OLEObjects("commandbutton" & i).Width = 100
ActiveSheet.OLEObjects("commandbutton" & i).Height = 20
Next i
JB
On 5 sep, 19:08, PST <pgjigno...@wanadoo.fr> wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes
dimensions et les mêmes couleurs , par groupe, pour les commandbutton de
la feuille active
For i = 1 To 10 ActiveSheet.OLEObjects("commandbutton" & i).Width = 100 ActiveSheet.OLEObjects("commandbutton" & i).Height = 20 Next i
JB
On 5 sep, 19:08, PST wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes dimensions et les mêmes couleurs , par groupe, pour les commandbutton de la feuille active
ex;
vert commandbutton1 commandbutton2
vert commandbutton3 commandbutton4
etc...
merci
PST
Impecable
merci
Bonsoir,
For i = 1 To 10 ActiveSheet.OLEObjects("commandbutton" & i).Width = 100 ActiveSheet.OLEObjects("commandbutton" & i).Height = 20 Next i
JB
On 5 sep, 19:08, PST wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes dimensions et les mêmes couleurs , par groupe, pour les commandbutto n de la feuille active
ex;
vert commandbutton1 commandbutton2
vert commandbutton3 commandbutton4
etc...
merci
Impecable
merci
Bonsoir,
For i = 1 To 10
ActiveSheet.OLEObjects("commandbutton" & i).Width = 100
ActiveSheet.OLEObjects("commandbutton" & i).Height = 20
Next i
JB
On 5 sep, 19:08, PST <pgjigno...@wanadoo.fr> wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes
dimensions et les mêmes couleurs , par groupe, pour les commandbutto n de
la feuille active
For i = 1 To 10 ActiveSheet.OLEObjects("commandbutton" & i).Width = 100 ActiveSheet.OLEObjects("commandbutton" & i).Height = 20 Next i
JB
On 5 sep, 19:08, PST wrote:
Bonjour
Comment boucler sur des commandbuttons et leur donner les mêmes dimensions et les mêmes couleurs , par groupe, pour les commandbutto n de la feuille active