Suppression ligne vide

[Electron70]

Bonjour à toutes & à tous,
Je dois importer des données d'un fichier texte vers un tableur. Jusque là, pas de problème, sauf que des lignes vides apparaissent. Comment faire pour que, à l'ouverture du fichier excell, il n'y ai pas de lignes vides intercalées entre mes lignes de données?

 

[Staple1600]

Re : Suppression ligne vide

Bonsoir

Regardes tout en bas de cette page, les cinq liens pointant vers des discussions similaires à ta question.

 

[Electron70]

Re : Suppression ligne vide

Bonjour,
Je pense que je n'ai pas du donner les bonnes infos car aucune des commandes ne fonctionnent🙄.
Les lignes ne sont pas tout à fait vides; elles contiennent toutes une formule qui affiche un résultat vide (ex: =si(A1=2;"";"ok").
J'aimerais donc que chaque ligne où le résultat est "" soit effacées.
Merci d'avance!

 

[Staple1600]

Re : Suppression ligne vide

Bonsoir Electron70

Utilises sur le Filtre Automatique : critère : <>"ok"
puis supprime alors les lignes qui s'afficheront.

Il serait plus simple de t'aider avec un petit fichier exemple 😉

 

[Electron70]

Re : Suppression ligne vide

Bonjour staple1600, envoyé des dieux,
En fait je viens d'en trouver une :
Option Explicit

Sub SuppressionLignes()
Dim NumCol As Byte
Dim NumLig As Integer, i As Integer

NumCol = ActiveCell.Column
NumLig = Range(Cells(65536, NumCol).Address).End(xlUp).Row

Application.ScreenUpdating = False
For i = NumLig To 1 Step -1
If Cells(i, NumCol) = "" Then Rows(i).Delete
Next i
Application.ScreenUpdating = True

End Sub

Mon soucis maintenant est de lea mettre en exécution automatique à l'ouverture du document. Comment faire? Et où pourrais-je trouver des infos, ou des cours, sur les macros et son langage?

Et un grand merci pour ton aide !