Note: The other languages of the website are Google-translated. Back to English
Մուտք  \/ 
x
or
x
Գրանցում  \/ 
x

or

Ինչպե՞ս փոխել մեկնաբանության փուչիկի տառատեսակի չափը Word փաստաթղթում:

Ինչպես ցույց է տրված սքրինշոթից ներքևում, եթե ուզում եք Word փաստաթղթում մեծացնել մեկնաբանության փուչիկի տառատեսակը, ի՞նչ կարող եք անել: Այս հոդվածը ձեզ ցույց կտա այս խնդրի լուծման երկու մեթոդ:

Word- ում ներկառուցված գործառույթով փոխեք մեկնաբանության փուչիկի տառատեսակի չափը

Փոխեք մեկնաբանության փուչիկի տառատեսակի չափը VBA կոդով


Word- ում ներկառուցված գործառույթով փոխեք մեկնաբանության փուչիկի տառատեսակի չափը

Դուք կարող եք ուղղակիորեն փոխել փուչիկի տեքստի տառատեսակի չափը Word- ի All Styles բաժնում: Խնդրում եմ, արեք հետևյալ կերպ.

1. Սեղմեք Ctrl + ալտ + Հերթափոխություն + S բացել ստեղները Որոնվածը հաց.

2. Մեջ Որոնվածը վահանակ, սեղմեք Ընտրանքներ, Տեսեք,

3. Բացման մեջ Style Pane Ընտրանքներ պատուհանում, ընտրեք Բոլոր ոճերը - ից Ընտրեք ոճերը ցուցադրելու համար բացվող ցուցակ:

4. Այնուհետեւ կտտացրեք OK վերադառնալու համար Որոնվածը պատուհանը, խնդրում ենք ոլորել ներքև ՝ գտնելու համար Փուչիկի տեքստ տողը, կտտացրեք բացվող ցուցակն ընդլայնելու կոճակը, ապա կտտացրեք Փոփոխել, Տեսեք,

5. Մեջ Փոփոխել ոճը պատուհանը, ընտրեք տառատեսակի չափը, ինչպես ձեզ հարկավոր է Չափանշում բաժինը, ինչպես ցույց է տրված սքրինշոթը ներքևում, և այնուհետեւ կտտացրեք OK կոճակը:

6. Փակեք այն Որոնվածը հաց.

Հետո բոլոր մեկնաբանության փուչիկների տառատեսակի չափը փոխվում է նշվածի:

ՆշումԿարգավորումը կտարածվի ապագայում բոլոր մեկնաբանությունների վրա:


Փոխեք մեկնաբանության փուչիկի տառատեսակի չափը VBA կոդով

Այս բաժնում կներկայացվի VBA կոդ, որը կօգնի ձեզ հեշտությամբ փոխել Word փաստաթղթում մեկնաբանությունների փուչիկի տառատեսակը:

1. Փաստաթղթում դուք կփոխեք մեկնաբանության փուչիկի տառատեսակի չափը, սեղմեք այն ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Պատուհանում կտտացրեք Տեղադրել > Մոդուլներ, Դրանից հետո VBA կոդի ներքո պատճենեք Մոդուլի պատուհանում:

VBA կոդ. Word- ում փոխեք մեկնաբանության փուչիկի տառատեսակի չափը

Sub SetCommentTextStyle()
'Updated by ExtendOffice 20181112
    Dim objComment As Comment
    Dim objDoc As Document
    Dim strFontName As String
    Dim strFontSize As String 
    Set objDoc = ActiveDocument
    strFontName = InputBox("Enter text font name here: ", "Font name")
    strFontSize = InputBox("Enter font size here: ", "Font size") 
    With objDoc
      For Each objComment In .Comments
        objComment.Range.Font.Name = strFontName
        objComment.Range.Style = ActiveDocument.Styles("Balloon Text Char")
      Next objComment
    End With
    ActiveDocument.Styles("Balloon Text").Font.Size = Val(strFontSize)
End Sub

3. Սեղմեք F5 ծածկագիրը գործելու համար:

4. Առաջինում Kutools բառի համար երկխոսության տուփ, մուտքագրեք ձեր տառի համար նոր տառատեսակ և կտտացրեք OK.

5. Երկրորդում Kutools բառի համար երկխոսության տուփ, մուտքագրեք տառատեսակի չափը, որքան անհրաժեշտ է, և կտտացրեք OK.

Այնուհետև բոլոր մեկնաբանության փուչիկների տառատեսակի չափը փոխվում է ընթացիկ փաստաթղթում նշվածի:


Բառի արտադրողականության առաջարկվող գործիքներ

 

Kutools for Word - Ավելի քան 100 առաջադեմ գործառույթներ Word- ի համար, խնայեք ձեր 50% ժամանակը

  • Բարդ և կրկնվող գործողությունները կարող են կատարվել միանգամյա մշակմամբ վայրկյանների ընթացքում:
  • Տեղադրեք բազմաթիվ պատկերներ միանգամից թղթապանակների մեջ Word փաստաթղթում:
  • Միացրեք և միացրեք բազմաթիվ Word ֆայլեր թղթապանակների մեջ մեկում ՝ ձեր ցանկալի պատվերի հետ:
  • Ընթացիկ փաստաթուղթը բաժանեք առանձին փաստաթղթերի `ըստ վերնագրի, հատվածի ընդմիջման կամ այլ չափանիշների:
  • Փոխարկել ֆայլերը Doc- ի և Docx- ի, Docx- ի և PDF- ի միջև, ընդհանուր փոխակերպումների և ընտրության գործիքների հավաքածու և այլն ...
Say something here...
symbols left.
You are guest
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.