Supprimer ligne a zero

Bonjour,

je recherche a supprimer les lignes dont la colonne "R" de le feuille " Balance AG "à zéro

par un bouton, car je doit importer la Balance AG sur les colonnes A à O

Merci de votre aide et bonne journée

KissCool

Bonjour Kisscool, bonjour le forum,

Essaie comme ça :

Sub Macro2()
Dim O As Worksheet 'déclare la variable O (Onglet)
Dim DL As Long 'déclare la variable DL (dernière Ligne)
Dim TV As Variant 'déclare la variable TV (Tableau des Valeurs)
Dim PL As Range 'déclare la variable PL (PLage)

Set O = Worksheets("Balance AG") 'définit l'onglet O
DL = O.Range("A4").End(xlDown).Row 'définit la dernière ligne édité  DL de la colonne A de l'onglet O
TV = O.Range(O.Cells(1, 18), O.Cells(DL, 18)) 'définit le tableau des valeurs TV
Set PL = O.Range("A1") 'initialise la plage PL
For I = 5 To DL 'boucle sur toutes les lignes I du tableau des valeurs TV (en partant de la cinquième)
    'si la donnée en ligne I de TV est nulle, redéfinit la plage PL
    If TV(I, 1) = 0 Then Set PL = IIf(PL.Cells.Count = 1, O.Rows(I), Application.Union(PL, O.Rows(I)))
Next I 'prochaine ligne de la boucle
PL.Delete 'supprime la plage PL
End Sub

bonjour

salut ThauThème

je travaille souvent avec des extractions de progiciels (GPAO et compta)

la balance âgée est à chaque fois réexportée "à neuf", c'est à dire qu'on n'a pas besoin de conserver les données qu'on avait la fois précédente. Que la colonne R soit à zéro ou non.

on écrase TOUTE la zone d'export à chaque nouvelle exportation.

quel progiciel permet de faire comme tu fais ?

ça m'intéresserait pour d'autres raisons.

merci

Merci ThauThème

mais n’étant pas un Expert mais plus un novice en Macro,

je copie ton code dans l'onglet "Balance AG" (coté VBA Projet)

et ..... rien ne ce passe .

Je pense qu'il me manque une étape a mes connaissance

Merci de ton aide

bonne journée

KissCool

J'ai créé un bouton et affecté la Macro

mais j'ai ce message : Incompatible de type

et là .... moi je sèche

Merci de ton aide

KissCool

Re,

Un message correspond à une ligne qui plante et qui est surlignée de jaune. Quelle est celle ligne ?

Re,

et bien, je ne vois aucune ligne en jaune, ni sur l'écran VBA ni dans l'Excel

KissCool

Re,

Pourrais-tu me renvoyer le fichier, on perdrait moins de temps...

Jmd t'as posé une question j'ai l'impression que tu ne l'as pas vue...

Le voici

D'avance merci

KissCool

Re,

Ton second fichier n'a rien à voir avec le premier (où la colonne A ne comportait pas de cellules vides). Ton code n'est pas placé au bon endroit. Toutefois tel que je te l'avais donné il ne fonctionnait pas.

Il faut que tu prennes pour habitude de fournir un fichier qui corresponde exactement à tes besoins...

En pièce jointe le fichier modifié :

ThauThème a écrit :

Re,

Jmd t'as posé une question j'ai l'impression que tu ne l'as pas vue...

eh non il ne l'a pas vue

Un GRAND merci ThauThème pour ton aide et tes réponses rapide

je te souhaite une Belle journée

KissCool