Witam, w jaki sposób połączyć dane z 3 kolumn z jednego skoroszytu i przypisanie do drugiego skoroszytu, łączyłem za pomocą funkcji "ZŁĄCZ.TEKSTY" i działa ok w miarę, tylko łączy w jeden ciąg i nie wiem jak to przerobić, aby działało w petli, czyli w zależności ile wierszy w skoroszycie A tyle połączonych w skoroszycie B.
W zależności od ilości danych w arkuszu 1.
Łączenie ale tylko dla 1 przypadku :
Sub Przycisk3_Kliknięcie()
'
' Przycisk3_Kliknięcie Makro
'
'
Sheets("Arkusz2").Select
Range("A6").Select
Sheets("Arkusz1").Select
Range("A8").Select
Sheets("Arkusz2").Select
ActiveCell.FormulaR1C1 = _
"=CONCATENATE(Arkusz1!R[2]C,Arkusz1!R[2]C[1],Arkusz1!R[2]C[2])"
Sheets("Arkusz1").Select
End Sub