J'ai créé un certain nombre de macros me permettant de trier une base de
données.
Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une
liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et
là je butte.
En vous remerciant.
Jol
--------------------------------------------------------------------------------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1860 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
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
FxM
Bonjour,
Excel est un tableur (pas une base de données)
Une liste déroulante n'a pas besoin de macros puisque prenant les données dans des cellules ou une liste. Si tu souhaites filtrer, il y a données - filtres - ...
Bref, je n'ai pas compris la question ...
@+ FxM
-------------------------------------------------------------------- J'utilise l'anti-spam K9 entièrement gratuit, absolument efficace et qui n'ajoute pas de pub désagréable pour les lecteurs de news puisqu'il n'y a aucun lien entre courrier POP et groupe de discussion :o)
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
Bonjour,
Excel est un tableur (pas une base de données)
Une liste déroulante n'a pas besoin de macros puisque prenant les
données dans des cellules ou une liste.
Si tu souhaites filtrer, il y a données - filtres - ...
Bref, je n'ai pas compris la question ...
@+
FxM
--------------------------------------------------------------------
J'utilise l'anti-spam K9 entièrement gratuit, absolument efficace et qui
n'ajoute pas de pub désagréable pour les lecteurs de news puisqu'il n'y
a aucun lien entre courrier POP et groupe de discussion :o)
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de
données.
Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une
liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et
là je butte.
En vous remerciant.
Jol
--------------------------------------------------------------------------------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1860 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
Une liste déroulante n'a pas besoin de macros puisque prenant les données dans des cellules ou une liste. Si tu souhaites filtrer, il y a données - filtres - ...
Bref, je n'ai pas compris la question ...
@+ FxM
-------------------------------------------------------------------- J'utilise l'anti-spam K9 entièrement gratuit, absolument efficace et qui n'ajoute pas de pub désagréable pour les lecteurs de news puisqu'il n'y a aucun lien entre courrier POP et groupe de discussion :o)
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
MichDenis
Si tu utilises un combobox émanant de la boîte d'outils "contrôle" pour afficher le nom de tes macros situées dans un module standard:
Pour pouvoir exécuter la macro associée au choix que tu as effectué dans ton combobox, tu peux t'inspirer de ceci :
à copier dans le module feuille où l'action se déroule :
'------------------------- Private Sub ComboBox1_Change()
Dim X As String, S As String On Error Resume Next With Me.ComboBox1 If .ListIndex <> -1 Then X = .List(.ListIndex) End If End With S = ThisWorkbook.Name & "!" & X Application.Run S End Sub
'------------------------- Private Sub ComboBox1_GotFocus() 'Les noms sont tes noms de macros... 'Ne pas définir la propriété ListFillRange 'de ton combobox
'Tes macros doivent être dans un module standard 'dans mon exemple With Me.ComboBox1 .List = Array("Denis", "Diane", "lise", "Louise") End With End Sub '-------------------------
"Jol" a écrit dans le message de news:
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
Si tu utilises un combobox émanant de la boîte d'outils "contrôle"
pour afficher le nom de tes macros situées dans un module standard:
Pour pouvoir exécuter la macro associée au choix que tu as effectué
dans ton combobox, tu peux t'inspirer de ceci :
à copier dans le module feuille où l'action se déroule :
'-------------------------
Private Sub ComboBox1_Change()
Dim X As String, S As String
On Error Resume Next
With Me.ComboBox1
If .ListIndex <> -1 Then
X = .List(.ListIndex)
End If
End With
S = ThisWorkbook.Name & "!" & X
Application.Run S
End Sub
'-------------------------
Private Sub ComboBox1_GotFocus()
'Les noms sont tes noms de macros...
'Ne pas définir la propriété ListFillRange
'de ton combobox
'Tes macros doivent être dans un module standard
'dans mon exemple
With Me.ComboBox1
.List = Array("Denis", "Diane", "lise", "Louise")
End With
End Sub
'-------------------------
"Jol" <sec.general@club-internet.fr> a écrit dans le message de news:
eGKx8ZnKHHA.3952@TK2MSFTNGP02.phx.gbl...
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de
données.
Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une
liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et
là je butte.
En vous remerciant.
Jol
--------------------------------------------------------------------------------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1860 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
Si tu utilises un combobox émanant de la boîte d'outils "contrôle" pour afficher le nom de tes macros situées dans un module standard:
Pour pouvoir exécuter la macro associée au choix que tu as effectué dans ton combobox, tu peux t'inspirer de ceci :
à copier dans le module feuille où l'action se déroule :
'------------------------- Private Sub ComboBox1_Change()
Dim X As String, S As String On Error Resume Next With Me.ComboBox1 If .ListIndex <> -1 Then X = .List(.ListIndex) End If End With S = ThisWorkbook.Name & "!" & X Application.Run S End Sub
'------------------------- Private Sub ComboBox1_GotFocus() 'Les noms sont tes noms de macros... 'Ne pas définir la propriété ListFillRange 'de ton combobox
'Tes macros doivent être dans un module standard 'dans mon exemple With Me.ComboBox1 .List = Array("Denis", "Diane", "lise", "Louise") End With End Sub '-------------------------
"Jol" a écrit dans le message de news:
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
JB
Bonjour,
Solution barre(accessible de tous les onglets)
http://cjoint.com/?mCr2GDpkxO
Sub auto_open() On Error Resume Next CommandBars("MaBarre").Delete Set barre = CommandBars.Add barre.Name = "MaBarre" barre.Visible = True Set Menu = barre.Controls.Add(msoControlComboBox) Menu.AddItem "TriNom" Menu.AddItem "TriVille" Menu.AddItem "TriDate" Menu.Text = "Sélectionner puis choisir" Menu.OnAction = "MaMacro" End Sub
Sub maMacro() Application.Run CommandBars("MaBarre").Controls(1).Text End Sub
Sub auto_close() On Error Resume Next CommandBars("MaBarre").Delete End Sub
Sub TriNom() MsgBox "TriNom" End Sub
Sub TriVille() MsgBox "TriVille" End Sub
Sub TriDate() MsgBox "TriDate" End Sub
Cordialement JB
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d' une liste déroulante dans laquelle je pourrais choisir le filtre à appliq uer, et là je butte.
En vous remerciant.
Jol
------------------------------------------------------------------------- ------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
Bonjour,
Solution barre(accessible de tous les onglets)
http://cjoint.com/?mCr2GDpkxO
Sub auto_open()
On Error Resume Next
CommandBars("MaBarre").Delete
Set barre = CommandBars.Add
barre.Name = "MaBarre"
barre.Visible = True
Set Menu = barre.Controls.Add(msoControlComboBox)
Menu.AddItem "TriNom"
Menu.AddItem "TriVille"
Menu.AddItem "TriDate"
Menu.Text = "Sélectionner puis choisir"
Menu.OnAction = "MaMacro"
End Sub
Sub maMacro()
Application.Run CommandBars("MaBarre").Controls(1).Text
End Sub
Sub auto_close()
On Error Resume Next
CommandBars("MaBarre").Delete
End Sub
Sub TriNom()
MsgBox "TriNom"
End Sub
Sub TriVille()
MsgBox "TriVille"
End Sub
Sub TriDate()
MsgBox "TriDate"
End Sub
Cordialement JB
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de
données.
Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d' une
liste déroulante dans laquelle je pourrais choisir le filtre à appliq uer, et
là je butte.
En vous remerciant.
Jol
------------------------------------------------------------------------- -------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1860 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
Sub auto_open() On Error Resume Next CommandBars("MaBarre").Delete Set barre = CommandBars.Add barre.Name = "MaBarre" barre.Visible = True Set Menu = barre.Controls.Add(msoControlComboBox) Menu.AddItem "TriNom" Menu.AddItem "TriVille" Menu.AddItem "TriDate" Menu.Text = "Sélectionner puis choisir" Menu.OnAction = "MaMacro" End Sub
Sub maMacro() Application.Run CommandBars("MaBarre").Controls(1).Text End Sub
Sub auto_close() On Error Resume Next CommandBars("MaBarre").Delete End Sub
Sub TriNom() MsgBox "TriNom" End Sub
Sub TriVille() MsgBox "TriVille" End Sub
Sub TriDate() MsgBox "TriDate" End Sub
Cordialement JB
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d' une liste déroulante dans laquelle je pourrais choisir le filtre à appliq uer, et là je butte.
En vous remerciant.
Jol
------------------------------------------------------------------------- ------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
Jol
Grace à vous je suis très prés de la solution.
Merci "Jol" a écrit dans le message de news:
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1861 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
Grace à vous je suis très prés de la solution.
Merci
"Jol" <sec.general@club-internet.fr> a écrit dans le message de news:
eGKx8ZnKHHA.3952@TK2MSFTNGP02.phx.gbl...
Bonjour,
J'ai créé un certain nombre de macros me permettant de trier une base de
données.
Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une
liste déroulante dans laquelle je pourrais choisir le filtre à appliquer,
et là je butte.
En vous remerciant.
Jol
--------------------------------------------------------------------------------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1860 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
--------------------------------------------------------------------------------
J'utilise la version gratuite de SPAMfighter pour utilisateurs privés.
1861 e-mails spam ont été bloqués jusqu'à maintenant.
Les utilisateurs payant n'ont pas ce message dans leurs e-mails.
Essayez SPAMfighter gratuitement maintenant!
J'ai créé un certain nombre de macros me permettant de trier une base de données. Je voudrais lier chaque macro afin de la rendre disponible, à l'aide d'une liste déroulante dans laquelle je pourrais choisir le filtre à appliquer, et là je butte.
En vous remerciant.
Jol
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1860 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!
-------------------------------------------------------------------------------- J'utilise la version gratuite de SPAMfighter pour utilisateurs privés. 1861 e-mails spam ont été bloqués jusqu'à maintenant. Les utilisateurs payant n'ont pas ce message dans leurs e-mails. Essayez SPAMfighter gratuitement maintenant!