A voir également:
- Listbox word
- Word vba listbox - Meilleures réponses
- Remplir une listview vba excel - Meilleures réponses
- Word vba listbox ✓ - Forum - VBA Office (Excel, Word ...)
- Vb6 listbox ✓ - Forum - Visual Basic 6
- Php to word - Conseils pratiques - PHP
- Delphi listbox ✓ - Forum - Delphi / Pascal
- Piloter word depuis excel vba - Forum - Visual Basic 6
2 réponses
ucfoutu
- Messages postés
- 18038
- Date d'inscription
- lundi 7 décembre 2009
- Statut
- Modérateur
- Dernière intervention
- 11 avril 2018
Bonjour,
Je crains fort que l'on s'y perde (et probablement toi aussi) dans ces explications qui s'apparentent à un labyrinthe !
Essaye d'aller à l'essentiel, en isolant la
Je ne comprends par ailleurs pas où intervient, dans cette affaire, le logiciel VB.Net (sous-forum dans lequel tu as ouvert la présente discussion)
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Je crains fort que l'on s'y perde (et probablement toi aussi) dans ces explications qui s'apparentent à un labyrinthe !
Essaye d'aller à l'essentiel, en isolant la
seuledifficulté que tu rencontres (cette seule partie, en l'isolant de tout ton contexte).
Je ne comprends par ailleurs pas où intervient, dans cette affaire, le logiciel VB.Net (sous-forum dans lequel tu as ouvert la présente discussion)
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.
Tim D
Bonjour,
je développe sous VBA et j'avoue que j'ai beaucoup de mal à exprimer mon besoin donc je vais essayer de faire au plus simple.
Je saisie des enregistrements dans mon classeur par le biais d'un formulaire, j'affiche toutes les enregistrements du classeur dans un ListView et je veux que lorsque je double clique sur une ligne de ma ListView que les champs du formulaire soient remplis automatiquement avec les valeurs de la ligne afin de les modifier.
Pas de soucis pour remplir automatiquement les TextBox et checkBox, par contre un des champs est une liste à choix multiple (ListBox), car en effet dans le classeur je ne dispose que d'une seule cellule par ligne pour ce champs donc je concatène les éléments sélectionnés l'un aprés l'autre séparés d'une virgule et un espace.
Seulement lorsque qu'il s'agit de "re-sélectionner" les éléments de la ListBox pour la modification je ne voit pas comment faire y'a-t-il une solution ou dois-je faire autrement ? Merci d'avance
je développe sous VBA et j'avoue que j'ai beaucoup de mal à exprimer mon besoin donc je vais essayer de faire au plus simple.
Je saisie des enregistrements dans mon classeur par le biais d'un formulaire, j'affiche toutes les enregistrements du classeur dans un ListView et je veux que lorsque je double clique sur une ligne de ma ListView que les champs du formulaire soient remplis automatiquement avec les valeurs de la ligne afin de les modifier.
Pas de soucis pour remplir automatiquement les TextBox et checkBox, par contre un des champs est une liste à choix multiple (ListBox), car en effet dans le classeur je ne dispose que d'une seule cellule par ligne pour ce champs donc je concatène les éléments sélectionnés l'un aprés l'autre séparés d'une virgule et un espace.
Seulement lorsque qu'il s'agit de "re-sélectionner" les éléments de la ListBox pour la modification je ne voit pas comment faire y'a-t-il une solution ou dois-je faire autrement ? Merci d'avance
pijaku
- Messages postés
- 12251
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 17 mars 2021
Bonjour,
Juste une petite incruste sur ce sujet pour une légère modification...
On peut éviter de se servir du Goto en sortant simplement de la boucle For j, Next :
Juste une petite incruste sur ce sujet pour une légère modification...
On peut éviter de se servir du Goto en sortant simplement de la boucle For j, Next :
If Me.Controls("ListView" & jour).SelectedItem.SubItems(5) <> "" Then
'testArray = Split(Me.Controls("ListView" & jour).SelectedItem.SubItems(5), ", ")
testArray = Split(testString, ", ")
For i = 0 To UBound(testArray)
For j = 0 To ListBoxMotifs.ListCount - 1
If testArray(i) = ListBoxMotifs.List(j) Then
ListBoxMotifs.Selected(j) = True
Exit For
End If
Next j
Next i
End If
pijaku
- Messages postés
- 12251
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 17 mars 2021
Bonjour,
Cette méthode ne changera en rien ni le temps d'exécution, ni la conso en ressources. En même temps, à ce niveau là, c'est très faible.
Le GoTo est à utiliser avec parcimonie et précautions.
En effet, trop utilisé au sein d'un même code, transforme le-dit code en "plat de spaghetti" particulièrement ardu à maintenir.
Ce n'est pas le cas ici, bien sur. C'est pourquoi je te propose juste une alternative à l'utilisation de GoTo.
Cette méthode ne changera en rien ni le temps d'exécution, ni la conso en ressources. En même temps, à ce niveau là, c'est très faible.
Le GoTo est à utiliser avec parcimonie et précautions.
En effet, trop utilisé au sein d'un même code, transforme le-dit code en "plat de spaghetti" particulièrement ardu à maintenir.
Ce n'est pas le cas ici, bien sur. C'est pourquoi je te propose juste une alternative à l'utilisation de GoTo.
pijaku
- Messages postés
- 12251
- Date d'inscription
- jeudi 15 mai 2008
- Statut
- Modérateur
- Dernière intervention
- 17 mars 2021
Bonjour,
Maintenant, si ton sujet est résolu, il convient de le signaler à la communauté.
Pour cela, il te suffit de cliquer sur le bouton adéquat situé au niveau de ta demande, en haut de cette page.
A++
Maintenant, si ton sujet est résolu, il convient de le signaler à la communauté.
Pour cela, il te suffit de cliquer sur le bouton adéquat situé au niveau de ta demande, en haut de cette page.
A++