J'utilise une fonction pour filtrer (filtre automatique) à partir de la
cellule K5 (date):
Dim nFiltre As String
nFiltre = Worksheets("saisie").Range("k5").Value
Range("j7").Select
Selection.AutoFilter Field:=10, Criteria1:=nFiltre, Operator:=xlOr _
, Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne.
Je souhaite avoir
<nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives
d'adaptation du code...
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
Hervé
Bonjour Phil., "<=" & nFiltre pour inférieur ou égal "<" & nFiltre pour strictement inférieur ">=" & nFiltre pour supérieur ou égal ">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de recherche directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" a écrit dans le message de news:
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la cellule K5 (date):
Dim nFiltre As String nFiltre = Worksheets("saisie").Range("k5").Value Range("j7").Select Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _ , Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne. Je souhaite avoir <nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives d'adaptation du code...
Je sollicite vos lumières... Merci d'avance,
cordialement, Phil.
Bonjour Phil.,
"<=" & nFiltre pour inférieur ou égal
"<" & nFiltre pour strictement inférieur
">=" & nFiltre pour supérieur ou égal
">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de recherche
directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" <phil.gasnospam@laposte.net> a écrit dans le message de
news: OCYYtUsJJHA.1936@TK2MSFTNGP06.phx.gbl...
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la
cellule K5 (date):
Dim nFiltre As String
nFiltre = Worksheets("saisie").Range("k5").Value
Range("j7").Select
Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _
, Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne.
Je souhaite avoir
<nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives
d'adaptation du code...
Bonjour Phil., "<=" & nFiltre pour inférieur ou égal "<" & nFiltre pour strictement inférieur ">=" & nFiltre pour supérieur ou égal ">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de recherche directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" a écrit dans le message de news:
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la cellule K5 (date):
Dim nFiltre As String nFiltre = Worksheets("saisie").Range("k5").Value Range("j7").Select Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _ , Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne. Je souhaite avoir <nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives d'adaptation du code...
Je sollicite vos lumières... Merci d'avance,
cordialement, Phil.
phil
Merci Hervé.
Phil
"Hervé" a écrit dans le message de news:%
Bonjour Phil., "<=" & nFiltre pour inférieur ou égal "<" & nFiltre pour strictement inférieur ">=" & nFiltre pour supérieur ou égal ">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de recherche directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" a écrit dans le message de news:
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la cellule K5 (date):
Dim nFiltre As String nFiltre = Worksheets("saisie").Range("k5").Value Range("j7").Select Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _ , Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne. Je souhaite avoir <nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives d'adaptation du code...
Je sollicite vos lumières... Merci d'avance,
cordialement, Phil.
Merci Hervé.
Phil
"Hervé" <hmsilve-sanspub@wanadoo.fr> a écrit dans le message de
news:%23tvzlmsJJHA.920@TK2MSFTNGP05.phx.gbl...
Bonjour Phil.,
"<=" & nFiltre pour inférieur ou égal
"<" & nFiltre pour strictement inférieur
">=" & nFiltre pour supérieur ou égal
">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de
recherche directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" <phil.gasnospam@laposte.net> a écrit dans le message
de news: OCYYtUsJJHA.1936@TK2MSFTNGP06.phx.gbl...
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la
cellule K5 (date):
Dim nFiltre As String
nFiltre = Worksheets("saisie").Range("k5").Value
Range("j7").Select
Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _
, Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne.
Je souhaite avoir
<nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives
d'adaptation du code...
Bonjour Phil., "<=" & nFiltre pour inférieur ou égal "<" & nFiltre pour strictement inférieur ">=" & nFiltre pour supérieur ou égal ">" & nFiltre pour strictement supérieur
ou alors, si tu veux plus de souplesse, tu inscris ton critère de recherche directement dans ta cellule du style : <58
Hervé.
"news microsoft.com" a écrit dans le message de news:
Bonjour,
J'utilise une fonction pour filtrer (filtre automatique) à partir de la cellule K5 (date):
Dim nFiltre As String nFiltre = Worksheets("saisie").Range("k5").Value Range("j7").Select Selection.AutoFilter Field:, Criteria1:=nFiltre, Operator:=xlOr _ , Criteria2:="="
Cette fonction Criteria1:=nFiltre fonctionne. Je souhaite avoir <nFiltre, et là ça ne marche pas ! !!! malgrés de multiples tentatives d'adaptation du code...