supprimer des cases vides !
#1
Débutant XLPages

Inscription: 31/07/2011

Messages: 11

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 19-09-2011 15h57
bonjour forum, 
j'aimerais améliorer une macro que j'ai confectionnée et qui ne marche pas très bien... Elle sert à supprimer des cases vides dans un tableau où il peut y en avoir une flopée. 

Je suis sûr que vous allez me trouver une méthode plus élégante et surtout plus efficace, parce que j'ai beau faire répéter la boucle, il en reste toujours et je dois relancer cette macro... Sans compter que c'est long. Voici la macro :
Sub supprcasesvides ()
For i = 1 To 8
Application.ScreenUpdating = False
  For Each Cell In Selection
  If Cell.Value = "" Then
  Cell.Select
Selection.Delete Shift:=xlToLeft
End If
 Next Cell
 Next i
   Application.ScreenUpdating = True
End Sub
Hors Ligne
Rapport   Haut 

Re: supprimer des cases vides !
#2
Webmestre

Inscription: 18/05/2006
De Saône-et-Loire (71)

Messages: 1539

Système d'exploitation:
PC
Version Excel utilisée:
97, 2000, 2002, 2003, 2007, 2010, 2013, 2016 et 365
Posté le : 19-09-2011 20h44
Bonsoir xav,

Pas sûr d'avoir bien cerné la situation (pas compris notamment la boucle i), mais à tout hasard et si je me base sur le code fourni, peut-être peux-tu tenter un essai avec celui-ci à la place (une ligne pour remplacer l'ensemble) :
Sub mDF_SupprCasesVides()
    Selection.SpecialCells(xlCellTypeBlanks).Delete Shift:=xlToLeft
End Sub

Cordialement,

Didier_mDF
Image redimensionnée
Le Webmaster

La réponse vous satisfait ? Merci de revenir solder le sujet en [résolu], voir ce lien
Hors Ligne
Rapport   Haut 

Re: supprimer des cases vides !
#3
Débutant XLPages

Inscription: 31/07/2011

Messages: 11

Système d'exploitation:
PC
Version Excel utilisée:
2007
Posté le : 21-09-2011 09h59
parfait parfait ! j'ignorais l'existence de cette fonction, comme tout bon 
newbie qui se respecte. 

meeerci :)
Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes