excel: formattazione del Commento di una cella

[sdregone]

Di default mi dà sempre un TAHOMA 8 che non mi serve in quanto troppo piccolo. Vorrei un Tahoma 18.
ma ogni volta che inserisco un commento, "attenzione: anche nello stesso foglio", ecco di nuovo il tahoma 8.
Si puo' fare qualcosa?

ps.... le macro nn funzionano col commento di una cella......

[archimede]

ps.... le macro nn funzionano col commento di una cella......

:?:

Codice: Seleziona tutto

Private Sub CommandButton1_Click()
    For Each x In ActiveSheet.Comments
        With x.Shape.TextFrame.Characters.Font
            .Name = "courier"
            .Size = 10
            .Bold = False
        End With
     Next x
End Sub

Questo funziona con A97 e Win2k.

Probabilmente c'è anche un'impostazione a livello di sistema per ottenere lo stesso risultato, ma non ne sono sicuro.

HTH.

Alessandro

[archimede]

Questo funziona con A97 e Win2k.

Naturalmente intendevo dire XL97.

Alessandro

[sdregone]

utilizzo un xp sp2 ..... office 2003
dove devo inserire qelle strignhe?

[archimede]

dove devo inserire qelle strignhe?

Per fare una prova veloce io ho usato il bottone di una form, ma ci sono diversi metodi. Ad esempio:

ALT+F8 --> Nome Macro: quelchevuoi --> Crea

Quindi, prima di End Sub, inserisci le righe di codice da For... a Next... comprese.

Torni in Excel e:

ALT+F8 --> Selezioni la Macro creata --> Esegui

S'intende che i commenti devono già essere stati inseriti.

HTH.

Alessandro

[sdregone]

Mi spiace ma nn mi riesce proprio..... ho creato questa macro qui:

Sub PCFACILEZ()
For Each x In ActiveSheet.Comments
With x.Shape.TextFrame.Characters.Font
.Name = "courier"
.Size = 10
.Bold = False
End With
Next x
End Sub

poi ho salvato......
ma il commento ha sempre lo stesso formato.
Tahoma 8

[sdregone]

Sub PCFACILEZ()
Private Sub CommandButton1_Click()
For Each x In ActiveSheet.Comments
With x.Shape.TextFrame.Characters.Font
.Name = "courier"
.Size = 10
.Bold = False
End With
Next x
End Sub

mi da' l'errore......

"errore di compilazione end sub"

a me serve un box commento di quel formato che imposto io in modo che quando devo inserire un commento non devo sempre riformattare il box perdendo parecchio tempo...... poi il commento lo metto io dov'e'che serve...

ps.....scusatemi se sono stato poco chiaro.

[archimede]

Mi spiace ma nn mi riesce proprio..... ho creato questa macro qui:

Sub PCFACILEZ()
For Each x In ActiveSheet.Comments
With x.Shape.TextFrame.Characters.Font
.Name = "courier"
.Size = 10
.Bold = False
End With
Next x
End Sub

poi ho salvato......
ma il commento ha sempre lo stesso formato.
Tahoma 8

Ma dopo aver salvato che hai fatto?

Torni in Excel e:

ALT+F8 --> Selezioni la Macro creata --> Esegui

[archimede]

a me serve un box commento di quel formato che imposto io in modo che quando devo inserire un commento non devo sempre riformattare il box perdendo parecchio tempo...... poi il commento lo metto io dov'e'che serve...

La soluzione da me proposta non fa questo: tu inserisci i commenti come hai sempre fatto, quindi esegui la macro e TUTTI i commenti inseriti vengono formattati in quel modo.

Alessandro

[Garde]

Se vuoi gestire i commenti c'è un tool che si chiama ASAP Utilities (è gratis) che aggiunge molte funzioni ad excel (aggiunge un menu) tra cui un "comments tool".
Credo che tu possa gestire in maniera molto ampia i tuoi commenti con questo tool
Ciao

[sdregone]

grazie ragaz