j'utilise ce code pour remplir une listebox et surtout pour r=E9cup=E9rer
le r=E9sultat de la saisie
Private Sub ListeBoxAdress_Click()
Dim Ligne As Long, c As Range
Ligne =3D ActiveSheet.ListeBoxAdress.ListIndex + 1
[a9] =3D Application.Index([NoM_PrenoM], Ligne, 1)
[b9] =3D Application.Index([NoM_PrenoM], Ligne, 2)
End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes
par exemple) la macro pr=E9c=E9dente me renvoie un plantage...
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
LSteph
Bonjour,
il me semblerait a priori
.Index([NoM_PrenoM].address,
-- lSteph
Fredo(67) a écrit :
Bonjour
j'utilise ce code pour remplir une listebox et surtout pour récupérer le résultat de la saisie
Private Sub ListeBoxAdress_Click() Dim Ligne As Long, c As Range Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1 [a9] = Application.Index([NoM_PrenoM], Ligne, 1) [b9] = Application.Index([NoM_PrenoM], Ligne, 2) End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes par exemple) la macro précédente me renvoie un plantage...
Comment pourrais-je la modifier ?
Bonjour,
il me semblerait a priori
.Index([NoM_PrenoM].address,
--
lSteph
Fredo(67) a écrit :
Bonjour
j'utilise ce code pour remplir une listebox et surtout pour récupérer
le résultat de la saisie
Private Sub ListeBoxAdress_Click()
Dim Ligne As Long, c As Range
Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1
[a9] = Application.Index([NoM_PrenoM], Ligne, 1)
[b9] = Application.Index([NoM_PrenoM], Ligne, 2)
End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes
par exemple) la macro précédente me renvoie un plantage...
j'utilise ce code pour remplir une listebox et surtout pour récupérer le résultat de la saisie
Private Sub ListeBoxAdress_Click() Dim Ligne As Long, c As Range Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1 [a9] = Application.Index([NoM_PrenoM], Ligne, 1) [b9] = Application.Index([NoM_PrenoM], Ligne, 2) End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes par exemple) la macro précédente me renvoie un plantage...
Comment pourrais-je la modifier ?
LSteph
...mais je vois pas ce qui remplit la liste là dedans ni ce que fait la variable c
en dire plus sur ce que tu entends par >..la zone NoM_PrenoM (masquage de lignes par exemple)
Fredo(67) a écrit :
Bonjour
j'utilise ce code pour remplir une listebox et surtout pour récupérer le résultat de la saisie
Private Sub ListeBoxAdress_Click() Dim Ligne As Long, c As Range Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1 [a9] = Application.Index([NoM_PrenoM], Ligne, 1) [b9] = Application.Index([NoM_PrenoM], Ligne, 2) End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes par exemple) la macro précédente me renvoie un plantage...
Comment pourrais-je la modifier ?
...mais je vois pas ce qui remplit la liste là dedans
ni ce que fait la variable c
en dire plus sur ce que tu entends par
>..la zone NoM_PrenoM (masquage de lignes par exemple)
Fredo(67) a écrit :
Bonjour
j'utilise ce code pour remplir une listebox et surtout pour récupérer
le résultat de la saisie
Private Sub ListeBoxAdress_Click()
Dim Ligne As Long, c As Range
Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1
[a9] = Application.Index([NoM_PrenoM], Ligne, 1)
[b9] = Application.Index([NoM_PrenoM], Ligne, 2)
End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes
par exemple) la macro précédente me renvoie un plantage...
...mais je vois pas ce qui remplit la liste là dedans ni ce que fait la variable c
en dire plus sur ce que tu entends par >..la zone NoM_PrenoM (masquage de lignes par exemple)
Fredo(67) a écrit :
Bonjour
j'utilise ce code pour remplir une listebox et surtout pour récupérer le résultat de la saisie
Private Sub ListeBoxAdress_Click() Dim Ligne As Long, c As Range Ligne = ActiveSheet.ListeBoxAdress.ListIndex + 1 [a9] = Application.Index([NoM_PrenoM], Ligne, 1) [b9] = Application.Index([NoM_PrenoM], Ligne, 2) End Sub
Mais quand je travaille sur la zone NoM_PrenoM (masquage de lignes par exemple) la macro précédente me renvoie un plantage...
Comment pourrais-je la modifier ?
Fredo(67)
Merci de t'etre penché sur moi (enfin ma question)
j'ai un tableau avec la liste des employés de ma boite. ce tableau reprend tous les renseignements (adresse, date d'entrée, age.....)
Les 2 colonnes Nom et Prénom sont regroupées dans une zone nommée NoM_PrénoM
Dans un autre onglet, j'ai un listbox qui me sert à sélectionner 1 ouvrier pour récupérer ses informations d'adresse. Ce listbox doit obligatoirement comporter 2 colonnes pour pouvoir différencier les noms identiques par les prénoms. Puis, en fonction de la ligne sélectionnée dans le listbox, renvoyer en A9 le nom, et en B9 le prénom
Pour ce qui est du remplissage de la listbox, j'utilise la propriété Listfillrange de la listbox a laquelle j'ai appliqué la variable Nom_Prenom
Le problème est que si l'on masque une ligne du tableau initial, EXCEL renvoie une erreur
Merci
Merci de t'etre penché sur moi (enfin ma question)
j'ai un tableau avec la liste des employés de ma boite.
ce tableau reprend tous les renseignements (adresse, date d'entrée,
age.....)
Les 2 colonnes Nom et Prénom sont regroupées dans une zone nommée
NoM_PrénoM
Dans un autre onglet, j'ai un listbox qui me sert à sélectionner 1
ouvrier pour récupérer ses informations d'adresse.
Ce listbox doit obligatoirement comporter 2 colonnes pour pouvoir
différencier les noms identiques par les prénoms.
Puis, en fonction de la ligne sélectionnée dans le listbox, renvoyer
en A9 le nom, et en B9 le prénom
Pour ce qui est du remplissage de la listbox, j'utilise la propriété
Listfillrange de la listbox a laquelle j'ai appliqué la variable
Nom_Prenom
Le problème est que si l'on masque une ligne du tableau initial, EXCEL
renvoie une erreur
Merci de t'etre penché sur moi (enfin ma question)
j'ai un tableau avec la liste des employés de ma boite. ce tableau reprend tous les renseignements (adresse, date d'entrée, age.....)
Les 2 colonnes Nom et Prénom sont regroupées dans une zone nommée NoM_PrénoM
Dans un autre onglet, j'ai un listbox qui me sert à sélectionner 1 ouvrier pour récupérer ses informations d'adresse. Ce listbox doit obligatoirement comporter 2 colonnes pour pouvoir différencier les noms identiques par les prénoms. Puis, en fonction de la ligne sélectionnée dans le listbox, renvoyer en A9 le nom, et en B9 le prénom
Pour ce qui est du remplissage de la listbox, j'utilise la propriété Listfillrange de la listbox a laquelle j'ai appliqué la variable Nom_Prenom
Le problème est que si l'on masque une ligne du tableau initial, EXCEL renvoie une erreur
Merci
Fredo(67)
Précisions : j'ai modifié le code comme suit :
Private Sub ListeBoxAdress_Click() [A9] = ActiveSheet.ListeBoxAdress.Text [B9] = ActiveSheet.ListeBoxAdress.Value End Sub
la listbox s'appelle ListeBoxAdress
Le fonctionnement de la listbox est parfait, c'est lors de la manipulation de la feuille de base, que excel renvoie une erreur
Précisions :
j'ai modifié le code comme suit :
Private Sub ListeBoxAdress_Click()
[A9] = ActiveSheet.ListeBoxAdress.Text
[B9] = ActiveSheet.ListeBoxAdress.Value
End Sub
la listbox s'appelle ListeBoxAdress
Le fonctionnement de la listbox est parfait, c'est lors de la
manipulation de la feuille de base, que excel renvoie une erreur