Discussion :

[Firety]

Bonjour,
Après beaucoup de tentatives pour trouver une solution et pas mal de recherches sur internet, je viens vous expliquer mon problème.
Suite à un projet informatique dans ma formation, on est amené à réaliser une tâche particulière. Celle que moi et mon binôme devons réaliser est assez simple à comprendre :
Le projet globale visant grâce à des user form à remplir une fiche personnage pour un jeu de rôle. Notre tâche consiste à proposer différents avantages et désavantages à l'utilisateur.
Le programme marche plutôt bien (je tiens à préciser que je ne code que depuis cette année scolaire donc soyez indulgents ce ne sont sûrement pas les meilleures façons de faire les choses).
Alors voilà le problème :
Une fois que l'utilisateur a choisi ses avantages et désavantages, nous devons passer les avantages et désavantages choisis d'une listbox à des cellules. Pour ce faire, on a créé un programme que l'on call le nombre de fois qu'il y a de listbox où sont les valeurs concernées. Mais voilà, les valeurs ne sont copiées qu'environ une fois sur 2 selon les essais de résolution de solution et ça semble assez aléatoire. On a remarqué que lorsque l'on call ce programme, on lui donne en paramètre un objet qui correspond au nom d'une listbox et on ne sait pas pourquoi mais cet objet prend soit la valeur Null (ce qui a pour effet de correctement copier les valeurs), mais il prend aussi certaines fois la valeur "" ce qui laisse un blanc dans la cellule.
Merci d'avance pour votre aide.
Si vous avez d’autres suggestions concernant le programme pour l'optimiser ou autre, n'hésitez pas, on a envie d'apprendre à coder correctement !

[unparia]

Bonjour
Si tu te demandes pourquoi je ne saurais répondre à tes questions, lis donc ceci
https://www.developpez.net/forums/d8...s-discussions/
puis lis le texte de ma signature
puis reviens en montrant que tu sais parfaitement isoler la difficulté rencontrée et les lignes de code qui la concernent seule.
Merci de faire cet effort.
EDIT : j'ai essayé (en vain) de comprendre ce que pouvait bien vouloir dire ceci :

Pour ce faire, on a créé un programme que l'on call le nombre de fois qu'il y a de listbox où sont les valeurs concernées. Mais voilà, les valeurs ne sont copiées qu'environ une fois sur 2 selon les essais de résolution de solution et ça semble assez aléatoire

A traduire en langage compréhensible, technique et clair, s'il te plait.

[Firety]

Bonjour,

Merci pour votre réponse rapide et désolé pour ce message qui n'explique pas très bien le problème.

Je vais essayer d'être plus clair :

- On dispose d'un programme qui va chercher des données dans une listbox et qui les met dans une suite de cellules (La première valeur trouvée est mise dans la première cellule, la seconde dans une autre cellule et ainsi de suite.)

- Ce programme marche parfaitement quand il est utilisé pour une seule listbox.

- Pour éviter d'avoir le même programme pour chacune des listbox auxquelles on veut appliquer ce programme on a décidé de faire un call de ce programme à chaque fois que nous en avons besoin.

- Le programme est donc appelé avec en paramètre le nom de la listbox qui nous intéresse à ce moment et ça autant de fois qu'on a de listbox. Call NomDuProgramme(Nomdelalistbox).

- Le paramètre est définie dans le programme comme un objet, on a écrit : Sub NomDuProgramme (Nomdelavariable as object).

- Donc lorsque l'on appel ce programme il va s’exécuter dans la listbox demandé.

- Le problème (enfin ce que nous avons remarqué qui semble expliquer quelque chose) c'est que lorsque l'on appel ce programme avec le nom de la listbox en paramètre, en mode pas à pas on remarque que celle-ci est soit :

Code :

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

Nomdelalistbox = ""

ou bien

Code :

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

Nomdelalistbox = Null

Dans le premier cas, au lieu de mettre la valeur demandé dans la cellule, la cellule reste "vide" ou en tout cas la valeur n'y apparaît pas.

Dans le second cas la valeur est bien mise dans la cellule.

Le programme tourne normalement mais des cellules restes blanches.

J'espère avoir mieux expliquer le problème, si vous voulez plus de précisions n'hésitez pas.

[Philippe Tulliez]

Bonjour,
Exemple à placer soit dans le module UserForm soit dans un module standard

Code :

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

1
2
3
4
5
6
7
8
9
10
Sub InitListBox(ctrlListBox As Object, ByVal ListRange As Range)
 ' Initialisation du ListBox
 ' Propriété Width automatique basée sur largeur des colonnes de RowSource
 ' Arguments
 ' ctrListBox : (ListBox) Ctrl ListBox à initialiser
 ' ListRange  : Liste traitée par le ListBox --> Propriété RowSource
 With ctrlListBox
  MsgBox .Name & vbCrLf & .Parent.Name
 End With
End Sub

On appelle cette procédure depuis le UserForm concerné par

Code :

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

1
2
3
4
5
Private Sub UserForm_Initialize()
 Dim rng As Range
 Set rng = ThisWorkbook.Worksheets("db").Range("A1").CurrentRegion
 InitListBox ListBox1, rng
End Sub

Au lieu de déclarer l'argument nommé comme un objet, tu peux aussi le déclarer comme objet ListBox

Code :

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

Sub InitListBox(ctrlListBox As ListBox, ByVal ListRange As Range)

Moi j'utilise Object car j'emploie cette procédure aussi bien pour les ListBox que les ComboBox mais si la procédure ne doit concerner que les ListBox la deuxième solution est préférable car tu bénéficies du complément automatique des instructions.

[Firety]

Bonjour,
merci pour ces explications, j'ai essayé quelques trucs mais je ne pense pas que le problème vienne de là.
Lorsque j'appelle le programme avec une certaine listbox, selon la listbox le programme va bien me copier les valeurs présentes dans la listbox concernée ou bien il va laisser un blanc dans la cellule où la valeur de la listbox aurait dû être copiée. J'ai l'impression que le problème vient plus de la listbox que du programme.

PS : Comment faut il faire pour mettre du code dans la discussion comme vous faites ?

Encore merci pour votre aide !

[riaolle]

Bonjour,

PS : Comment faut il faire pour mettre du code dans la discussion comme vous faites ?

En effet, on arriverait mieux à t'aider si tu nous montrais ton code
Copie ton code depuis VBA, colle-le dans ton message. Surligne le code et appuie sur le bouton # (qui se situe en haut du cadre pour écrire le message).

EDIT : exemple : http://club.developpez.com/aidenouve...es/Balises.gif