Activation combobox à l ouverture de la feuille
Résolu/Fermé
amo-51
Messages postés
94
Date d'inscription
mercredi 21 septembre 2016
Statut
Membre
Dernière intervention
3 novembre 2019
-
14 févr. 2019 à 19:38
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 17 févr. 2019 à 23:50
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 17 févr. 2019 à 23:50
A voir également:
- Activation combobox à l ouverture de la feuille
- Clé d'activation windows 10 gratuit - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Comment supprimer une feuille sur word - Guide
- Page d'ouverture google - Guide
- Clé activation office 2010 gratuit - Télécharger - Sécurité
4 réponses
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
14 févr. 2019 à 21:07
14 févr. 2019 à 21:07
Bonjour,
C'est pas clair !
« j ai cette combobox
Ça c'est pas une Combobox, c'est une procédure évènementielle qui est exécutée après la mise à jour de la combobox1.
« Elle marche très bien » me semble présomptueux !
Disons que, pour l'instant, ce qu'elle fait te convient.
« mais lorsque je ferme la feuille et je ré-ouvre , la combobox disparaît et je dois l’activer en accédant à ma macro »
Je ne vois là aucun rapport entre ces deux affirmations.
Comment fermes-tu une feuille sans fermer le classeur ?
Mais peut-être qu'on ne nous dit pas tout (sic) !
Est-ce là, le seul code présent dans le classeur ?
--
Patrice
C'est pas clair !
« j ai cette combobox
Private Sub ComboBox1_AfterUpdate() '.... End Sub... elle marche très bien »
Ça c'est pas une Combobox, c'est une procédure évènementielle qui est exécutée après la mise à jour de la combobox1.
« Elle marche très bien » me semble présomptueux !
Disons que, pour l'instant, ce qu'elle fait te convient.
« mais lorsque je ferme la feuille et je ré-ouvre , la combobox disparaît et je dois l’activer en accédant à ma macro »
Je ne vois là aucun rapport entre ces deux affirmations.
Comment fermes-tu une feuille sans fermer le classeur ?
Mais peut-être qu'on ne nous dit pas tout (sic) !
Est-ce là, le seul code présent dans le classeur ?
--
Patrice
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 févr. 2019 à 11:29
17 févr. 2019 à 11:29
Bonjour,
Quel type de Combobox utilises-tu ?
Il n'y a pas de méthode ou proprièté portant ce nom (ou un nom similaire) dans les Combobox de type MSForm. (FM20.dll)
"ma combo s'affiche dans une cellule , j'utilise l'instruction "likedcall" qui se trouve dans propriété de la combo"
Quel type de Combobox utilises-tu ?
Il n'y a pas de méthode ou proprièté portant ce nom (ou un nom similaire) dans les Combobox de type MSForm. (FM20.dll)
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 févr. 2019 à 16:03
17 févr. 2019 à 16:03
C'est donc normal, LinkedCell c'est la cellule que reçoit le résultat.
Pour la liste c'est ListFillRange
Pour la liste c'est ListFillRange
amo-51
Messages postés
94
Date d'inscription
mercredi 21 septembre 2016
Statut
Membre
Dernière intervention
3 novembre 2019
17 févr. 2019 à 17:49
17 févr. 2019 à 17:49
que dois je mettre dans ListFillRange
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 févr. 2019 à 19:33
17 févr. 2019 à 19:33
la plage de cellules qui contient la liste, par exemple A1:A10
amo-51
Messages postés
94
Date d'inscription
mercredi 21 septembre 2016
Statut
Membre
Dernière intervention
3 novembre 2019
17 févr. 2019 à 19:41
17 févr. 2019 à 19:41
mais moi je n ai pas de plage de cellules puis certains combo sont des boucles avec fonction if
amo-51
Messages postés
94
Date d'inscription
mercredi 21 septembre 2016
Statut
Membre
Dernière intervention
3 novembre 2019
17 févr. 2019 à 22:10
17 févr. 2019 à 22:10
on m a donné la solution dans un autre forum et je le partage
Private Sub Worksheet_Change(ByVal Target As Range)
With Sheets("Fiche crédit")
ComboBox2.List = Array(" ", "Mr", "Mme")
ComboBox3.List = Array(" ", "0", "0,50%", "1%", "3%", "3,50%")
ComboBox4.List = Array(" ", "Oui", "Non")
ComboBox5.List = Array(" ", "Oui", "Non")
ComboBox6.List = Array(" ", "Oui", "Non")
ComboBox7.List = Array(" ", "Oui", "Non")
ComboBox8.List = Array(" ", "0", "3", "6", "9", "12")
End With
End Sub
............................................
Private Sub Workbook_Open()
' on fait appel à la macro crédit du module 3
Call crédit
End Sub
au plaisir
Private Sub Worksheet_Change(ByVal Target As Range)
With Sheets("Fiche crédit")
ComboBox2.List = Array(" ", "Mr", "Mme")
ComboBox3.List = Array(" ", "0", "0,50%", "1%", "3%", "3,50%")
ComboBox4.List = Array(" ", "Oui", "Non")
ComboBox5.List = Array(" ", "Oui", "Non")
ComboBox6.List = Array(" ", "Oui", "Non")
ComboBox7.List = Array(" ", "Oui", "Non")
ComboBox8.List = Array(" ", "0", "3", "6", "9", "12")
End With
End Sub
............................................
Private Sub Workbook_Open()
' on fait appel à la macro crédit du module 3
Call crédit
End Sub
au plaisir
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 févr. 2019 à 23:50
17 févr. 2019 à 23:50
Patrice33740
Messages postés
8556
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
2 mars 2023
1 779
17 févr. 2019 à 22:24
17 févr. 2019 à 22:24
Re,
« on doit être professionnel même lorsqu" on est dans le bénévolat »
C'est incompatible, qui dit professionnel, dit rémunération alors qu'un bénévole travaille gratis.
Tu voulais probablement dire :
Dans le bénévolat, on se doit de fournir une réponse d'aussi bonne qualité que celle qu'aurait donné un professionnel.
Effectuons une analyse de ce que nous savons, comme l'aurait fait un professionnel :
#0 « elle marche très bien. mais lorsque je ferme la feuille et je ré-ouvre , la combobox disparaît et je dois l’activer en accédant à ma macro » Mais c'était pas ça, c'est :
#2 « au faite, mon souci est que quand je quitte (ferme) mon fichier puis je l'ouvre, la macro s’exécute mais la combo est vide »
#7 « mon problème est que je trouve la cellule de la combo vide à l'ouverture de mon fichier »
Ça on l'a bien compris !
Par contre, par rapport au #0 on voit apparaître en #7
Puis en #11 « il y a Array ». Dans le genre « je dis et je le redis, je vous ai tous dis » : peut mieux faire !
En plus c'est pas cohérent avec :
#23 « ma combo s'affiche dans une cellule , j'utilise l'instruction "likedcall" qui se trouve dans propriété de la combo » Mais c'était #26 « PLUTÔT "Linkedcell" »
Et encore moins cohérent quand tu réponds #30 « mais moi je n ai pas de plage de cellules » qui laisse supposer que tu n'utilises pas LinkedCell (puisque tu n'a pas défini la plage).
En outre, mon ami belge yg (que je salue) t'a posé plusieurs question auxquelles tu n'a pas fourni de réponse précise.
Alors soyons sérieux, nous voulons bien faire preuve de professionnalisme, mais comment veux-tu qu'on devine ce qu'il faut te proposer devant autant d’incohérences et avec si peu d'informations !
« on doit être professionnel même lorsqu" on est dans le bénévolat »
C'est incompatible, qui dit professionnel, dit rémunération alors qu'un bénévole travaille gratis.
Tu voulais probablement dire :
Dans le bénévolat, on se doit de fournir une réponse d'aussi bonne qualité que celle qu'aurait donné un professionnel.
Effectuons une analyse de ce que nous savons, comme l'aurait fait un professionnel :
#0 « elle marche très bien. mais lorsque je ferme la feuille et je ré-ouvre , la combobox disparaît et je dois l’activer en accédant à ma macro » Mais c'était pas ça, c'est :
#2 « au faite, mon souci est que quand je quitte (ferme) mon fichier puis je l'ouvre, la macro s’exécute mais la combo est vide »
#7 « mon problème est que je trouve la cellule de la combo vide à l'ouverture de mon fichier »
Ça on l'a bien compris !
Par contre, par rapport au #0 on voit apparaître en #7
ComboBox1.List = Array.............qui n'y était pas au début, et ça ce n'est pas le véritable code, car ce n'est pas compilable.
Puis en #11 « il y a Array ». Dans le genre « je dis et je le redis, je vous ai tous dis » : peut mieux faire !
En plus c'est pas cohérent avec :
#23 « ma combo s'affiche dans une cellule , j'utilise l'instruction "likedcall" qui se trouve dans propriété de la combo » Mais c'était #26 « PLUTÔT "Linkedcell" »
Et encore moins cohérent quand tu réponds #30 « mais moi je n ai pas de plage de cellules » qui laisse supposer que tu n'utilises pas LinkedCell (puisque tu n'a pas défini la plage).
En outre, mon ami belge yg (que je salue) t'a posé plusieurs question auxquelles tu n'a pas fourni de réponse précise.
Alors soyons sérieux, nous voulons bien faire preuve de professionnalisme, mais comment veux-tu qu'on devine ce qu'il faut te proposer devant autant d’incohérences et avec si peu d'informations !
15 févr. 2019 à 17:10
ce n est pas le seul code présent dans mon classeur
j ai une macro dans le module et la combo dans la feuille
au faite, mon souci est que quand je quitte (ferme) mon fichier puis je l'ouvre, la macro s’exécute mais la combo est vide
chaque fois, je dois interpeller le développeur , entrée dans la feuille et faire exécuter la combo
aussi je cherche une solution, je veux trouver ma combo à l'ouverture du fichier
j’espère que tu as compris cette fois ci
Modifié le 15 févr. 2019 à 22:57
« ce n est pas le seul code » C'est bien ce que j'ai dit : on ne nous dit pas tout !!!
Il faut qu'on le devine ?
16 févr. 2019 à 18:18
que voulez vous savoir d"autres, apparemment vous avez une imagination très débordante
et puis le problème n est pas dans le zoom mais dans la combo qui affiche une liste vide à l ouverture du fichier
Modifié le 16 févr. 2019 à 18:33
je suppose que tu as un classeur Excel, qui contient une feuille, appelée Feuil11.
tu as aussi plusieurs boites combinées, l'une s'appelant combobox1.
tu as encore une procédure événementielle, appélée ComboBox1_AfterUpdate, qui, dès que la boite combinée combobox1 est modifiée, modifie le contenu d'une cellule, ainsi que le contenu de 7 autres boites combinées.
tu mentionnes que quelque chose disparaîtrait entre le moment où tu fermes et rouvres le classeur: de quoi s'agit-il précisément?
16 févr. 2019 à 18:59
Au minimum, la totalité du code VBA contenu dans le classeur en précisant dans quel module.
Et aussi la structure du classeur, ce que contiennent les feuilles, à quoi ça sert
« le problème n est pas dans le zoom mais dans la combo qui affiche une liste vide à l ouverture du fichier » Dans le code que tu présentes, il n'y a aucune instruction pour remplir le combobox, c'est donc que ça se situe ailleurs, pas besoin d'imaginer quoi que ce soit pour comprendre ça !!!
Mais à part ça tu ne caches rien !