Partager via

Nettoyer une feuille Excel

Anonyme
2022-12-06T10:31:13+00:00

Bonjour

J'ai une feuille avec beaucoup de ligne que je récupère d'un ERP et je me retrouve avec un certain nombre de cellules parasites en fond de feuille.

A-t-on une solution en VBA pour nettoyer ma feuille ?

Cordialement

Thierry

Microsoft 365 et Office | Excel | Pour le business | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire
{count} votes
Réponse acceptée par l’auteur de la question
  1. Anonyme
    2022-12-06T13:27:48+00:00

    Que faut-il comprendre ? Y aurait-il plusieurs lignes inutiles à supprimer ? Que se passe-t-il exactement, qu'observes-tu ?

    Les réponses du type "ça ne marche pas" n'apportent pas beaucoup d'information et ne permettent pas d'avancer beaucoup, hélas...

    NB : selon le cas de figure, il te faut peut-être compléter l'instruction comme suit :

    ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).EntireRow.Delete

    1 personne a trouvé cette réponse utile.
    0 commentaires Aucun commentaire

7 réponses supplémentaires

  1. Anonyme
    2022-12-06T12:45:56+00:00

    Non, ça change à chaque importation et quand je lance l'instruction que vous indiquez pour trouver la dernière cellule utilisée en VBA, ça me donne 1387 sur la colonne "T" ce qui correspond à la dernière valeur de cette colonne.

    Mais quand je fais : Ligne = Selection.SpecialCells(xlCellTypeLastCell).Row ça me donne Ligne=21925. Ce qui correspond à mon ascenseur en bas...

    0 commentaires Aucun commentaire
  2. Anonyme
    2022-12-06T12:12:13+00:00

    Certes, mais est-ce toujours la ligne 21295 ? Y a-t-il toujours 1900 lignes "utiles" dans l'importation ? Est-ce que c'est toujours une seule ligne, toujours la même qui revient au fin fond de la feuille ? On pourrait alors la trouver en remontant à partir de la dernière ligne (la 1048576e) avec une instruction du genre :

    Range("A1048576").End(xlUp).Select

    Bref, beaucoup de points demandent des précisions... 😉

    0 commentaires Aucun commentaire
  3. Anonyme
    2022-12-06T12:02:31+00:00

    Bonjour Aliboron

    Elles se situent au fin fond de ma feuille ligne 21925 pour un fichier de 1900 lignes...

    Cordialement

    Thierry

    0 commentaires Aucun commentaire
  4. Anonyme
    2022-12-06T11:21:38+00:00

    Qu'est-ce qui distingue ces "cellules parasites" du reste (emplacement, type de données,...) ?

    0 commentaires Aucun commentaire