Macro supprimer ligne excel si somme de 2 cases = 0

Pitivier · 30 Novembre 2015

Bonjour,

Novice en vba, j'aimerais intégrer des écritures comptables sur ciel compta.

Le problème est que c'est que les lignes qui sont égales à 0 ne veulent pas s'interfacer.

Disons que sur la ligne 4, en d4 et en e4, la somme des 2 Fait 0?

Comment supprimer cette ligne en faisant une macro en vba?

Merci d'avance.

JCGL · 5 Décembre 2015

Re : Macro supprimer ligne excel si somme de 2 cases = 0

Bonjour à tous,

Bienvenue sur XLD

Peux-tu essayer avec ceci :

VB:

Option Explicit

Sub Del_Lig()
Dim DerL&, Lig&
DerL = Feuil1.Range("D" & Rows.Count).End(xlUp).Row
For Lig = 2 To DerL
With Feuil1
If WorksheetFunction.Sum(.Range("D" & Lig), .Range("E" & Lig)) = 0 Then Rows(Lig).EntireRow.Delete
End With
Next Lig
End Sub

A+ à tous

Macro supprimer ligne excel si somme de 2 cases = 0

Pitivier

Guest

JCGL

XLDnaute Barbatruc

Discussions similaires

Macro supprimer ligne excel si somme de 2 cases = 0

Pitivier

Guest

JCGL

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency