Vai al contenuto principale

Come modificare il carattere e la dimensione del carattere in tutte le caselle di testo nel documento di Word?

Questo articolo parla della modifica del carattere e della dimensione del carattere nelle caselle di testo nel documento corrente o nei documenti in una cartella specificata. Prova il metodo VBA nell'articolo.

Modificare il carattere e la dimensione del carattere nelle caselle di testo nel documento corrente

Modificare il carattere e la dimensione del carattere nelle caselle di testo di tutti i documenti in una cartella


Modificare il carattere e la dimensione del carattere nelle caselle di testo nel documento corrente

Per le caselle di testo cambierai il carattere e la dimensione del carattere nel documento corrente, applica il codice VBA sottostante per risolvere il problema.

1. premi il altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulie quindi copia il codice seguente nella finestra del modulo.

Codice VBA: modifica il carattere e la dimensione del carattere in tutte le caselle di testo nel documento corrente

Sub FormatTextsInTextBoxes()
'Updated by ExtendOffice 20181128
    Dim I As Long
    Dim xShape As Shape
    Dim xDoc As Document
    Set xDoc = ActiveDocument
    On Error Resume Next
    For Each xShape In xDoc.Shapes
        xShape.Select
        If xShape.GroupItems Is Nothing Then
            With xShape.TextFrame.TextRange.Font
                .Name = "Arial"
                .Size = 20
            End With
            GoTo LblExit
        End If
        For I = 1 To xShape.GroupItems.Count
            With xShape.GroupItems(I).TextFrame.TextRange.Font
                .Name = "Arial"
                .Size = 20
            End With
        Next
LblExit:
    Next
End Sub

Note:: Nel codice, "Arial" e "20"È il carattere e la dimensione del carattere specificati nel mio caso. Puoi modificarli in base alle tue esigenze.

3. premi il F5 chiave per eseguire il codice. Quindi il carattere e la dimensione del carattere di tutti i testi nelle caselle di testo vengono modificati con il carattere e la dimensione del carattere specificati. Vedi screenshot:


Modificare il carattere e la dimensione del carattere in tutte le caselle di testo di tutti i documenti in una cartella

Per modificare in blocco il carattere e la dimensione del carattere delle caselle di testo in più documenti Word, è necessario applicare il codice VBA sottostante.

1. Raccogli tutti i documenti di destinazione che contengono caselle di testo, cambierai il carattere e la dimensione del carattere nella stessa cartella.

2. In un documento di Word di apertura, premere il pulsante altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

3. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulie quindi copia il codice seguente nella finestra del modulo.

Codice VBA: modifica il carattere e la dimensione del carattere nelle caselle di testo di più documenti

Sub FormatTextsInTextBoxesInMultiDoc()
'Updated by ExtendOffice 20181128
    Dim I As Long
    Dim xShape As Shape
    Dim xDlg As FileDialog
    Dim xFolder As Variant
    Dim xFileStr As String
    On Error Resume Next
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show = -1 Then
        xFolder = xDlg.SelectedItems(1) + "\"
        xFileStr = Dir(xFolder & "*.doc", vbNormal)
        While xFileStr <> ""
            Documents.Open xFolder & xFileStr
            For Each xShape In ActiveDocument.Shapes
                xShape.Select
                If xShape.GroupItems Is Nothing Then
                    With xShape.TextFrame.TextRange.Font
                        .Name = "Arial"
                        .Size = 20
                    End With
                    GoTo LblExit
                End If
                For I = 1 To xShape.GroupItems.Count
                    With xShape.GroupItems(I).TextFrame.TextRange.Font
                        .Name = "Arial"
                        .Size = 20
                    End With
                Next
LblExit:
            Next
            ActiveDocument.Save
            ActiveDocument.Close
            xFileStr = Dir()
       Wend
    End If
End Sub

4. premi il F5 chiave per eseguire il codice. In apertura Scopri la nostra gamma di prodotti selezionare la cartella (contiene i documenti cambierà il carattere e la dimensione del carattere nelle caselle di testo) e fare clic su OK pulsante.

Quindi il carattere di tutte le caselle di testo e la dimensione del carattere dei documenti nella cartella selezionata vengono modificati con il carattere e la dimensione del carattere specificati.

I migliori strumenti per la produttività in ufficio

Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!

Immergiti nelle funzionalità evidenziate di seguito o fai clic qui per esplorare tutta la potenza di Kutools per Word.

📘 Padronanza dei documenti: Pagine divise  /  Unisci documenti  /  Esporta la selezione in vari formati (PDF/TXT/DOC/XLSX)  /  Converti in batch in PDF  /  Esporta pagine come immagini  /  Stampa più file contemporaneamente ...

Modifica dei contenuti: Trova e sostituisci in batch su più file   /  Ridimensiona tutte le immagini   /  Trasporre righe e colonne della tabella  /  Converti tabella in testo ...

🧹 Pulito senza sforzoSpazza via Spazi extra  /  Interruzioni di sezione  /   Tutte le intestazioni  /  Caselle di testo  /  Collegamenti ipertestuali  /  Per ulteriori strumenti di rimozione, vai al nostro Gruppo di rimozione

Inserti creativi: inserire Mille separatori  /  Caselle di controllo  /  Pulsanti di scelta  /  QR Code  /  Codice a barre  /  Tabella della linea diagonale  /  Didascalia dell'equazione  /  Didascalia immagine  /  Didascalia  /  Immagini multiple  /  Scopri di più nel nostro Gruppo Inserisci

???? Selezioni di precisione: Individua pagine specifiche  /  con tabelle  /  forme  /  paragrafi di intestazione  /  Naviga con facilità utilizzando il nostro Seleziona gruppo

Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo  /  inserire automaticamente testo ripetitivo  /  passare senza problemi da una finestra all'altra del documento  /  11 strumenti di conversione ...

Trasforma le tue attività di Word con Kutools. 👉 Scarica subito con la prova di 30 giorni 🚀.

Leggi Ora       Scarica gratis      Acquista
 
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This is an awesome post.Really very informative and creative contents. These concept is a good way to enhance the knowledge.I like it and help me to development very well.Thank you for this brief explanation and very nice information.Well, got a good knowledge.

Java Training in Chennai
Java Training in Coimbatore
Java Training in Bangalore
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations