Küpsised aitavad meil pakkuda meie teenuseid. Kasutades meie teenuseid, nõustud meie küpsiste kasutamise kohta.
Näpunäide. Teised keeled on Google'i tõlgitud. Võite külastada English selle lingi versioon.
Logi sisse
x
or
x
x
Regist.
x

or

Kuidas muuta fondi ja fondi suurust Wordi dokumendi kõikides tekstikastides?

Selles artiklis räägitakse fondi ja fondi suuruse muutmisest antud kaustas kehtiva dokumendi või dokumentide tekstikastides. Proovige artiklis artiklis VBA meetodit.

Muutke fondi ja fondi suurust praeguses dokumendis olevate tekstikasti

Muuda fondi ja fondi suurust kõigi kaustade dokumentide tekstikastides


Muutke fondi ja fondi suurust praeguses dokumendis olevate tekstikasti

Tekstikastide puhul muudate praeguses dokumendis fondi ja fondi suurust, probleemi lahendamiseks kasutage allpool VBA-koodi.

1. Vajutage nuppu muu + F11 võtmed avada Microsoft Visual Basic rakenduste jaoks aken.

2. Aastal Microsoft Visual Basic rakenduste jaoks Klõpsake aknas Sisesta > moodulid, ja kopeerige järgmine kood mooduli aknasse.

VBA-kood: muutke fondi ja fondi suurust kõigis aktiivse dokumendi tekstikastides

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

märkused: Koodis "Arial"Ja"20"On minu määratud font ja fondi suurus minu puhul. Saate neid muuta vastavalt oma vajadustele.

3. Vajutage nuppu F5 koodi käivitamiseks klahv. Siis muudetakse tekstikasti kõigi tekstide font ja kirjasuurus määratud fondi ja fondi suuruseks. Vaata pilti:


Muutke fondi ja fondi suurust kõigis kaustas olevate dokumentide tekstikastides

Mitme Wordi dokumendis olevate tekstikastite kirjasuuruse ja kirja suuruse muutmiseks peate rakendama allpool VBA-koodi.

1. Palun koguge kõik sihtdokumendid, mis sisaldavad tekstikasti, mida muudate sama kausta sama fondi ja fondi suuruse järgi.

2. Avatud Wordi dokumendis vajutage nuppu muu + F11 võtmed avada Microsoft Visual Basic rakenduste jaoks aken.

3. Aastal Microsoft Visual Basic rakenduste jaoks Klõpsake aknas Sisesta > moodulid, ja kopeerige järgmine kood mooduli aknasse.

VBA-kood: muutke fondi ja fondi suurust mitme dokumendi tekstikastides

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. Vajutage nuppu F5 koodi käivitamiseks klahv. Avamisel Sirvi aken, valige kaust (sisaldab dokumente, mida muudate teksti ja kasutab fondi ja fondi suurust) ja klõpsake nuppu OK nuppu.

Siis muudetakse kõik valitud kaustas olevad tekstiväljad "font ja kirjasuurus määratud fondi ja fondi suuruseks.



Kutools Wordile

100i, 2003i, 2007i, 2010i, 2013i ja 2016i 2019 täiustatud funktsioonide funktsioonid

shot-kutools-700-225-kte

Veel | Tasuta allalaadimine | Ainult $ 39.00 sadade funktsioonide jaoks

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.