XL 2013 [Résolu]Liste info d'une colonne sans vide

guillaum

XLDnaute Junior
Bonjour tout le monde,

Je cherche à lister les données contenues dans une colonne pour les lister sans vide dans la colonne suivante.
Je passe par une macro et les info dans la colonne sont issues d'une formule excel (concatener).
Je pense que le problème peut venir de la mais je ne suis pas sur!

Je joins mon exemple pour que cela soit plus clair.

Merci par avance pour votre aide qui alimentera mes connaissances (petites)!

Guillaume
 

Pièces jointes

  • trav1EC.xlsm
    18.8 KB · Affichages: 29

pierrejean

XLDnaute Barbatruc
Bonjour guillaum

Ceci devrait être plus efficace

Code:
Sub SansVide()
Worksheets("récap").Range("E2:E13").ClearContents
    For Each c In Range("D2:D13")
        If c.Value <> "" Then
            lgn = Range("E2" & 65536).End(xlUp)(2).Row        
           Range("E" & lgn) = c.Value
        End If
    Next c
End Sub
 
Dernière édition:

Discussions similaires