Vai al contenuto principale

Come modificare tutti i formati di commento nelle celle in Excel?

Quando inseriamo commenti in un foglio di lavoro, a volte, potrebbe essere necessario modificare i formati dei commenti predefiniti, se ci sono alcuni commenti, possiamo cambiarli manualmente, ma se ci sono centinaia di commenti che devono essere modificati, come risolverli ?

Cambia tutti i formati di commento con il codice VBA

Uno strumento utile per modificare rapidamente tutti i formati di commento e risparmiare tempo


freccia blu freccia destra Cambia tutti i formati di commento con il codice VBA

Con il seguente codice VBA, puoi modificare la dimensione del carattere e il carattere dei commenti nelle celle, ma non è possibile modificare i colori dei caratteri. si prega di utilizzare il seguente VBA come:

1. Clic Costruttori > Visual Basic, un nuovo Microsoft Visual Basic per le applicazioni verrà visualizzata la finestra, fare clic su inserire > Moduli, quindi copia e incolla i seguenti codici nel modulo:

Sub FormatAllComments()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        With xComment.Shape.TextFrame.Characters.Font
            .Name = "Times New Roman"
            .Size = 14
        End With
    Next
Next
End Sub

Nel codice sopra, puoi impostare il file .Nome ed .Dimensione variabili come desideri.

2. Quindi fare clic doc-modifica-formato-commento-1 pulsante per eseguire il codice. E poi clicca Review > Mostra tutti i commenti per visualizzare i commenti, sono stati modificati tutti i formati dei commenti nell'intera cartella di lavoro. Vedi screenshot:

doc-change-comment format1 -2 doc-change-comment format2

freccia blu freccia destra Uno strumento utile per modificare rapidamente tutti i formati di commento e risparmiare tempo

Se desideri modificare rapidamente altri tipi di formato per tutti i commenti, puoi provare a utilizzare l'estensione Formato commenti of Kutools for Excel.

Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Get it Now

Dopo aver installato Kutools per Excel, seguire i seguenti passaggi per modificare i formati dei commenti:

1. Formatta un commento con lo stile che desideri applicare agli altri commenti.

2. Clic Kutools > Più > Formato commenti, vedi screenshot:

3. Nel Formato commenti finestra di dialogo, fare clic Formato scheda e scegli l'ambito in cui desideri modificare il formato del commento, puoi scegliere Foglio attivo or Tutti i fogli. Quindi fare clic Specifica la cella del commento per selezionare la cella che contiene il formato di commento specifico che si desidera applicare. Quindi viene visualizzata un'altra finestra di dialogo per dirti il ​​numero di celle modificate. Vedi screenshot:

4. Quindi fare clic Ok > Annulla per chiudere la finestra di dialogo e il formato del commento della cella selezionato è stato applicato ad altri commenti.

Note:

Se non si desidera utilizzare lo stile del carattere in grassetto in tutte le celle dei commenti, controllare Forza la formattazione non in grassetto opzione.

Per informazioni più dettagliate su Formato commenti , Si prega di visitare il sito Descrizione della funzione Commenti formato.


Articoli correlati:

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thanks for this bit of code. It worked for me. But, I would also like to stretch the width property so the increase size text will show the way I like it. Recorder records what you see below, but I can't figure out how to get this into the For Each loop. Selection.ShapeRange.ScaleWidth 1.63, msoFalse, msoScaleFromTopLeft Selection.ShapeRange.ScaleHeight 1.98, msoFalse, msoScaleFromTopLeft Any advice on how to update the code for this extra little trick? Thanks!
This comment was minimized by the moderator on the site
Hi, I join myself to the thanksgiving. The piece of code did work perfectly! Thx again!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations