Macro per unire celle senza usare tab "Unisci Celle"

Question

Buongiorno,

su una stessa colonna excel ho vari nomi e cognomi 

Es.  cella A1 Mario Rossi

      cella A2 Mario Rossi

      cella A3 Giuseppe Bianchi

      cella A4 Giuseppe Bianchi   e così via..

I nomi uguali sono uno di seguito all'altro ( NON capita di avere un Mario Rossi alla riga A1 e un Mario Rossi alla riga A 20 per esempio).

vorrei che il sistema in modo automatico mi riconoscesse quando i nomi e cognomi sono uguali e li unisse in un unica cella.

é possibile?

volevo evitare così di andare ad unire le celle in modo manuale.

Grazie mille

Answer 1

Perfetto.

Ora puoi marcare come risposta la mia risposta per chiudere il post?

Grazie

Answer 2

ho fatto come mi hai detto ma mi segnala un altro errore in questa riga di codice 

intervallo.Sort key1:=Range("a1"), Order1:=xlAscending, Header:=xlYes

Answer 3

Sostituisci alla parola dati in nome del tuo figlio coi datii

Answer 4

mi dice che "indice non incluso nell'intervallo" 

la riga in questione è questa:

ultima = Worksheets("dati").Range("a1").CurrentRegion.Rows.Count

Answer 5

si è una macro.

Apri l'editor di VBA (ALT + F11)

nella finestra a destra seleziona il progetto vba relativo al tuo file e scegli Inserisci > Modulo.

Incolla il codice nel foglio che ti compare.

Stando col cursore nel codice scegli Esegui > Sub/User form o premi F5

ricorda alla fine di salvare il file con il formato excel con attivatore di Macro.