Nbre de groupe dans la liste

[maval]

Bonjour

J'ai sur une feuille excel dans la colonne "B" une liste de environ 400 nnom de groupe allant du "groupe1 au groupe10".
J'ai un formulaire avec 10 labels et je cherche un code VBA pour renseigner les labels du nombre de groupe1 Groupe2 ect...

Je vous remercie d'avance

Cordialement

Max

 

[homepyrof53]

Re : Nbre de groupe dans la liste

Bonjour,

Voilà une solution

Cordielament

 

[job75]

Re : Nbre de groupe dans la liste

Bonjour,

Si les noms des Labels, comme sur le fichier du post #1, ont des numéros dans le bon ordre :

Private Sub UserForm_Initialize()
Dim i As Byte
For i = 1 To 10
  Controls("Label" & i + 10) = Application.CountIf([B:B], "Groupe" & i)
Next
End Sub

A+

 

[maval]

Re : Nbre de groupe dans la liste

Bonsoir Job

Je te remercie j'ai bien les labels dans le bon ordre de 1 à 10 mais j'ai un message d'erreur "Objet Spécifié introuvable"

Bonne soirée

@+

Max

 

[maval]

Re : Nbre de groupe dans la liste

Bonsoir homepyrof53

Ton fichier fonctionne nickel je te remercie et te souhaite une bonne soirée

@+

Max

 

[job75]

Re : Nbre de groupe dans la liste

Re,

j'ai un message d'erreur "Objet Spécifié introuvable"

Ma macro va bien avec les 10 Labels s'ils sont nommés Label11 Label12 Label13....Label20.

Comme sur le fichier du post #1, qui fonctionne donc très bien chez moi.

Mais pas sur le fichier de homepyrof53 puisque notre ami a modifié les noms des Labels...

Edit : je joins quand même le fichier au cas où...

A+

 

[maval]

Re : Nbre de groupe dans la liste

Re,

Regarde si chez toi sa marche ?

@+

Max

 

[job75]

Re : Nbre de groupe dans la liste

Re,

Regarde si chez toi sa marche ?

Il ne marche pas non plus chez moi et pour une raison simple : les 10 Labels sont nommés Label1 Label2... Label10.

Et pas Label11 Label12... Label20 comme le fichier du post #1 (que j'ai ajouté à mon post #6).

Si vous changez les noms en cours de route ne soyez pas surpris du résultat.

A+

 

[maval]

Re : Nbre de groupe dans la liste

Re

Exact Job toute mes excuses, sa fonctionne nickel rien a dire

Bonne soirée et merci encore

@+

Max

 

[homepyrof53]

Re : Nbre de groupe dans la liste

Bonjour,

Avec retard, il est vrai que j'ai changé le nom des labels, par expérience, il est plus facile de reprendre ultérieurement la macro quand on a une bonne organisation.

Il est plus facile de se dire Groupe1=label1 plutôt que Groupe1=label11, c'est plus facile à gérer.
Bonne journée

 

[maval]

Re : Nbre de groupe dans la liste

Bonjour homepyrof53

Pour se qui me concerne j'aime bien renommer aussi bien les labels que les textbox, commandButton ect...

C'est plus simple a se retrouver, cela est mon simple point de vue.

Je te remercie encore et te souhaite une bon WE

@+

Max

 

[job75]

Re : Nbre de groupe dans la liste

Bonjour à tous,

Il est plus facile de se dire Groupe1=label1 plutôt que Groupe1=label11, c'est plus facile à gérer.

On peut faire ce que l'on veut bien évidemment, pourvu que ce soit dans l'ordre !

Si les Labels se nomment Label1 Label2... Label10 enlever le + 10 dans ma macro du post #3...

A+