2 Methoden om batchgewijs de lettertypen van alle opmerkingen in een Excel-werkmap te wijzigen

Nadat u veel opmerkingen in een Excel-werkmap heeft ingevoegd, wilt u misschien de lettertypen van alle opmerkingen aanpassen. In deze situatie kunt u naar dit artikel verwijzen. Hier zullen we u 2 eenvoudige methoden delen.

Zoals we kunnen zien, gebruiken de opmerkingen die in Excel worden ingevoegd, automatisch het standaardlettertype. Soms wilt u de lettertypen van de opmerkingen wijzigen. Als er een paar opmerkingen zijn, kunt u eenvoudig de volgende methode 1 gebruiken om deze handmatig te wijzigen. Als er echter honderden opmerkingen zijn, kunt u beter voor het laatste middel kiezen.

Methode 1: Verander een voor een

1. Selecteer eerst een opmerking in het werkblad.
2. Klik er vervolgens met de rechtermuisknop op en selecteer "Opmerking opmaken" in het contextmenu.

   

3. Vervolgens kunt u in het kleine pop-upvenster de lettertypen en stijlen naar wens selecteren.

   

4. Klik uiteindelijk op "OK".
5. Later kunt u op deze manier opmerkingen handmatig een voor een wijzigen.

Methode 2: batchwijziging via VBA

1. Begin met het starten van de Excel VBA-editor met de verwijzing naar "Hoe u VBA-code in uw Excel uitvoert'.
2. Plaats vervolgens in het venster "Microsoft Visual Basic for Applications" de onderstaande VBA-code in een project of module.

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

3. Voer deze macro later uit door simpelweg op de toets "F5" te drukken.
4. Uiteindelijk, nadat de macro is voltooid, terug naar de werkbladen.
5. Zoals u kunt zien, zijn de lettertypen van alle opmerkingen gewijzigd, zoals weergegeven in de volgende schermafbeelding:

Vergelijk

Herstel gecompromitteerd Excel-bestand

Wanneer uw computer plotseling wordt afgesloten en sommige Excel-bestanden niet zijn opgeslagen, kan het zijn dat de volgende keer dat de pc een back-up maakt, de Excel-bestanden beschadigd zijn. Als u op dit punt de bestanden terug wilt krijgen, heeft u geen andere keuze dan hulp te gebruiken van een krachtig en betrouwbaar Excel-herstelprogramma, zoals DataNumen Excel Repair, die kunnen herstellen beschadigde Excel gegevens met moeiteloos gemak.

Auteur Introductie:

Shirley Zhang is een expert op het gebied van gegevensherstel in DataNumen, Inc., de wereldleider in technologieën voor gegevensherstel, waaronder SQL repareren en Outlook-reparatiesoftwareproducten. Voor meer informatie bezoek www.datanumen.com