Supprimer lignes

Bonne année à toutes & tous et particuliérement a Jacky 67,

mon blème:
comment faire pour suprimer des LIGNES contenant des heures et des minutes quand les heures ne sont pas 00h00'00'' ou 1h00'00'' et ainsi
de suite
a
1:00 OK
1:15 supprimer la ligne !!!

@+

Salut Jean-Michel, merci et bonne année 2008 à toi.

Concernant ton problème de suppression de ligne, tu dois pouvoir passer par une petite macro.

salut Jaky:
je te pris de m'excuser mais tu dois surement penser que je suis un peut limité ce qui est surement vrai mais avec une MACRO je ne vois pas comment je pourrais faire,car vois tu c'est des 100 de lignes que j'aimerais supprimer dans différente feuilles et différent classeur toujours mes relevés météo.
toujours de 15 minutes en 15 minutes !!!!

Bonne soirée et @+
Jean-Michel

Bonjour,

Je pars du principe que tu appliques cette action sur la colonne A que tu as créé grâce à Jacky67 et qui n'affiche que les heures au format 00:00 et pas la date.

Le plus rapide est certainement de faire un filtre automatique personnalisé puis un copier/coller.

1- Se positionner dans le tableau, Données - Filtrer > Filtre automatique.
Dans la liste déroulante des heures en colonne "A" sélectionner (Personnalisé...) puis choisir Différent de 00:00:00 ET Différent de 01:00:00 puis valider.
Ensuite sélectionner le tableau, copier et le coller sur une autre feuille.

Ca convient ?

A+

Tu peux essayer cette macro à placer dans un module et à appeler par un bouton.

Code:

Sub Reduction()
Dim LigneDebut As Double
Dim ColonneDebut As Integer
Dim Rang As Double

LigneDebut = 1
ColonneDebut = 2

Rang = LigneDebut
While Cells(Rang, ColonneDebut) <> ""
    If Minute(Cells(Rang, ColonneDebut)) <> 0 Then
        Rows(Rang).Delete Shift:=xlUp
    End If
    Rang = Rang + 1
Wend

End Sub

A toi de mettre dans la variable LigneDebut, placée au début de la macro, la bonne valeur pour la première ligne à tester.
Ici j'ai mis la valeur 1 pour tester à partir de la première ligne de la feuille.
Tu dois aussi mettre dans la variable ColonneDebut, placée au début de la macro, la bonne valeur pour la colonne à tester.
Ici j'ai mis la valeur 2 pour tester la colonne B de la feuille.

La macro teste donc les cellules de la colonne B à partir de la première ligne de la feuille, et déscend d'une ligne jusqu'à rencontrer une cellule vide.
Si la cellule testée contient une "date" dont le nombre de minutes n'est pas égal à "00", alors la ligne entière est supprimée.


ATTENTION :
Ne travaille pas directement sur ton fichier !!!
Commence par créer une copie et travaille sur la copie.



Salut Dachevid,
Bonne année 2008 !!

dachevid a écrit:

Je pars du principe que tu appliques cette action sur la colonne A que tu as créé grâce à Jacky67 et qui n'affiche que les heures au format 00:00 et pas la date.

En colonne A il ne reste normalement que la date qui est inscrite uniquement une fois par jour, à minuit. L'heure y sera donc toujours égale à "00:00:00".

Peut-être (je ne connais pas du tout les filtres automatiques) que le principe est en revanche applicable à la colonne B ?

Salut Jacky et bonne année à toi aussi,

Jacky67 a écrit:

En colonne A il ne reste normalement que la date qui est inscrite uniquement une fois par jour, à minuit. L'heure y sera donc toujours égale à "00:00:00".

Peut-être (je ne connais pas du tout les filtres automatiques) que le principe est en revanche applicable à la colonne B ?

D'après ce que je me souviens du 1er problème ça ne devrait pas marcher car la colonne B contient des dates, j'ai essayé chez moi, l'heure 0:00:00 vaut 0 mais le 06-01-2008 0:00:00 vaut 39453, l'idéal serait de pouvoir tester si on tombe sur un nombre entier (c'est le cas à minuit) ou un nombre décimal, c'est ce que je voulais faire dans le 1er problème mais tu m'avais devancé moi j'allais proposer =SI(ET(B1<>"";ENT(B1)=B1);B1;"").

L'idéal c'est ta macro car Jean-Michel a indiqué qu'il avait plusieurs feuilles.

A+