Passage d'un paramètre ListBox à une sous-procédure

Résolu
annethom Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
 annethom -
Bonjour,

Sous Excel2000 en VBA, je n'arrive pas à passer comme paramètre une zone ListBox.
Le message 'Incompatibilité de type' apparait !


Public Sub tentative()
remplit
listing Listeenvoi
End Sub
_____________________________
Public Sub listing(ByVal passage As ListBox)
Dim i As Byte

For i = 0 To passage.ListCount - 1
Debug.Print passage.List(i)
Next
End Sub
________________________________
Public Sub remplit()
Dim i As Byte

For i = 1 To 4
Listeenvoi.AddItem i
Next
End Sub

grand merci pour l'aide

annethom
A voir également:

6 réponses

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

Ta question n'a rien de limpide !
Comme la boule de cristal ne fonctionne pas en informatique tu devrais nous expliquer.
0
annethom Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour

Je précise ma requête.
J'ai deux zones de liste différentes comportant des noms.
Je dois leur envoyer du courrier. Pour cela, j'édite des étiquettes. Les deux listes qui n'ont aucun lien entre elles utilisent cependant le même format d'étiquettes.

Est-ce un peu plus clair
cordialement

annethom
0
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

Public Sub listing(ByVal passage As ListBox)

Tu ne peux pas passer ta ListBox en paramètre ByVal, puis l'utiliser en tant que référence car tu ne peux avoir que l'unique valeur de la liste ainsi.
0
annethom
 
Rerebonjour pour cette journée !

Le paramètre passé à la sous-procédure qu'il soit 'ByVal ou ByRef' n'est pas accepté par VBA.

Ce qui me chagrine, c'est que à l'écriture de la sous-procédure(ici la variable passage dans Listing, le type Listbox nous est proposé !


tant pis

merci tout de même
annethom
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
Bonjour,

Avec ton code, légèrement modifié, je remplit la seconde liste avec la première :

https://www.cjoint.com/?DBbvGpuMagR
0
annethom
 
Bonjour et merci GBinforme

Le passage de la variable déclaré en 'control' fonctionne parfaitement !!!!

Super !

grand merci

annethom
0