Supression d'une ligne si deux collonne vide

Bonjour,

Tout d'abord il faut savoir que je suis sincèrement désolé si ce thème à déjà été répondu x fois je vous l'accorde, j'ai tout de même cherché et j'ai trouvé des post avec réponse... Le réal problème est que je ne comprend rien à ecxel.

J'ai vraiment hésiter a venir vous déranger pour cela .., mais je tente ma chance...

J'aimerai savoir Comment je peux intégrer une formule dans l'ecxel ( 2003) ? ( je ne sais même pas comment faire ...)

Et voici le ce qui parait le plus stupide des problèmes, mais qui me fait galérer ...

j'ai un simple tableau avec des colonnes qui vont de A a H et puis 8500 lignes.

dans ce tableau j'aimerai faire en sorte que la ligne disparaisse si la colonne E et F son vide quoi que les autres cellules possède.

je vous remercie de votre aide et je suis encore désolé.

Tiago.

Bonjour et bienvenue,

Une petite macro devrait faire cela facilement,

Envoie la feuille avec sa structure réelle (pas besoin de toutes les lignes)

pour être sûr d'avoir compris, colore en jaune les lignes à supprimer.

Amicalement

Claude

Bonjour,

Sans voir exactment le fichier code à essayer et à placer en VBE

Sub test()
'Macro Dan le 16/05/11
Dim dlg As Integer
With ActiveSheet
dlg = .Cells.Find("*", LookIn:=xlValues, SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
For dlg = .Range("E" & Rows.Count).End(xlUp).Row To 1 Step -1
    If .Range("E" & dlg) = "" And .Range("F" & dlg) = "" Then .Rows(dlg).Delete
Next
End With
End Sub

Amicalement

re, salut Dan,

Solution filtre, à adapter au fichier

(évite de boucler sur 8500 lignes)

Sub SupprLignes()
Dim Lg%
    Lg = Range("a65536").End(xlUp).Row
    '-- filtre --
    Range("k2") = "=AND(e3="""",f3="""")"
    Range("a2:h" & Lg).AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Range("k1:k2"), Unique:=False
    '-- supprime lignes --
    On Error Resume Next
    Range("a3:a" & Lg).SpecialCells(xlCellTypeVisible).EntireRow.Delete
    ActiveSheet.ShowAllData
    Range("k2").ClearContents
End Sub

Amicalement

Claude

Re,

Je vous remercie pour vos formules, mais comment puis intégrer ces formules dans une feuille ecxel ?

Merci bien .

re,

C'est pas des formules, mais du code VBA

touches Alt+F11 pour voir le code

Claude

Re,

Merci beaucoup =D !

Cela fonctionne, même si j'ai un peu pataugé pour trouver comment lancer la formule pour mon Excel.

( vous m'avez sauvé T_T )

( il est possible de définir les colonnes qui doivent influencer la suppression des lignes ? )

Merci et à une prochaine fois.