Skip to main content

Kutools per Office — Una Suite. Cinque Strumenti. Ottieni di Più.

Come aggiungere separatori delle migliaia ai numeri nei documenti Word?

Author Sun Last modified

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 Sì.
    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 for Word - Eleva la tua esperienza su Word con oltre 100 funzioni straordinarie!

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

📘 Maestria del Documento: Dividi Pagine / Unisci Documenti / Esporta Intervallo in vari formati (PDF/TXT/DOC/HTML...) / Conversione in batch in PDF...

✏ Modifica del Testo: Trova e Sostituisci in batch su più file / Ridimensiona tutte le Immagini / Trasponi Righe e Colonne della Tabella / Converti Tabella in Testo...

🧹 Pulizia senza sforzo: Elimina Spazi Extra / Interruzioni di Sezione / Casella di testo / Collegamenti ipertestuali / Per altri strumenti di rimozione, visita il gruppo Rimuovi...

➕ Inserimenti Creativi: Inserisci Separatore delle Migliaia / Casella di Controllo / Pulsante di Opzione / Codice QR / Codice a Barre / Immagini multiple / Scopri di più nel gruppo Inserisci...

🔍 Selezioni Accurate: Individua Pagine Specifiche / Tabelle / Forma / Paragrafo di Intestazione / Migliora la navigazione con altre funzioni di Seleziona...

⭐ Miglioramenti Speciali: Vai a qualsiasi Intervallo / Inserimento automatico di testo ripetitivo / Passa tra Finestre dei Documenti /11 strumenti di Conversione...

🌍 Supporta oltre40 lingue: Usa Kutools nella lingua che preferisci – Inglese, Spagnolo, Tedesco, Francese, Cinese, e più di altre40 lingue!

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

✨ Kutools for Office – Una sola installazione, cinque strumenti potenti!

Include Office Tab Pro · Kutools per Excel · Kutools per Outlook · Kutools for Word · Kutools for PowerPoint

📦 Ottieni tutti e5 gli strumenti in un'unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta subito la produttività

I migliori strumenti per la produttività in ufficio

Kutools for Word - 100+ strumenti per Word

Download gratuito Acquista ora Scopri di più su Kutools