XL 2019 Boucle - Concatener deux colonnes VBA

RCAVBA · 3 Août 2022

Bonjour
Je souhaite concaténer deux colonnes jusqu'à la dernière ligne via macro VBA
Merci

M12 · 3 Août 2022

Bonjour
Quelles colonnes ?
Les colonnes ont-elles les mêmes cellules remplies ?
Avec des lignes vides ou sans ?
Avec quel séparateur ?

Bref, rien de concret 😳

RCAVBA · 3 Août 2022

Colonnes D, E et F.
Sans lignes vides
Espace comme séparateur

Merci

M12 · 3 Août 2022

Re,

VB:

Sub Concat()
  Dim i%,  Dl%
  Dim Ws As Worksheet
  Set Ws = ActiveSheet
  Dl = Ws.Range("D" & Rows.Count).End(xlUp).Row
  For i = 1 To Dl
    Ws.Cells(i, "G").Value = Ws.Cells(i, "D").Value & " " & Ws.Cells(i, "E").Value & " " & Ws.Cells(i, "F").Value
  Next i
End Sub

XL 2019 Boucle - Concatener deux colonnes VBA

RCAVBA

Guest

M12

XLDnaute Accro

RCAVBA

Guest

M12

XLDnaute Accro

Discussions similaires

XL 2019 Boucle - Concatener deux colonnes VBA

RCAVBA

Guest

M12

XLDnaute Accro

RCAVBA

Guest

M12

XLDnaute Accro

Discussions similaires

Privacy & Transparency

Privacy & Transparency