İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Word sənədində şərh balonunun font ölçüsünü necə dəyişdirmək olar?

Aşağıda göstərildiyi kimi, Word sənədində şərh balonunun şriftini böyütmək istəyirsinizsə, nə edə bilərsiniz? Bu yazıda bu problemi həll etmək üçün iki üsul göstəriləcək.

Word-də funksiya funksiyası ilə şərh balonunun şrift ölçüsünü dəyişdirin

VBA koduyla şərh balonunun şrift ölçüsünü dəyişdirin


Word-də funksiya funksiyası ilə şərh balonunun şrift ölçüsünü dəyişdirin

Word'deki Bütün Stiller bölmesinde balon metninin yazı tipi boyutunu birbaşa değiştirebilirsiniz. Xahiş edirik bunu edin.

1. Basın Ctrl + Dayandırmaq + ÜstKrkt + S düymələri açmaq üçün Styles çörək.

2. İçində Styles pane, klikləyin Nizamlamalar. Ekran görüntüsünə baxın:

3. Açılışda Style Pane Seçimləri pəncərəni seçin Bütün üslublar dən Göstərmək üçün üslub seçin açılan siyahı.

4. Sonra basın OK qayıtmaq Styles bölməni tapmaq üçün aşağıya doğru hərəkət edin Balon Metni xəttini basın açılan siyahıdan genişləndirmək üçün düyməsini basın və sonra basın Düzelt. Ekran görüntüsünə baxın:

5. İçində Stil dəyişdirin pəncərədə, lazım olduğunuzda font ölçüsünü seçin Üslub aşağıda göstərilən ekran görüntüsü göstərilir və sonra basın OK düyməsini basın.

6. Yaxınlığı bağlayın Styles çörək.

Bütün şərh balonlarının yazı tipi ölçüsü müəyyən birinə dəyişdirilir.

Qeyd: Ayar gələcəkdə bütün şərhlərə tətbiq olunacaq.


VBA koduyla şərh balonunun şrift ölçüsünü dəyişdirin

Bu bölmə, Word sənədində şərh balonlarının font ölçüsünü asanlıqla dəyişməyə kömək etmək üçün VBA kodunu təqdim edəcəkdir.

1. Sənəddə şərh balonunun şrift ölçüsünü dəyişəcək, basın Dayandırmaq + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Pəncərədə, basın Taxmaq > Modules. Sonra VBA kodu aşağıda Modul penceresine kopyalayın.

VBA kodu: Worddə şərh balonunun şrift ölçüsünü dəyişdirin

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. Basın F5 kodunu çalıştırmak üçün düyməsini basın.

4. Birincisi Word üçün Kutools informasiya qutusuna, şərhiniz üçün yeni bir yazı daxil edin və vurun OK.

5. İkincisi Word üçün Kutools informasiya qutusuna ehtiyacınız olduğu halda font ölçüsünə yazın və vurun OK.

Bütün şərh balonlarının yazı tipi ölçüsü, hazırkı sənəddə göstərilmişdir.



Word üçün Kutools

100, 2003, 2007, 2010, 2013 və 2016 üçün 2019 Ətraflı funksiyaları

shot-kutools-700-225-kte

Daha çox xüsusiyyətlər | Pulsuz Yüklə | Yüzlərlə funksiya üçün yalnız $ 39.00

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.