Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee
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
Daniel.C
Bonjour. Utilise le filtre élaboré. Tu définis une zone de critères ou tu auras recopié l'entête de colonne et écrit en dessous, les unes au dessous des autres les valeurs désirées. Cordialement. Daniel "coffee" a écrit dans le message de news:
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
Bonjour.
Utilise le filtre élaboré. Tu définis une zone de critères ou tu auras
recopié l'entête de colonne et écrit en dessous, les unes au dessous des
autres les valeurs désirées.
Cordialement.
Daniel
"coffee" <coffee@discussions.microsoft.com> a écrit dans le message de news:
19AA84B5-13A8-40B9-89CF-42043355F4BF@microsoft.com...
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee
Bonjour. Utilise le filtre élaboré. Tu définis une zone de critères ou tu auras recopié l'entête de colonne et écrit en dessous, les unes au dessous des autres les valeurs désirées. Cordialement. Daniel "coffee" a écrit dans le message de news:
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
papou
Bonjour Regarde du côté du filtre élaboré.
Cordialement Pascal
"coffee" a écrit dans le message de news:
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
Bonjour
Regarde du côté du filtre élaboré.
Cordialement
Pascal
"coffee" <coffee@discussions.microsoft.com> a écrit dans le message de news:
19AA84B5-13A8-40B9-89CF-42043355F4BF@microsoft.com...
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
JB
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
http://cjoint.com/?ktmoDr6mTc
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$2" And Target.Count = 1 Then
Application.EnableEvents = False
On Error Resume Next
ActiveSheet.ShowAllData
p = Application.Match(Target, [crit], 0)
If IsError(p) Then
[D65000].End(xlUp).Offset(1, 0) = Target
Else
Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp
End If
Application.EnableEvents = True
[A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:=[crit]
End If
End Sub
JB
http://boisgontierjacques.free.fr
On 19 oct, 09:52, coffee <cof...@discussions.microsoft.com> wrote:
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
coffee
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
JB,
Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par
contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me
fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce
type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des
lignes triées mais pas dans ce cas.
encore merci, si jamais tu avais une solution.
coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
http://cjoint.com/?ktmoDr6mTc
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$2" And Target.Count = 1 Then
Application.EnableEvents = False
On Error Resume Next
ActiveSheet.ShowAllData
p = Application.Match(Target, [crit], 0)
If IsError(p) Then
[D65000].End(xlUp).Offset(1, 0) = Target
Else
Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp
End If
Application.EnableEvents = True
[A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:=[crit]
End If
End Sub
JB
http://boisgontierjacques.free.fr
On 19 oct, 09:52, coffee <cof...@discussions.microsoft.com> wrote:
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, p ar contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essa yé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles q ue: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les vale urs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonjour,
http://cjoint.com/?kylTQYsmzV
JB
On 24 oct, 10:48, coffee <cof...@discussions.microsoft.com> wrote:
JB,
Je viens d'essayer ta solution et ça marche bien et je t'en remercie, p ar
contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me
fasse automatiquement la somme des valeurs des lignes triées (j'ai essa yé ce
type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des
lignes triées mais pas dans ce cas.
encore merci, si jamais tu avais une solution.
coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
http://cjoint.com/?ktmoDr6mTc
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$2" And Target.Count = 1 Then
Application.EnableEvents = False
On Error Resume Next
ActiveSheet.ShowAllData
p = Application.Match(Target, [crit], 0)
If IsError(p) Then
[D65000].End(xlUp).Offset(1, 0) = Target
Else
Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp
End If
Application.EnableEvents = True
[A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:=[crit]
End If
End Sub
JB
http://boisgontierjacques.free.fr
On 19 oct, 09:52, coffee <cof...@discussions.microsoft.com> wrote:
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles q ue:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les vale urs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee- Masquer le texte des messages précédents -
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, p ar contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essa yé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles q ue: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les vale urs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
coffee
JB, j'ai vraiment un pb dans mon fichier que je ne comprends pas: la formule SOUS.TOTAL(9;h28:h100) (c'est la plage contenant les montants de mon fichier) ne se met pas à jour en fonction du tri: c'est toujours le total global qui s'affiche, n'importe où que je la mette ! la seule solution que j'ai trouvé c'est de recalculer par une petite macro du type: range("H101").Select (emplacement de mon total) ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-73]C:R[-1]C)" obtenu par une macro automatique et que je déclenche après chque tri. As tu une idée de la raison qui fait que le recalcul ne se fait aumatqiuement ? merci pour tes services coffee
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
JB,
j'ai vraiment un pb dans mon fichier que je ne comprends pas: la formule
SOUS.TOTAL(9;h28:h100) (c'est la plage contenant les montants de mon fichier)
ne se met pas à jour en fonction du tri: c'est toujours le total global qui
s'affiche, n'importe où que je la mette !
la seule solution que j'ai trouvé c'est de recalculer par une petite macro
du type:
range("H101").Select (emplacement de mon total)
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-73]C:R[-1]C)"
obtenu par une macro automatique et que je déclenche après chque tri.
As tu une idée de la raison qui fait que le recalcul ne se fait
aumatqiuement ?
merci pour tes services
coffee
Bonjour,
http://cjoint.com/?kylTQYsmzV
JB
On 24 oct, 10:48, coffee <cof...@discussions.microsoft.com> wrote:
JB,
Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par
contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me
fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce
type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des
lignes triées mais pas dans ce cas.
encore merci, si jamais tu avais une solution.
coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
http://cjoint.com/?ktmoDr6mTc
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$F$2" And Target.Count = 1 Then
Application.EnableEvents = False
On Error Resume Next
ActiveSheet.ShowAllData
p = Application.Match(Target, [crit], 0)
If IsError(p) Then
[D65000].End(xlUp).Offset(1, 0) = Target
Else
Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp
End If
Application.EnableEvents = True
[A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace,
CriteriaRange:=[crit]
End If
End Sub
JB
http://boisgontierjacques.free.fr
On 19 oct, 09:52, coffee <cof...@discussions.microsoft.com> wrote:
Bonjour,
J'ai une base de données avec dans une colonne des valeurs telles que:
6"
8"
10"
12"
14"
etc..
et je voudrais sélectionner par exemple les lignes portant les valeurs 6",
8", et 12"
lorsqu'on active le filtre automatique, et que l'on choisi " choix
personalisée" celui ne me propose 2 valeurs.
Il y a t'il une solution ?
je vous remercie pour votre coopération
Coffee- Masquer le texte des messages précédents -
JB, j'ai vraiment un pb dans mon fichier que je ne comprends pas: la formule SOUS.TOTAL(9;h28:h100) (c'est la plage contenant les montants de mon fichier) ne se met pas à jour en fonction du tri: c'est toujours le total global qui s'affiche, n'importe où que je la mette ! la seule solution que j'ai trouvé c'est de recalculer par une petite macro du type: range("H101").Select (emplacement de mon total) ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-73]C:R[-1]C)" obtenu par une macro automatique et que je déclenche après chque tri. As tu une idée de la raison qui fait que le recalcul ne se fait aumatqiuement ? merci pour tes services coffee
JB, Je viens d'essayer ta solution et ça marche bien et je t'en remercie, par contre je n'arrive pas à mettre, en bas d'une colonne, une formule qui me fasse automatiquement la somme des valeurs des lignes triées (j'ai essayé ce type de formule: =SOUS.TOTAL(9;H28:H100) qui d'habitude va bien pour des lignes triées mais pas dans ce cas. encore merci, si jamais tu avais une solution. coffee
Bonjour,
Choix de plusieurs codes dans un filtre du type OU
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$F$2" And Target.Count = 1 Then Application.EnableEvents = False On Error Resume Next ActiveSheet.ShowAllData p = Application.Match(Target, [crit], 0) If IsError(p) Then [D65000].End(xlUp).Offset(1, 0) = Target Else Cells(p, 4).Resize(1, 1).Delete Shift:=xlUp End If Application.EnableEvents = True [A7].CurrentRegion.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=[crit] End If End Sub
Bonjour, J'ai une base de données avec dans une colonne des valeurs telles que: 6" 8" 10" 12" 14" etc.. et je voudrais sélectionner par exemple les lignes portant les valeurs 6", 8", et 12" lorsqu'on active le filtre automatique, et que l'on choisi " choix personalisée" celui ne me propose 2 valeurs. Il y a t'il une solution ? je vous remercie pour votre coopération Coffee- Masquer le texte des messages précédents -