2 Metode za grupnu promjenu fontova svih komentara u Excel radnoj knjizi

Podijeli sada:

Nakon što umetnete mnogo komentara u Excel radnu svesku, možda ćete želeti da prilagodite fontove svih komentara. U ovoj situaciji možete pogledati ovaj članak. Ovdje ćemo vam podijeliti 2 laka načina.

Kao što vidimo, komentari umetnuti u Excel automatski koriste zadani font. Ponekad ćete možda htjeti promijeniti fontove komentara. Ako ima nekoliko komentara, možete jednostavno koristiti sljedeći metod 1 da ih ručno promijenite. Međutim, ako postoje stotine komentara, bolje je da odaberete ovo drugo sredstvo.

Metoda 1: Promijenite jednu po jednu

  1. Prvo odaberite komentar na radnom listu.
  2. Zatim kliknite desnim tasterom miša na njega i izaberite „Formatiraj komentar“ iz kontekstnog menija.

    Odaberite stavku menija "Formatiraj komentar".

  3. Zatim, u malom iskačućem dijaloškom okviru, možete odabrati fontove i stilove po svom ukusu.

    Dijalog "Formatiranje komentara".

  4. Na kraju, kliknite na “OK”.
  5. Kasnije možete koristiti ovaj način da ručno mijenjate komentare jedan po jedan.

Metoda 2: Batch promjena putem VBA

  1. Za početak, pokrenite Excel VBA editor sa referencom na "Kako pokrenuti VBA kod u vašem Excelu".
  2. Zatim, u prozoru „Microsoft Visual Basic za aplikacije“, stavite VBA kod ispod u projekat ili modul.
Sub BatchChangeFontsOfAllComments()

    Dim objWorksheet As Excel.Worksheet

    Dim objComment As Excel.Comment

   

    'Process all worksheet one by one

    For Each objWorksheet In ThisWorkbook.Worksheets

        If objWorksheet.Comments.Count > 0 Then

           For Each objComment In objWorksheet.Comments

               With objComment.Shape.TextFrame.Characters.Font

                    'Specify font name and size

                    .Name = "Comic Sans MS"

                    .Size = 10

                    'Use RGB function to create a color value

                    .Color = RGB(255, 0, 0)

                    .Italic = True

                    .Bold = True

               End With

           Next

        End If

    Next

End Sub

 

VBA projekat

  1. Kasnije, pokrenite ovaj makro jednostavnim pritiskom na dugme “F5”.
  2. Na kraju, nakon što makro završi, vratite se na radne listove.
  3. Kao što vidite, fontovi svih komentara su promijenjeni, kao što je prikazano na sljedećem snimku ekrana:

Promjena rezultata fonta komentara

poređenje

prednosti nedostaci
Način 1 Brza i laka obrada male količine komentara Vrlo problematično u slučaju previše komentara
Način 2 Veoma efikasan bez obzira na broj komentara Povećajte rizik od infekcije virusom

Vratite kompromitovanu Excel datoteku

Kada se vaš računar iznenada isključi, ako neke Excel datoteke nisu sačuvane, sledeći put kada se računar ponovo pokrene, možda ćete otkriti da su Excel datoteke oštećene. U ovom trenutku, ako želite da vratite datoteke, nemate izbora osim da iskoristite pomoć moćnog i pouzdanog alata za oporavak Excela, kao što je DataNumen Excel Repair, koji se može oporaviti oštećen Excel podatke sa lakoćom bez napora.

Uvod za autora:

Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popraviti sql i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com

Podijeli sada:

Komentari su zatvoreni.