XL 2016 concatenation caracteres colonne tableau

finarobert

XLDnaute Nouveau
Supporter XLD
bonjour
je possede des tableaux de 2 colonnes avec entre 3000 et 6000 lignes. Dans la première colonne, chaque cellule a un ou deux caractères. Je cherche une macro qui pourrait me concatener tous les caractères de cette première colonne dans une cellule. Macro qui pourrait servir pour tout tableau de longueur différente (dernière cellule non vide de la colonne?)
merci à vous !
 

job75

XLDnaute Barbatruc
Bonsoir finarobert,

Voyez le fichier joint et cette fonction VBA :
VB:
Function ConcatColonne(col As Range) As String
Set col = Intersect(col, col.Parent.UsedRange)
If Not col Is Nothing Then ConcatColonne = Join(Application.Transpose(col), "")
End Function
Bonne nuit.
 

Pièces jointes

  • ConcatColonne.xlsm
    15 KB · Affichages: 8

Discussions similaires

Réponses
3
Affichages
354

Statistiques des forums

Discussions
313 296
Messages
2 096 919
Membres
106 786
dernier inscrit
Mgordat