KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come estrarre le iniziali dai nomi in Excel?

AutoreSun Data di modifica

Quando si elaborano record clienti o si esegue una stampa unione, ottenere le iniziali da un nome può rivelarsi molto utile — ad esempio, HG per Hal Greer. Di seguito ti presentiamo alcuni trucchi efficaci per estrarre rapidamente le iniziali dall’elenco nomi in Excel.

Estrarre le iniziali con una formula in Excel

Estrarre le iniziali utilizzando una funzione definita dall'utente in Excel


freccia blu verso destra con fumetto Estrarre le iniziali con una formula in Excel

Il primo metodo consiste nell’utilizzare una formula per estrarre le iniziali dai nomi in Microsoft Excel.

Seleziona una cella vuota, ad esempio la cella C2, e digita questa formula:=SINISTRA(A2)&SE(VAL.NUMERO(TROVA(« »;A2));STRINGA.ESTRAI(A2;TROVA(« »;A2)+1;1);«»)&SE(VAL.NUMERO(TROVA(« »;A2;TROVA(« »;A2)+1));STRINGA.ESTRAI(A2;TROVA(« »;A2;TROVA(« »;A2)+1)+1;1);«») (dove A2 è la prima cella dell’elenco nomi). Premi il tasto Invio, quindi trascina il quadratino di riempimento per estendere la formula all’intervallo desiderato. In questo modo, vedrai immediatamente le iniziali di ciascun nome estratte dall’elenco nomi.

estrai le iniziali dai nomi con formula


freccia blu verso destra con fumetto Estrarre le iniziali utilizzando una funzione definita dall'utente in Excel

Oltre alle formule, puoi sfruttare una funzione definita dall’utente per estrarre in modo semplice e veloce le iniziali da nomi specifici in Microsoft Excel.

1. Seleziona una cella della colonna desiderata e premi Alt + F11 per aprire la finestra di Microsoft Visual Basic, Applications.

2. Nella finestra visualizzata, fai clic su Inserisci > Modulo, quindi incolla il seguente codice VBA nel modulo.

VBA: Estrai le iniziali dai nomi

Function FirstCharacters(pWorkRng As Range) As String
'Updateby20140514
Dim arr As Variant
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
arr = VBA.Split(Trim(xValue))
For i = 0 To UBound(arr)
    OutValue = OutValue & VBA.Left(arr(i), 1) & "."
Next
FirstCharacters = OutValue
End Function

3. Salvare il codice e chiudere questa finestra, selezionare una cella vuota e digitare la formula = FirstCharacters(A2), quindi premere il tasto Invio e trascinare il quadratino di riempimento per estendere la formula all'intervallo desiderato. A questo punto, vedrai le iniziali di ciascun nome estratte.

estrai le iniziali dai nomi con funzione definita dall'utente

Suggerimento: Puoi personalizzare i separatori "." delle iniziali in base alle tue esigenze nel codice VBA riportato sopra.


Articoli correlati:

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi