Discussion :

[maitrebanjo]

Bonjour a tous.

Je dois créer un fichier contenant une liste box, qui me permet de choisir plusieurs éléments dans la liste. Etant novice++ en VBA, j'ai demandé de l'aide a un ami, qui m'a aidé à créer ma listebox.
Sauf que cette fameuse listebox m’empêche de faire un copier coller et on ne trouve pas pourquoi (j'ai l'impression que des que je clique une fois ça me compte comme un double clic)?

J'en appel donc a votre aide et à votre incommensurable talent!

Je vous mets en pièce jointe mon fichier. Tout ce passe en feuil2 et la listbox est en C50

Merci par avance!

[Gado2600]

Bonjour,

Je ne sais pas si d'autres ont essayé mais je n'ai absolument pas compris ton problème.
Ta liste fonctionne bien et tu peux copier les données que tu affiches en C50.

Quel est le problème ???

Cordialement,

[joe.levrai]

bonjour,

je ne peux même pas dire si j'ai compris ou pas ...

on a des modules en option explicit avec des variables pas déclarées ... très pratique quand ça affecte des Evènements Selection_Change, histoire d'avoir des erreurs à chaque clic

j'enlève Option Explicit ok .... mais du coup je ne sais même pas à quoi doit correspondre la variable

Autre chose

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ch2 = [Séparateur] & ch & [Séparateur]
For i = 0 To LbxVille.ListCount - 1
    If InStr(ch2, [Séparateur] & LbxVille.List(i) & [Séparateur]) > 0 Then

c'est quoi Séparateur ??? pourquoi il est encadré ? Il est déclaré en String mais aucune valeur ne lui est affectée dans ta procédure


on a aussi des boléen public (portée module) pour gérer les évènements .... un commentaire indiquant juste "' palliatif, EnableEvents ne marche pas" (???)


bref, j'ai refermé le fichier ... non sans avoir testé et réussi à faire un copier coller sur cette satanée feuille (en virant option Explicit)

[maitrebanjo]

Je me suis mal exprimé ^^' Désolé.
Je sais que ma liste fonctionne. Mais lorsque je veut copier coller des données sur la feuil2, je peut les copier mais pas les coller.
Par exemple le bouton Matrice de Kraljic, copie et colle un graphique se trouvant en page 3, celui fonctionnait avec que je mette en place la listebox et ce n'est plus le cas.

Cordialement

[joe.levrai]

tu perds probablement les données copiées quand ta procédure revient sur la Feuil2
car tu as une procédure évènementielle dans cette feuille qui rempli des listbox ...

essaye comme ça, dans ta procédure du Userform Matrice ... sait-on jamais ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub CommandButton1_Click()
Application.EnableEvents = False 
'Le code
Application.EnableEvents = True

EDIT : j'ai copié des valeurs dans ta feuille3, je suis retourné dans ta Feuil2, j'ai cliqué et sélectionné plusieurs cellules différentes ... et ensuite j'ai réussi à coller mes données.
donc ça ne doit pas venir de là

[maitrebanjo]

Donc je ne test pas ton code?
Car moi des que j'effectue un clic (que ce soit un gauche ou un droit) j'ai l'impression qu'il est doublé rendant le collage impossible vu qu'il me deselectionne mon copier

[joe.levrai]

N'arrivant pas à reproduire ton problème, je suis incapable de t'aider

essaye quand même ma proposition, ça mange pas de pain mais j'y crois absolument pas, puisque ton problème se produit également en dehors de cette procédure