Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1839 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Macro Excel -> Suppression de Lignes

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] Macro Excel -> Suppression de Lignes

n°1113926
Oizo10
uh?
Posté le 09-06-2005 à 13:53:14  profilanswer
 

Bonjour à tous
 
Je travaille actuellement sur une feuille Excel qui sert à une déclaration de TVA.
Le principe même de la TVA est que le nombre de lignes est toujours différent à chaque mois. Aussi, j'ai recopié certaines formules de retraitement sur environ 1000 lignes afin de bien prendre en compte toutes les lignes.
 
Cependant le logiciel qui importe la feuille Excel a un "petit" problème, Excel aussi d'ailleurs.
Malgré une macro ne recopiant que les valeurs (et non les formules), Excel garde environ 200 ou 300 lignes vides (pas de formule, pas de valeurs) mais impossible de supprimer ces lignes. Lors de l'importation vers le logiciel, celui-ci détecte (à tort) des lignes en trop et importe des données vides également.
 
J'ai testé plusieurs scripts VBA pour supprimer les lignes vides à partir de la première ligne "vide" mais pas possible. J'ai des lignes en trop.
 
Quelqu'un a une idée ?
 
Ci joint, le code utilisé pour enlever les lignes vides, qui ne marche pas dans mon cas.
 
Sub Coupe_Ligne()
   
   
nbligne = ActiveSheet.UsedRange.Rows.Count
    nbligne = nbligne + ActiveSheet.UsedRange.Row - 1
    Application.ScreenUpdating = False 'Supprime les lignes vides
For i = nbligne To 1 Step -1
    If Application.WorksheetFunction.CountA(Rows(i)) = 0 Then Rows(i).Delete
Next i
   
End Sub
 
Merci !
 
Oizo


Message édité par Oizo10 le 09-06-2005 à 13:58:06
mood
Publicité
Posté le 09-06-2005 à 13:53:14  profilanswer
 

n°1114062
fusion_sad​am
:D
Posté le 09-06-2005 à 14:45:20  profilanswer
 

tu peux être un poil plus précis sur le "Ca marche pas"
 
parce que chez moi ca marche trés bien !!

n°1114108
Oizo10
uh?
Posté le 09-06-2005 à 15:07:16  profilanswer
 

disons que le script marche en règle générale mais pas sur ma feuille.
 
anyway, j'ai contourné le problème en détectant les lignes où il y avait effectivement une valeur et en copiant toutes ces lignes dans uen autre feuille.
 
Merci

n°1114121
fusion_sad​am
:D
Posté le 09-06-2005 à 15:14:08  profilanswer
 

... bah de rien  :)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [VBA] Macro Excel -> Suppression de Lignes

 

Sujets relatifs
justification d'un fichier qui existe deja!! VBALien VBA - VBS ?
[VBA] Microsoft Excel dans les connerieCompte les lignes de code ?
importer des noms contenu dans un fichier excel dans outlook[Résolu] Désactiver la notification d'exécution de requête SQL
[VBA Excel] lookIn peut-il être une variable ?vaut il mieux 200 000 lignes en une table ou 50 tables de400 lignes ?
Plus de sujets relatifs à : [VBA] Macro Excel -> Suppression de Lignes


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR