Salut à tous.
J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti.
Malheureusement, ça ne marche pas; il ne se passe rien.
En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Daniel
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Bonjour.
Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long
For Ctr = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(Ctr) = True Then
Range("A1") = ListBox1.List(Ctr)
ListBox1.Selected(Ctr) = False
End If
Next
Valable pour une seule sélection. Sinon, il faut décaler la cellule de
destination.
Cordialement.
Daniel
"Alain" <alain@hotmail.com> a écrit dans le message de news:
eOThDjUtGHA.644@TK2MSFTNGP03.phx.gbl...
Salut à tous.
J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti.
Malheureusement, ça ne marche pas; il ne se passe rien.
En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Alain
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Je ne comprends pas ta solution.
Mon but est de permettre à l'utilisateur des faire des sélections multiples
mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de
news:uWvNe1UtGHA.3264@TK2MSFTNGP03.phx.gbl...
Bonjour.
Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long
For Ctr = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(Ctr) = True Then
Range("A1") = ListBox1.List(Ctr)
ListBox1.Selected(Ctr) = False
End If
Next
Valable pour une seule sélection. Sinon, il faut décaler la cellule de
destination.
Cordialement.
Daniel
"Alain" <alain@hotmail.com> a écrit dans le message de news:
eOThDjUtGHA.644@TK2MSFTNGP03.phx.gbl...
Salut à tous.
J'aimerai pouvoir faire un traitement (en VBA donc) après un simple
click
sur une ListBox qui est en mode SelectMulti.
Malheureusement, ça ne marche pas; il ne se passe rien.
En mode SelectSingle, tout est normal (je récupère bien le click) mais
ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
docm
Bonjour.
Tu peux détecter l'événement Change qui est déclenché par chaque sélection.
docm
"Alain" wrote in message news:
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Bonjour.
Tu peux détecter l'événement Change qui est déclenché par chaque sélection.
docm
"Alain" <alain@hotmail.com> wrote in message
news:uCFYUBVtGHA.1224@TK2MSFTNGP03.phx.gbl...
Je ne comprends pas ta solution.
Mon but est de permettre à l'utilisateur des faire des sélections
multiples
mais il me faut un trigger pour le simple click (ce qui semble
impossible).
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de
news:uWvNe1UtGHA.3264@TK2MSFTNGP03.phx.gbl...
Bonjour.
Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long
For Ctr = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(Ctr) = True Then
Range("A1") = ListBox1.List(Ctr)
ListBox1.Selected(Ctr) = False
End If
Next
Valable pour une seule sélection. Sinon, il faut décaler la cellule de
destination.
Cordialement.
Daniel
"Alain" <alain@hotmail.com> a écrit dans le message de news:
eOThDjUtGHA.644@TK2MSFTNGP03.phx.gbl...
Salut à tous.
J'aimerai pouvoir faire un traitement (en VBA donc) après un simple
click
sur une ListBox qui est en mode SelectMulti.
Malheureusement, ça ne marche pas; il ne se passe rien.
En mode SelectSingle, tout est normal (je récupère bien le click) mais
ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Tu peux détecter l'événement Change qui est déclenché par chaque sélection.
docm
"Alain" wrote in message news:
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Alain
Je fais des traitements qui sélectionnent/désélectionnent automatiquements certains éléments de ma liste. Si l'événement Change est associé à du code, après chaque changement - même automatique - cet événement sera déclenché, ce qui prends trop de temps de calcul car je sélectionne/désélectionne parfois de manière automatique un grand nombre d'éléments de ma liste. L'utilisation du Change est donc exclue. Il me faut donc un autre événement que le Change pour gérer les sélections/désélections dans ma liste de la part de l'utilisateur; j'avais pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce qui est indispensable).
Alain.
"docm" a écrit dans le message de news:OkO%
Bonjour.
Tu peux détecter l'événement Change qui est déclenché par chaque sélection.
docm
"Alain" wrote in message news:
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais
ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Je fais des traitements qui sélectionnent/désélectionnent automatiquements
certains éléments de ma liste.
Si l'événement Change est associé à du code, après chaque changement - même
automatique - cet événement sera déclenché, ce qui prends trop de temps de
calcul car je sélectionne/désélectionne parfois de manière automatique un
grand nombre d'éléments de ma liste.
L'utilisation du Change est donc exclue.
Il me faut donc un autre événement que le Change pour gérer les
sélections/désélections dans ma liste de la part de l'utilisateur; j'avais
pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce
qui est indispensable).
Alain.
"docm" <nospam@forme> a écrit dans le message de
news:OkO%23PaVtGHA.3552@TK2MSFTNGP03.phx.gbl...
Bonjour.
Tu peux détecter l'événement Change qui est déclenché par chaque
sélection.
docm
"Alain" <alain@hotmail.com> wrote in message
news:uCFYUBVtGHA.1224@TK2MSFTNGP03.phx.gbl...
Je ne comprends pas ta solution.
Mon but est de permettre à l'utilisateur des faire des sélections
multiples
mais il me faut un trigger pour le simple click (ce qui semble
impossible).
"Daniel" <dZZZcolardelle@free.fr> a écrit dans le message de
news:uWvNe1UtGHA.3264@TK2MSFTNGP03.phx.gbl...
Bonjour.
Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long
For Ctr = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(Ctr) = True Then
Range("A1") = ListBox1.List(Ctr)
ListBox1.Selected(Ctr) = False
End If
Next
Valable pour une seule sélection. Sinon, il faut décaler la cellule de
destination.
Cordialement.
Daniel
"Alain" <alain@hotmail.com> a écrit dans le message de news:
eOThDjUtGHA.644@TK2MSFTNGP03.phx.gbl...
Salut à tous.
J'aimerai pouvoir faire un traitement (en VBA donc) après un simple
click
sur une ListBox qui est en mode SelectMulti.
Malheureusement, ça ne marche pas; il ne se passe rien.
En mode SelectSingle, tout est normal (je récupère bien le click)
mais
ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Je fais des traitements qui sélectionnent/désélectionnent automatiquements certains éléments de ma liste. Si l'événement Change est associé à du code, après chaque changement - même automatique - cet événement sera déclenché, ce qui prends trop de temps de calcul car je sélectionne/désélectionne parfois de manière automatique un grand nombre d'éléments de ma liste. L'utilisation du Change est donc exclue. Il me faut donc un autre événement que le Change pour gérer les sélections/désélections dans ma liste de la part de l'utilisateur; j'avais pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce qui est indispensable).
Alain.
"docm" a écrit dans le message de news:OkO%
Bonjour.
Tu peux détecter l'événement Change qui est déclenché par chaque sélection.
docm
"Alain" wrote in message news:
Je ne comprends pas ta solution. Mon but est de permettre à l'utilisateur des faire des sélections multiples mais il me faut un trigger pour le simple click (ce qui semble impossible).
"Daniel" a écrit dans le message de news:
Bonjour. Utilise le code suivant (en changeant le nom de la ListBox) :
Dim Ctr As Long For Ctr = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(Ctr) = True Then Range("A1") = ListBox1.List(Ctr) ListBox1.Selected(Ctr) = False End If Next Valable pour une seule sélection. Sinon, il faut décaler la cellule de destination. Cordialement. Daniel "Alain" a écrit dans le message de news:
Salut à tous. J'aimerai pouvoir faire un traitement (en VBA donc) après un simple click
sur une ListBox qui est en mode SelectMulti. Malheureusement, ça ne marche pas; il ne se passe rien. En mode SelectSingle, tout est normal (je récupère bien le click) mais
ce
n'est pas ça dont j'ai besoin!
Avez-vous une idée ?
Merci d'avance pour vos services toujours rapides et pertinents.
Alain.
Eric
Bonjour Alain,
Et avec un des évènements MouseDown ou MouseUp sur la listbox ?
Je fais des traitements qui sélectionnent/désélectionnent automatiquements certains éléments de ma liste. Si l'événement Change est associé à du code, après chaque changement - même automatique - cet événement sera déclenché, ce qui prends trop de temps de calcul car je sélectionne/désélectionne parfois de manière automatique un grand nombre d'éléments de ma liste. L'utilisation du Change est donc exclue. Il me faut donc un autre événement que le Change pour gérer les sélections/désélections dans ma liste de la part de l'utilisateur; j'avais pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce qui est indispensable).
Alain.
-- A+ Eric
Bonjour Alain,
Et avec un des évènements MouseDown ou MouseUp sur la listbox ?
Je fais des traitements qui sélectionnent/désélectionnent automatiquements
certains éléments de ma liste.
Si l'événement Change est associé à du code, après chaque changement - même
automatique - cet événement sera déclenché, ce qui prends trop de temps de
calcul car je sélectionne/désélectionne parfois de manière automatique un
grand nombre d'éléments de ma liste.
L'utilisation du Change est donc exclue.
Il me faut donc un autre événement que le Change pour gérer les
sélections/désélections dans ma liste de la part de l'utilisateur; j'avais
pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce
qui est indispensable).
Et avec un des évènements MouseDown ou MouseUp sur la listbox ?
Je fais des traitements qui sélectionnent/désélectionnent automatiquements certains éléments de ma liste. Si l'événement Change est associé à du code, après chaque changement - même automatique - cet événement sera déclenché, ce qui prends trop de temps de calcul car je sélectionne/désélectionne parfois de manière automatique un grand nombre d'éléments de ma liste. L'utilisation du Change est donc exclue. Il me faut donc un autre événement que le Change pour gérer les sélections/désélections dans ma liste de la part de l'utilisateur; j'avais pensé au Click mais le Click ne marche pas si ma liste est SelectMulti (ce qui est indispensable).
