Come posso modificare la dimensione di default della nota

Question

Quando imposto una nota su di una cella e scrivo un testo, alla riapertura della nota la dimensione di default del riquadro della nota è piccolo rispetto al testo che contiene.

Esiste una funzione per aumentare la dimensione standard della nota senza dover utilizzare il mouse sull'angolo o la barra laterale?

Answer 1

Ciao Errico,

Quando imposto una nota su di una cella e scrivo un testo, alla riapertura della nota la dimensione di default del riquadro della nota è piccolo rispetto al testo che contiene.

Esiste una funzione per aumentare la dimensione standard della nota senza dover utilizzare il mouse sull'angolo o la barra laterale?

Penso che sia necessario sfruttare VBA.

Quindi, prova come segue:

• Alt+F11 per aprire l'editor di VBA
• Alt+IM per inserire un nuovo modulo di codice
• Nel nuovo modulo vuoto, incolla il seguente codice:

 '========>>

Option Explicit

'-------->>

Public Sub Ridimensiona_Note_Nel _Foglio()

'\ Dave Peterson 2002-02-25

'\ https://www.contextures.com/xlcomments03.html

Dim mycell As Range

Dim myRng As Range

Dim lArea As Long

Dim lMult As Double

Dim MaxW As Long

Dim NewW As Long

'Height adjustment factor

lMult = 1.2

MaxW = 300

NewW = 200

Set myRng = ActiveSheet.UsedRange

For Each mycell In myRng.Cells

  If Not (mycell.Comment Is Nothing) Then

    With mycell.Comment

      .Shape.TextFrame.AutoSize = True

      If .Shape.Width > MaxW Then

        lArea = .Shape.Width * .Shape.Height

        .Shape.Width = NewW

        .Shape.Height _

            = (lArea / NewW) * lMult

      End If

    End With

  End If

Next mycell

End Sub

'<<========

• Alt+Q per chiudere l'editor di VBA e tornare a Excel.
• Salva il file con l'estensione xlsm
• Alt+F8 per aprire la finestra di gestione delle macro
• Seleziona Ridimensiona_Note_Nel _Foglio
• Esegui

Se salvi questa macro nel tuo file **** Personal.xlsb, sarà disponibile per l'utilizzo in qualsiasi cartella di lavoro aperta.

===

Regards,

Norman

Answer 2

Buongiorno Errico,

ti metto in prima fila per avere risposta da uno dei moderatori.

Sandro

Answer 3

Buon pomeriggio Errico,

la domanda che hai posto su Windows devi porla su Microsoft 365 e Office. In quella sezione ci cono moderatori esperti dell'argomento che ti aiuteranno a risolvere la tua richiesta di aiuto.

Sandro

Answer 4

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

Il programma che uso è Excel Microsoft 365 e la mia richiesta è se è possibile modificare la dimensione predefinita della nota che viene aggiunta su qualsiasi cella del foglio Excel.

Creo Nota:

Grazie per l'attenzione e l'aiuto,

Errico Fava.

Answer 5

La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

 Ciao Jack,

È bello vederti  in Microsoft  Community.

In primo luogo, potresti farmi sapere la versione del sistema specifico (OS Build)? Puoi verificarlo premendo Win + X > System > le specifiche di Windows , fai clic su "Copia*" e incollalo nella tua prossima risposta*.

L'app menzionata è OneNote - App **** di Microsoft Store o Microsoft Sticky Notes - App di Microsoft Store? Per favore, descriveresti il tuo problema in dettaglio o ne faresti uno screenshot e lo includeresti nella prossima risposta per aiutarmi a capire meglio la tua situazione?

OneNote - App di Microsoft Store

Microsoft Sticky Notes - App di Microsoft Store

Se qualcosa non è chiaro, non esitate a farmelo sapere.

Cordiali saluti.

 Mosken_L - MSFT | Microsoft Community Support Specialist