Forum di Excel e VBA, per condividere esperienze e risolvere problemi su:
Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
Concatenare intere colonne
- Hai un problema con Excel?
Concatenare intere colonne
di Ivan data: 23/09/2015 17:13:02
Ciao a tutti dovrei concatenare il valore di alcune celle in una, lavorando per intere colonne,
tutti i valori che ci sono nelle colonna D e E devo concatenarli nella colonna F.
Grazie
Ciao
Ivan
di alfrimpa data: 23/09/2015 18:01:55
Ciao Ivan
Non so se ho capito bene ma prova con questa function da inserire in un modulo standard.
Se i valori sono DA D1 a D4 metti la formula in F1
=mioconcatena(D1:D4) ed in F1 vedrai i quattro valori concatenati.
Alfredo
Function mioconcatena(a As Range) Dim cella As Range Dim conc As String For Each cella In a conc = conc & " " & cella.Value Next mioconcatena = conc End Function
di Marius44 data: 23/09/2015 18:08:31
Ciao Ivan
Nel presupposto che la colonna più lunga sia la "D" inserisci il codice sottostante un una macro.
Prova e fammi sapere. Ciao,
Mario
rg = ActiveSheet.Cells(Rows.Count, 4).End(xlUp).Row 'il 4 sta per col. D For i = 1 To rg Range("F" & i).Value = Range("D" & i).Value & " " & Range("E" & i).Value Next
di Ivan data: 24/09/2015 17:08:29
Grazie mille, funziona alla grande.
- Vuoi Approfondire?
