XL 2013 Supprimer des lignes en fonction d'une formule

DoubleZero

XLDnaute Barbatruc

• 24 Novembre 2015

• #2

Re : Supprimer des lignes en fonction d'une formule

Bonjour, sr94, le Forum,

Où "qu'elle est", la colonne ?

Où "qu'il est", le tableau ?

Où "qu'il est", le fichier ?

A bientôt 🙂

 

Vote positif 0 Vote négatif

S

sr94

XLDnaute Occasionnel

• 24 Novembre 2015

• #3

Re : Supprimer des lignes en fonction d'une formule

pardon ? je ne comprends pas ...

 

Vote positif 0 Vote négatif

S

st007

XLDnaute Barbatruc

• 24 Novembre 2015

• #4

Re : Supprimer des lignes en fonction d'une formule

Bonjour

Un peu de lecture :
https://www.excel-downloads.com/threads/masquer-ligne-dont-cellule-b-0.20003104/

pour une question similaire hormis le fait que dans son cas, la colonne B prenais la valeur zéro
ici, le .value sera "statut 45"

bon appétit bien sure.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 24 Novembre 2015

• #5

Re : Supprimer des lignes en fonction d'une formule

Re-bonjour,

sr94 à dit:

pardon ? je ne comprends pas ...

Cliquez pour agrandir...

Serai-je capable de proposer une solution avec des données et fichiers précis ? Je ne le sais pas.

J'ai la certitude, en revanche, de ne savoir émettre une suggestion sans support concret.

A bientôt 🙂

 

Vote positif 0 Vote négatif

BigDaddy154

XLDnaute Junior

• 24 Novembre 2015

• #6

Re : Supprimer des lignes en fonction d'une formule

Bonjour je kiff et je suis d'accord 😉

Bonjour, sr94, le Forum,

Où "qu'elle est", la colonne ?

Où "qu'il est", le tableau ?

Où "qu'il est", le fichier ?

A bientôt

Cliquez pour agrandir...

Cordialement

 

Vote positif 0 Vote négatif

S

sr94

XLDnaute Occasionnel

• 24 Novembre 2015

• #7

Re : Supprimer des lignes en fonction d'une formule

Merci st007 je vais voir ce que je peux faire avec les codes proposés (sachant que je ne masque pas, mais que je supprime les lignes et que je suis sur un tableau filtré=

Pour le fichier, c'est un fichier compliqué, avec des données confidentielles et qui fait référence à un autre fichier lui aussi confidentiel et qui est par ailleurs une extraction d'une base access, bref compliqué à envoyer sur un forum.

 

Vote positif 0 Vote négatif

S

st007

XLDnaute Barbatruc

• 24 Novembre 2015

• #8

Re : Supprimer des lignes en fonction d'une formule

alors
entirerow.clear et plus .hidden=true
ensuite if ...then ... laisse tomber else ...

ceci dit, doublezero malgré son pseudo est bien meilleurs que moi avec excel, et sur ce forum, l'humour est de rigueur
pour être précis : " et que il supprime " au post#1 , avec une apostrophe, s'eut été plus joli .
il est par ailleurs de coutume de fournir un bout de fichier présentant ce que tu cherches à obtenir , c'est marqué dans la charte .

😛

 

Vote positif 0 Vote négatif

S

sr94

XLDnaute Occasionnel

• 25 Novembre 2015

• #9

Re : Supprimer des lignes en fonction d'une formule

Je ne peux pas poster le fichier, il est lourd, avec des macros, liens avec d'autres fichiers etc ...

J'ai quand même réussi à faire la macro suivante qui marche, qu'en pensez vous ?

Code:

'Mettre à jour la feuille
Sheets("Suppression_Statut45").Activate
Range("Tableau_Base_de_données2.accdb3[Colonne2]").Select
Selection.ListObject.QueryTable.Refresh BackgroundQuery:=False
Sheets("Production_Schedule").Activate


'formule_
Range("AH5").FormulaR1C1 = _
        "=IF(ISERROR(VLOOKUP([@N°],'Suppression_Statut45'!C5:C8,4,FALSE)),"""",VLOOKUP([@N°],'Suppression_Statut45'!C5:C8,4,FALSE))"

'Retirer le filtre
Range("A5").AutoFilter
     
'Supprimer les lignes
On Error Resume Next
For i = [AH65000].End(xlUp).Row To 2 Step -1
    If Cells(i, 34) <> "" Then Rows(i).Delete
Next i

'Remettre le filtre
Range("A5").AutoFilter

'effacer_formule
Range("AH5", Range("AH65536").End(xlUp)).ClearContents

Merci
Sandrine

 

Vote positif 0 Vote négatif