Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Connetti
x
or
x
x
Registratevi
x

or

Come aumentare la dimensione del font dell'elenco a discesa in Excel?

doc aumenta la dimensione del carattere nell'elenco a discesa 1

L'elenco a discesa è una funzionalità molto utile in Excel, quando crei un elenco a discesa nel tuo foglio di lavoro, hai mai provato ad aumentare la dimensione del carattere dell'elenco a discesa per rendere il record selezionato più grande e più leggibile come mostrato nell'immagine a sinistra? Questo articolo parlerà di una soluzione alternativa per risolverlo.

Aumentare la dimensione del carattere dell'elenco a discesa con il codice VBA per ingrandire lo zoom


Combina / importa più fogli di lavoro o file CSV in un foglio di lavoro o in una cartella di lavoro:

Nel tuo lavoro quotidiano, combinare più fogli di lavoro, cartelle di lavoro e file CSV in un singolo foglio di lavoro o cartella di lavoro può essere un enorme lavoro di mal di testa. Ma se lo hai Kutools for Excel, con la sua potente utilità - Combinare, puoi combinare rapidamente più fogli di lavoro, cartelle di lavoro o file CSV in un foglio di lavoro o in una cartella di lavoro.

doc calcola il grado di lettera 1

Kutools for Excel: con più di 200 pratici componenti aggiuntivi di Excel, liberi di provare senza limitazioni nei giorni 60. Scarica e prova gratis ora!


Aumentare la dimensione del carattere dell'elenco a discesa con il codice VBA per ingrandire lo zoom


Infatti, non esiste un modo diretto per aumentare la dimensione del carattere dell'elenco a discesa, ma è possibile applicare il seguente codice VBA per modificare l'impostazione dello zoom delle celle dell'elenco a discesa per ingrandire il testo. Si prega di fare come segue:

1. Vai al foglio di lavoro che contiene l'elenco a discesa che vuoi aumentare la dimensione del carattere.

2. Fare clic con il pulsante destro del mouse sulla scheda del foglio e selezionare Visualizza codice dal menu di scelta rapida, nel messaggio saltato fuori Microsoft Visual Basic, Applications Edition finestra, per favore copia e incolla il seguente codice nello spazio vuoto Modulo finestra:

Codice VBA: Aumenta la dimensione del carattere dell'elenco a discesa per ingrandire lo zoom della cella

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice 20160530
    On Error GoTo LZoom
    Dim xZoom As Long
    xZoom = 100
    If Target.Validation.Type = xlValidateList Then xZoom = 130
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

3. Quindi salva e chiudi questo codice, ora, quando fai clic sulle celle dell'elenco a discesa, lo zoom della cella verrà ingrandito e l'elenco a discesa apparirà più grande, ma, quando fai clic su altre celle non contengono l'elenco a discesa, il lo zoom della cella sarà normale.

Note: Nel codice sopra, xZoom = 130 cambierà le celle dell'elenco a discesa con lo zoom 130, puoi modificare questo numero di zoom secondo le tue necessità.


Demo: Aumenta la dimensione del carattere dell'elenco a discesa con il codice VBA per ingrandire lo zoom


Kutools per Excel risolve la maggior parte dei problemi e aumenta la produttività del 80%

  • Riutilizzo: Inserire rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Cifra le celle con password; Crea mailing list e invia email ...
  • Super Formula Bar (modifica facilmente più righe di testo e formula); Layout di lettura (leggere e modificare facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere i dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Previeni celle duplicate; Confronta le gamme...
  • Seleziona Duplica o Unica Righe; Seleziona righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molti libri di esercizi; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento alla formula; Creazione automatica di riferimenti a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • estrarre il testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare subtotali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtro ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale di grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle basate su colonne chiave; Dividi i dati in più fogli; Converti in batch xls, xlsx e PDF...
  • Oltre alle potenti funzionalità di 300. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzioni complete di prova gratuita di 30-day.
kte tab 201905

Scheda Office Porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Editore, accesso, Visio e progetto.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la tua produttività di 50% e riduce centinaia di clic del mouse per te ogni giorno!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ace · 10 months ago
    Hi, Just question i have pasted the code onto blank Module window (Right click in view code). Once i save, is function well that was good. But when i close the file and re-open it, the code was gone and no more enlarge for the drop down list. Can i know how to set for permanent use?
    • To post as a guest, your comment is unpublished.
      skyyang · 10 months ago
      Hello, Ace,
      To save the code, you should save the Excel file as Excel Macro-Enabled Workbook format. Please try it.
  • To post as a guest, your comment is unpublished.
    Paul Roberts · 1 years ago
    How can I apply this font change size to only one column? I have several columns with drop-down boxes and I only want one specific column to change font size?
  • To post as a guest, your comment is unpublished.
    Dave Harlev · 1 years ago
    This zooms the whole sheet to 130%
    How do I increase only the drop menu ?
    • To post as a guest, your comment is unpublished.
      skyyang · 1 years ago
      Hello, Dave,
      To only increase the drop down menu, here is a workaround to solve it.

      First, after inserting the drop down list in your worksheet, then you should insert an Combo Box (ActiveX Controls),and then apply the following VBA code into the sheet module code:

      Dim xRg As Range
      Private Sub ComboBox1_Change()
      On Error Resume Next
      xRg.Value = Me.ComboBox1.Text
      End Sub
      Private Sub Worksheet_SelectionChange(ByVal Target As Range)
      On Error GoTo LblExit
      With Me.ComboBox1
      .Visible = False
      If Target.Validation.Type = xlValidateList Then
      Target.Validation.InCellDropdown = False
      .ListWidth = 120
      .ListFillRange = ""
      .ListFillRange = Target.Validation.Formula1
      .Left = Target.Left
      .Top = Target.Top
      .Width = Target.Width
      .Height = Target.Height
      .Font.Size = 16
      .Visible = True
      Set xRg = Target
      End If
      End With
      LblExit:
      End Sub

      After inserting the code, now when you click the drop down list cell, a combo box will be displayed, and font size in the drop down menu is increased as you need. And the inserted combo box will be hidden automatically.

      Please try it, hope it can help you!
      • To post as a guest, your comment is unpublished.
        ITALO BELMONTE · 4 months ago
        Can you explain it step by step for dummies pls?
        • To post as a guest, your comment is unpublished.
          skyyang · 3 months ago
          Hello, ITALO,
          1. Insert the drop down you need in your worksheet;
          2. Then insert a Combo Box (ActiveX Controls) by clicking Developer > Insert > Combo Box (ActiveX Controls), and then drag the mouse to draw a Combo Box object;
          3. And then, right click your current used worksheet, choose View Code, and paste the above code into the module;
          4. At last, click Design Mode under the Developer tab to disable it.
          5. Now when you click the drop down list cell, a combo box will be displayed, and font size in the drop down menu is increased as you need.
          Please try, hope it can help you!
      • To post as a guest, your comment is unpublished.
        GJ · 8 months ago
        GENIUS! Thank you Skyyang! So grateful for your method! Works like a charm!
  • To post as a guest, your comment is unpublished.
    George · 1 years ago
    After using this code, I can't use return key on Excel. How can I code (install) return key?
  • To post as a guest, your comment is unpublished.
    John Driscoll · 1 years ago
    This does not work for me. I pasted the text as instructed. When i clicked on the drop down menu the font size was the same. When i then clicked on a different cell, the whole spreadsheet increased in size perhaps by 30%. Really would like a work around if possible
  • To post as a guest, your comment is unpublished.
    Ahmed Sobhy · 2 years ago
    Thanks, it works well
  • To post as a guest, your comment is unpublished.
    Noel · 2 years ago
    Hi, Just wondering why this feature disappear after the file is saved and re-open?
    • To post as a guest, your comment is unpublished.
      Miemie Yang · 2 years ago
      Hi, Noel, you should save the Excel file as Excel Macro-Enabled Workbook format.
  • To post as a guest, your comment is unpublished.
    Travis · 2 years ago
    Like the directions indicate, you must change the zoom from "100" to "130" or a different zoom to see any changes. However, the 1st comment is accurate in that it does not just change the drop down menu, but rather once you click on the cell it will zoom the entire sheet 130% to zoom in on that cell. Not very helpful because then you just have to zoom back out every time.
    • To post as a guest, your comment is unpublished.
      garth · 1 years ago
      or select an alternate cell in the workbook to return it to 100 as stated in the Macro

      Private Sub Worksheet_SelectionChange(ByVal Target As Range)'updateby Extendoffice 20160530 On Error GoTo LZoom Dim xZoom As Long xZoom = 100 If Target.Validation.Type = xlValidateList Then xZoom = 130LZoom: ActiveWindow.Zoom = xZoomEnd Sub
  • To post as a guest, your comment is unpublished.
    Harlem Eins · 2 years ago
    I'm running Office 2016 and using drop-down boxes. I tried the "Increase drop down list font size with VBA code to enlarge the zoom" but it does not work. Is there anything else I should do to make it work?

    Thank you!
  • To post as a guest, your comment is unpublished.
    Michael · 3 years ago
    So, this code makes the whole sheet zoom, not just the drop down box. It also says "cannot save...... VB Project in a macro disabled workbook". Blah blah blah. If I have to hunt all over hell's half acre to get a complete answer to this issue, this is not an answer.
    • To post as a guest, your comment is unpublished.
      Harlem Eins · 2 years ago
      [quote name="Michael"]So, this code makes the whole sheet zoom, not just the drop down box. It also says "cannot save...... VB Project in a macro disabled workbook". Blah blah blah. If I have to hunt all over hell's half acre to get a complete answer to this issue, this is not an answer.[/quote]

      Simply save the workbook as xlsm and follow the steps again. BTW I tried it and it does NOT work for me at all; zoom is still at 100%.