Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro suprimant automatiquement des lignes vides

N

Nikom

Guest
Bonjour à tous et à toutes.

J'utilise un modele dans lequel figure un tableau.
Je souhaite suprimer les lignes vides dans ce tableau.

je sais que ce theme a déja été abordé dans le forum, et c'est la base de ma réflexion
cependant, la formule que j'utilise suprime les cellules vides et non les cellules avec une fontion (=""),

Voici la macro:


Sub Suprligne()
'
'

Sheets("feuil2").Range("B2:B8").SpecialCells xlCellTypeBlanks).EntireRow.Delete


'
End Sub



Je pense que c'est le "xlCellTypeBlanks" qui ne va pas, mais je ne vois pas quoi mettre à la place




merci de votre aide

Nikom
 
N

Nikom

Guest
re bonjour,


ci joint, le fichier exemlpe en question

merci
 

Pièces jointes

  • exemple1.zip
    7.9 KB · Affichages: 25
  • exemple1.zip
    7.9 KB · Affichages: 21
  • exemple1.zip
    7.9 KB · Affichages: 23
F

Franck

Guest
Bonjour,


POur corriger le problème de ce type, on peut utiliser en VBA la fonction isempty

Exemple :

sub aaa()


for i = 1 to [A1].rows.count

if isempty(cells(i,1)) then

entirerow(i).delete

end if
next i

cela devrait marcher en théorie...

Isempty(objet) permet de s'affranchir des formules présentes dans les cases ou des blancs types " ".

Cordialement

F.L
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…