consolidation de data

Le
bastientot
BOnjour,

voila dans un onglet 'M-1" j'ai en colonne :
A ==> un nom d'application
B ==> un metier
C ==> une durée sous le format nombre
D ==> une durée au format hh:mm
E ==> une autre durée au format hh: mm
F ==> un chiffre 1 2 4 ou 8

et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
les lignes ( tous les colonnes) ou l'information en colonne D est
different de 00:00

Merci de votre aide.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
isabelle
Le #19230531
bonjour ,

With Sheets("M-1").Range("A1")
If .AutoFilter Then
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
Else
.AutoFilter
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
End If
End With

.CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets("recap").Range("A" &
Sheets("recap").Range("A65536").End(xlUp).Row + 1)

isabelle

a écrit :
BOnjour,

voila dans un onglet 'M-1" j'ai en colonne :
A ==> un nom d'application
B ==> un metier
C ==> une durée sous le format nombre
D ==> une durée au format hh:mm
E ==> une autre durée au format hh: mm
F ==> un chiffre 1 2 4 ou 8

et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
les lignes ( tous les colonnes) ou l'information en colonne D est
different de 00:00

Merci de votre aide.



bastientot
Le #19230791
Bonjour & merci,

merci mais j'ai une erreur en executant éréference incorect ou non
qualifiée sur la ligne ".CurrentRegion.SpecialCells"

une idée


On 30 avr, 16:04, isabelle wrote:
bonjour ,

With Sheets("M-1").Range("A1")
If .AutoFilter Then
    .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
Else
    .AutoFilter
    .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
End If
End With

.CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets("recap").Range("A" &
Sheets("recap").Range("A65536").End(xlUp).Row + 1)

isabelle

a écrit :



> BOnjour,

> voila dans un onglet 'M-1" j'ai en colonne :
> A ==> un nom d'application
> B ==> un metier
> C ==> une durée sous le format nombre
> D ==> une durée au format hh:mm
> E ==> une autre durée au format hh: mm
> F ==> un chiffre 1 2 4 ou 8

> et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
> les lignes ( tous les colonnes) ou l'information en colonne D est
> different de 00:00

> Merci de votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


bastientot
Le #19230771
alors la j'ai vraiment du mal avec les filtres elaborés..
je vaias voir comment faire .

et merci


On 30 avr, 16:04, "MichDenis"
Bonjour Bastien,

Tu peux le faire en utilisant un filtre élaboré.

zone de critère : (exemple)
H1 : totalement vide
H2 : la formule :   Ò<>0
D2 représente la première ligne de tes données
D1 étant l'étiquette de colonne.

Si tu veux obtenir le résultat sur une autre feuille, avant
d'appeler la commande "filtre élaboré", tu dois sélectionner
la feuille "Résultats" et appeler cette commande à partir de là.

BOnjour,

voila dans un onglet 'M-1" j'ai en colonne :
A ==> un nom d'application
B ==> un metier
C ==> une durée sous le format nombre
D ==> une durée au format hh:mm
E ==> une autre durée au format hh: mm
F ==> un chiffre 1 2 4 ou 8

et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
les lignes ( tous les colonnes) ou l'information en colonne D est
different de 00:00

Merci de votre aide.


isabelle
Le #19230881
desolé bastientot, le End With n'était pas à la bonne place,

With Sheets("M-1").Range("A1")
If .AutoFilter Then
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
Else
.AutoFilter
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
End If
.CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets("recap").Range("A" &
Sheets("recap").Range("A65536").End(xlUp).Row + 1)
End With

isabelle

a écrit :
Bonjour & merci,

merci mais j'ai une erreur en executant éréference incorect ou non
qualifiée sur la ligne ".CurrentRegion.SpecialCells"

une idée


On 30 avr, 16:04, isabelle wrote:

bonjour ,

With Sheets("M-1").Range("A1")
If .AutoFilter Then
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
Else
.AutoFilter
.AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
End If
End With

.CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets("recap").Range("A" &
Sheets("recap").Range("A65536").End(xlUp).Row + 1)

isabelle

a écrit :




BOnjour,

voila dans un onglet 'M-1" j'ai en colonne :
A ==> un nom d'application
B ==> un metier
C ==> une durée sous le format nombre
D ==> une durée au format hh:mm
E ==> une autre durée au format hh: mm
F ==> un chiffre 1 2 4 ou 8

et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
les lignes ( tous les colonnes) ou l'information en colonne D est
different de 00:00

Merci de votre aide.- Masquer le texte des messages précédents -



- Afficher le texte des messages précédents -







bastientot
Le #19230861
Grand Merci Isabelle et passe un bon week end.



On 30 avr, 16:51, isabelle wrote:
desolé bastientot, le End With n'était pas à la bonne place,

With Sheets("M-1").Range("A1")
If .AutoFilter Then
   .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
Else
   .AutoFilter
   .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xlAnd
End If
.CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
Sheets("recap").Range("A" &
Sheets("recap").Range("A65536").End(xlUp).Row + 1)
End With

isabelle

a écrit :



> Bonjour & merci,

> merci mais j'ai une erreur en executant éréference incorect ou non
> qualifiée sur la ligne ".CurrentRegion.SpecialCells"

> une idée

> On 30 avr, 16:04, isabelle wrote:

>> bonjour ,

>> With Sheets("M-1").Range("A1")
>> If .AutoFilter Then
>>     .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xl And
>> Else
>>     .AutoFilter
>>     .AutoFilter Field:=4, Criteria1:="<>00:00", Operator:=xl And
>> End If
>> End With

>> .CurrentRegion.SpecialCells(xlCellTypeVisible).Copy
>> Sheets("recap").Range("A" &
>> Sheets("recap").Range("A65536").End(xlUp).Row + 1)

>> isabelle

>> a écrit :

>>> BOnjour,

>>> voila dans un onglet 'M-1" j'ai en colonne :
>>> A ==> un nom d'application
>>> B ==> un metier
>>> C ==> une durée sous le format nombre
>>> D ==> une durée au format hh:mm
>>> E ==> une autre durée au format hh: mm
>>> F ==> un chiffre 1 2 4 ou 8

>>> et j'aimerais avoir dans le meme classeur dans l'onglet "recap" juste
>>> les lignes ( tous les colonnes) ou l'information en colonne D est
>>> different de 00:00

>>> Merci de votre aide.- Masquer le texte des messages précédents -

>> - Afficher le texte des messages précédents -- Masquer le texte de s messages précédents -

- Afficher le texte des messages précédents -


Publicité
Poster une réponse
Anonyme