Private Sub CommandButton2_Click()
c = InputBox("Enter le nom complet de l'animal :")
If c = "" Then
Exit Sub
End If
Selection.AutoFilter Field:=1, Criteria1:="*c*"
End Sub
Voici une petite macro qui devrai me servir pour filtrer une base de
donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le
filtre selectionne les case contenant le mot taper dans la boite
merci pour votre aide
--
MR NUL
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
Jacques93
Bonjour, un nul a écrit :
Private Sub CommandButton2_Click() c = InputBox("Enter le nom complet de l'animal :") If c = "" Then Exit Sub End If Selection.AutoFilter Field:=1, Criteria1:="*c*"
End Sub Voici une petite macro qui devrai me servir pour filtrer une base de donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le filtre selectionne les case contenant le mot taper dans la boite merci pour votre aide
Selection.AutoFilter Field:=1, Criteria1:=c
Non ?
-- Cordialement,
Jacques.
Bonjour,
un nul a écrit :
Private Sub CommandButton2_Click()
c = InputBox("Enter le nom complet de l'animal :")
If c = "" Then
Exit Sub
End If
Selection.AutoFilter Field:=1, Criteria1:="*c*"
End Sub
Voici une petite macro qui devrai me servir pour filtrer une base de
donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le
filtre selectionne les case contenant le mot taper dans la boite
merci pour votre aide
Private Sub CommandButton2_Click() c = InputBox("Enter le nom complet de l'animal :") If c = "" Then Exit Sub End If Selection.AutoFilter Field:=1, Criteria1:="*c*"
End Sub Voici une petite macro qui devrai me servir pour filtrer une base de donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le filtre selectionne les case contenant le mot taper dans la boite merci pour votre aide
Selection.AutoFilter Field:=1, Criteria1:=c
Non ?
-- Cordialement,
Jacques.
un nul
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les* dans ma formule merc -- MR NUL
"Jacques93" a écrit :
Bonjour, un nul a écrit : > Private Sub CommandButton2_Click() > c = InputBox("Enter le nom complet de l'animal :") > If c = "" Then > Exit Sub > End If > Selection.AutoFilter Field:=1, Criteria1:="*c*" > > End Sub > Voici une petite macro qui devrai me servir pour filtrer une base de > donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le > filtre selectionne les case contenant le mot taper dans la boite > merci pour votre aide
Selection.AutoFilter Field:=1, Criteria1:=c
Non ?
-- Cordialement,
Jacques.
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je
tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les*
dans ma formule
merc
--
MR NUL
"Jacques93" a écrit :
Bonjour,
un nul a écrit :
> Private Sub CommandButton2_Click()
> c = InputBox("Enter le nom complet de l'animal :")
> If c = "" Then
> Exit Sub
> End If
> Selection.AutoFilter Field:=1, Criteria1:="*c*"
>
> End Sub
> Voici une petite macro qui devrai me servir pour filtrer une base de
> donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le
> filtre selectionne les case contenant le mot taper dans la boite
> merci pour votre aide
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les* dans ma formule merc -- MR NUL
"Jacques93" a écrit :
Bonjour, un nul a écrit : > Private Sub CommandButton2_Click() > c = InputBox("Enter le nom complet de l'animal :") > If c = "" Then > Exit Sub > End If > Selection.AutoFilter Field:=1, Criteria1:="*c*" > > End Sub > Voici une petite macro qui devrai me servir pour filtrer une base de > donnée, mais je ne sais pas comment intégrer c comme criteria1 pour que le > filtre selectionne les case contenant le mot taper dans la boite > merci pour votre aide
Selection.AutoFilter Field:=1, Criteria1:=c
Non ?
-- Cordialement,
Jacques.
Jacques93
Bonsoir, un nul a écrit :
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les* dans ma formule
Essaie :
Selection.AutoFilter Field:=1, Criteria1:="*" & c & "*"
PS: pour certains lecteurs de news (ThunderBird, MesNews, 40tude, entre autres) le caractère * est une 'marque' de mise en forme, en l'occurence en gras, et dans certains cas n'apparait pas (MesNews). Par ex :
*gras* /italique/ _souligné_
-- Cordialement,
Jacques.
Bonsoir,
un nul a écrit :
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je
tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les*
dans ma formule
Essaie :
Selection.AutoFilter Field:=1, Criteria1:="*" & c & "*"
PS: pour certains lecteurs de news (ThunderBird, MesNews, 40tude, entre
autres) le caractère * est une 'marque' de mise en forme, en l'occurence
en gras, et dans certains cas n'apparait pas (MesNews). Par ex :
non car je souhaite que le tri ne ce fasse pas seulement avec le mot que je tape mais aussi sur les cellule qui contiene une parti de ce mot d'ou les* dans ma formule
Essaie :
Selection.AutoFilter Field:=1, Criteria1:="*" & c & "*"
PS: pour certains lecteurs de news (ThunderBird, MesNews, 40tude, entre autres) le caractère * est une 'marque' de mise en forme, en l'occurence en gras, et dans certains cas n'apparait pas (MesNews). Par ex :