Skip to main content

Come aggiungere separatori delle migliaia ai numeri nei documenti Word?

Author: Sun Last Modified: 2025-08-06

Aggiungere separatori delle migliaia ai numeri in un documento Word può migliorare notevolmente la leggibilità, soprattutto quando si ha a che fare con cifre elevate. Sebbene Microsoft Word non abbia una funzione diretta per aggiungere separatori delle migliaia, esistono metodi efficienti per farlo utilizzando VBA (Visual Basic for Applications) o uno strumento pratico come Kutools per Word.

In questo tutorial, vi guideremo attraverso i passaggi per aggiungere separatori delle migliaia ai numeri nel vostro documento Word utilizzando sia VBA che Kutools per Word.

Aggiungi separatori delle migliaia con VBA

Aggiungi separatori delle migliaia con Kutools per Word good idea


Aggiungi separatori delle migliaia con VBA

Inserire separatori delle migliaia in numeri elevati può essere tedioso, specialmente se devi farlo ripetutamente. Utilizzando il codice VBA, puoi automatizzare questo processo, permettendoti di selezionare semplicemente un numero e premere F5 per aggiungere istantaneamente i separatori.

  1. Seleziona il numero che desideri formattare con i separatori delle migliaia, quindi premi Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.
  2. Clicca Inserisci > Modulo, quindi copia e incolla il seguente codice nel Modulo editor.
    Sub InsertThousandSeparators()
        Dim selectedText As String
        Dim formattedText As String
        Dim decimalPos As Integer
        Dim wholePart As String
        Dim decimalPart As String
        Dim temp As String
        Dim i As Integer
        Dim charCount As Integer
        Dim trailingSpace As String
        Dim trailingParagraphMark As String
        
        If Selection.Type <> wdSelectionIP Then
            selectedText = Selection.Text
            trailingSpace = ""
            trailingParagraphMark = ""
            
            If Right(selectedText, 1) = " " Then
                trailingSpace = " "
                selectedText = Trim(selectedText)
            End If
            
            If Right(selectedText, 1) = Chr(13) Then
                trailingParagraphMark = Chr(13)
                selectedText = Left(selectedText, Len(selectedText) - 1)
            End If
            
            If IsNumeric(selectedText) Then
                decimalPos = InStr(1, selectedText, ".")
                
                If decimalPos > 0 Then
                    wholePart = Left(selectedText, decimalPos - 1)
                    decimalPart = Mid(selectedText, decimalPos + 1)
                Else
                    wholePart = selectedText
                    decimalPart = ""
                End If
                
                wholePart = Replace(wholePart, ",", "")
                
                temp = ""
                charCount = 0
                
                For i = Len(wholePart) To 1 Step -1
                    temp = Mid(wholePart, i, 1) & temp
                    charCount = charCount + 1
                    
                    If charCount Mod 3 = 0 And i > 1 Then
                        temp = "," & temp
                    End If
                Next i
                
                wholePart = temp
                
                If decimalPart <> "" Then
                    formattedText = wholePart & "." & decimalPart
                Else
                    formattedText = wholePart
                End If
                
                Selection.Text = formattedText & trailingSpace & trailingParagraphMark
            Else
                MsgBox "Please select a valid number."
            End If
        Else
            MsgBox "Please select a number first."
        End If
    End Sub
  3. Premi il tasto F5, e i separatori delle migliaia verranno aggiunti al numero selezionato.

    Thousand separators are inserted into the selected number

  4. Per aggiungere separatori a un altro numero, seleziona semplicemente il nuovo numero e poi torna alla finestra Modulo e premi nuovamente F5.

Aggiungi separatori delle migliaia con Kutools per Word

Se vuoi inserire separatori in più numeri in una selezione o nell'intero documento Word, l'utilità Aggiungi Separatore delle Migliaia di Kutools per Word può risolvere questo compito con pochi clic.

Kutools per Word,dotato di intelligenza artificiale 🤖, offre oltre 100 funzionalità pratiche per semplificare i tuoi compiti.

Dopo aver installato Kutools per Word, segui questi passaggi:

  1. Per aggiungere separatori delle migliaia a tutti i numeri dell'intero documento, non selezionare alcun dato e clicca su Kutools > Inserisci > Aggiungi Separatore delle Migliaia.
    Add Thousand Separator option on the Kutools tab on the ribbon
  2. Apparirà una finestra di dialogo che chiede se desideri applicare questa funzione all'intero documento, clicca .
    Confirmation dialog saying 'Do you want to add thousand separators to all numbers in the whole document?'
  3. Ora, tutti i numeri avranno i separatori delle migliaia inseriti.
    Thousand separators are inserted into all numbers

Note:

  • Se vuoi aggiungere separatori delle migliaia ai numeri in una selezione specifica, seleziona prima la sezione, e poi clicca su Kutools > Inserisci > Aggiungi Separatore delle Migliaia.
    Thousand separators are inserted into numbers in the selected range
  • Per rimuovere i separatori delle migliaia, clicca su Kutools > Rimuovi > Rimuovi Tutti i Separatori delle Migliaia negli Intervalli Selezionati.
    Remove Thousand Separators option on the Kutools tab on the ribbon

Demo: Aggiungi separatori delle migliaia ai numeri in un documento Word

Scopri la scheda Kutools / Kutools Plus in questo video di Kutools for Word. Goditi 100+ funzionalità e utilità AI gratuite in modo permanente. Scarica ora!

I migliori strumenti per la produttività in ufficio

Kutools per Word - Migliora la tua esperienza con Word grazie a oltre 100 straordinarie funzionalità!

🤖 Funzionalità AI di Kutools: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni Formato) / Super Traduci (Mantieni Formato) / Redazione AI / Correzione AI...

📘 Maestria sui Documenti: Dividi Pagine / Unisci Documenti / Esporta selezione in vari formati (PDF/TXT/DOC/HTML...) / Converti in batch in PDF...

Modifica dei Contenuti: Trova e sostituisci in batch su più file / Ridimensiona tutte le immagini / Trasponi righe e colonne delle tabelle / Converti Tabella in Testo...

🧹 Pulizia senza sforzo: Elimina Spazi Extra / Interruzioni di Sezione / Caselle di testo / Collegamenti ipertestuali / Per altri strumenti di rimozione, vai al gruppo Rimuovi...

Inserimenti Creativi: Inserisci separatori delle migliaia / Caselle di Controllo / Pulsanti di Opzione / Codice QR / Codice a Barre / Immagini multiple / Scopri di più nel gruppo Inserisci...

🔍 Selezioni precise: Individua pagine specifiche / Tabelle / Forme / Paragrafi di intestazione / Migliora la navigazione con ancora più funzionalità di Selezione...

Funzionalità Star: Vai in qualsiasi posizione / Inserimento automatico di testo ripetitivo / Passaggio tra finestre documento /11 strumenti di conversione...

🌍 Supporta oltre40 lingue: Usa Kutools nella tua lingua preferita – disponibile in Inglese, Spagnolo, Tedesco, Francese, Cinese e oltre40 altre!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Vuoi provare queste funzionalità? Scarica subito Kutools per Word! 🚀
 

I migliori strumenti per la produttività in ufficio

Kutools per Word - 100+ Strumenti per Word