Barre de déroulement pour filtrer des données spécifiques
3 réponses
PhatLuks
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases avec des
noms de produits à l'intérieur. Pour une série de produits j'ai un gros
titre. Exemple:
Vin Italie
Tegole
Nipozzano
Amarone
.....
Vin France
Château Masserand
Petit Mas
......
Je tente de faire dans ma première case du classeur une barre de déroulement
qui m'amènerais directement au gros titre voulu. J'ai essayer le filtrage
mais je ne suis pas sur que c'est le bon outil.
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
JB
Bonjour,
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JB http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases ave c des noms de produits à l'intérieur. Pour une série de produits j'ai un g ros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de dérou lement qui m'amènerais directement au gros titre voulu. J'ai essayer le filt rage mais je ne suis pas sur que c'est le bon outil.
Merci de me donner votre avis
Luks
Bonjour,
Sub auto_open()
For Each c In Range("A3:A" & [A65000].End(xlUp).Row)
If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c
Next c
End Sub
Private Sub ComboBox1_Change()
[A:A].Find(what:=ComboBox1).Select
End Sub
http://cjoint.com/?drhdEqckZL
JB
http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks <PhatL...@discussions.microsoft.com> wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases ave c des
noms de produits à l'intérieur. Pour une série de produits j'ai un g ros
titre. Exemple:
Vin Italie
Tegole
Nipozzano
Amarone
.....
Vin France
Château Masserand
Petit Mas
......
Je tente de faire dans ma première case du classeur une barre de dérou lement
qui m'amènerais directement au gros titre voulu. J'ai essayer le filt rage
mais je ne suis pas sur que c'est le bon outil.
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JB http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases ave c des noms de produits à l'intérieur. Pour une série de produits j'ai un g ros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de dérou lement qui m'amènerais directement au gros titre voulu. J'ai essayer le filt rage mais je ne suis pas sur que c'est le bon outil.
Merci de me donner votre avis
Luks
PhatLuks
Bonjour, merci de votre réponse. Je suis par contre un peu débutant et les formules que vous m'avez donné, je ne suis pas sur du où et comment je dois l'inscrire. Est-ce qu'ils rentrent tous dans la case A1? Exemple: où est-ce que j'écris Sub auto_open?
Merci énormément de me répondre
Luks
Bonjour,
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JB http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases avec des noms de produits à l'intérieur. Pour une série de produits j'ai un gros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de déroulement qui m'amènerais directement au gros titre voulu. J'ai essayer le filtrage mais je ne suis pas sur que c'est le bon outil.
Merci de me donner votre avis
Luks
Bonjour, merci de votre réponse. Je suis par contre un peu débutant et les
formules que vous m'avez donné, je ne suis pas sur du où et comment je dois
l'inscrire. Est-ce qu'ils rentrent tous dans la case A1? Exemple: où est-ce
que j'écris Sub auto_open?
Merci énormément de me répondre
Luks
Bonjour,
Sub auto_open()
For Each c In Range("A3:A" & [A65000].End(xlUp).Row)
If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c
Next c
End Sub
Private Sub ComboBox1_Change()
[A:A].Find(what:=ComboBox1).Select
End Sub
http://cjoint.com/?drhdEqckZL
JB
http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks <PhatL...@discussions.microsoft.com> wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases avec des
noms de produits à l'intérieur. Pour une série de produits j'ai un gros
titre. Exemple:
Vin Italie
Tegole
Nipozzano
Amarone
.....
Vin France
Château Masserand
Petit Mas
......
Je tente de faire dans ma première case du classeur une barre de déroulement
qui m'amènerais directement au gros titre voulu. J'ai essayer le filtrage
mais je ne suis pas sur que c'est le bon outil.
Bonjour, merci de votre réponse. Je suis par contre un peu débutant et les formules que vous m'avez donné, je ne suis pas sur du où et comment je dois l'inscrire. Est-ce qu'ils rentrent tous dans la case A1? Exemple: où est-ce que j'écris Sub auto_open?
Merci énormément de me répondre
Luks
Bonjour,
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JB http://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases avec des noms de produits à l'intérieur. Pour une série de produits j'ai un gros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de déroulement qui m'amènerais directement au gros titre voulu. J'ai essayer le filtrage mais je ne suis pas sur que c'est le bon outil.
Merci de me donner votre avis
Luks
JB
Pour auto_open
-AlT+F11 -Insertion/Module
Pour le menu:
Affiche/Boite outils controle:
-Combo -Double clic
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
JB On 17 mar, 07:03, JB wrote:
Bonjour,
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JBhttp://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases a vec des noms de produits à l'intérieur. Pour une série de produits j'ai un gros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de dér oulement qui m'amènerais directement au gros titre voulu. J'ai essayer le fi ltrage mais je ne suis pas sur que c'est le bon outil.
Merci de me donner votre avis
Luks- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Pour auto_open
-AlT+F11
-Insertion/Module
Pour le menu:
Affiche/Boite outils controle:
-Combo
-Double clic
Private Sub ComboBox1_Change()
[A:A].Find(what:=ComboBox1).Select
End Sub
JB
On 17 mar, 07:03, JB <boisgont...@hotmail.com> wrote:
Bonjour,
Sub auto_open()
For Each c In Range("A3:A" & [A65000].End(xlUp).Row)
If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c
Next c
End Sub
Private Sub ComboBox1_Change()
[A:A].Find(what:=ComboBox1).Select
End Sub
http://cjoint.com/?drhdEqckZL
JBhttp://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks <PhatL...@discussions.microsoft.com> wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases a vec des
noms de produits à l'intérieur. Pour une série de produits j'ai un gros
titre. Exemple:
Vin Italie
Tegole
Nipozzano
Amarone
.....
Vin France
Château Masserand
Petit Mas
......
Je tente de faire dans ma première case du classeur une barre de dér oulement
qui m'amènerais directement au gros titre voulu. J'ai essayer le fi ltrage
mais je ne suis pas sur que c'est le bon outil.
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
JB On 17 mar, 07:03, JB wrote:
Bonjour,
Sub auto_open() For Each c In Range("A3:A" & [A65000].End(xlUp).Row) If c.Font.Bold Then Sheets(1).ComboBox1.AddItem c Next c End Sub
Private Sub ComboBox1_Change() [A:A].Find(what:=ComboBox1).Select End Sub
http://cjoint.com/?drhdEqckZL
JBhttp://boisgontierjacques.free.fr/
On 17 mar, 00:44, PhatLuks wrote:
Bonjour. Voici mon problème. J'ai une liste d'au delà de 200 cases a vec des noms de produits à l'intérieur. Pour une série de produits j'ai un gros titre. Exemple:
Vin Italie
Tegole Nipozzano Amarone .....
Vin France
Château Masserand Petit Mas ......
Je tente de faire dans ma première case du classeur une barre de dér oulement qui m'amènerais directement au gros titre voulu. J'ai essayer le fi ltrage mais je ne suis pas sur que c'est le bon outil.