Vai al contenuto principale

Excel: come espandere la cella per mostrare tutti i contenuti quando si fa clic

In alcuni casi, se il contenuto della cella è più lungo della larghezza della cella e sono presenti valori nelle celle della colonna successiva, solo parti del contenuto vengono mostrate come mostrato nell'immagine sottostante. Per evitare di modificare la larghezza e l'altezza delle celle, puoi fare clic sulla cella e visualizzare l'intero contenuto nella barra della formula. Ma se la barra della formula è nascosta o più corta del contenuto, come si fa? Qui vengono introdotti due metodi che possono mostrare il contenuto della cella in una casella di testo quando si fa clic su di essa.
completamento automatico da un altro elenco

Espandi la cella per mostrare tutti i contenuti inserendo una casella di testo Controlli Active X

Espandi la cella per mostrare tutti i contenuti utilizzando la barra delle formule più grande di Kutools per Excel

Nota: i metodi forniti in questo tutorial sono testati in Excel 2021, potrebbero esserci delle differenze nelle diverse versioni di Excel.


Espandi la cella per mostrare tutti i contenuti inserendo una casella di testo Controlli Active X

1. Attiva il foglio di lavoro in cui desideri espandere la cella, fai clic Costruttori > inserire > Casella di testo (controlli ActiveX).
completamento automatico da un altro elenco

Se non c'è Costruttori scheda nella barra multifunzione, visualizzala all'inizio, visualizza questo tutorial Come mostrare/visualizzare la scheda sviluppatore nella barra multifunzione di Excel

2. Quindi trascina il cursore per disegnare una casella di testo con una larghezza e un'altezza che possono mostrare il contenuto più lungo delle celle. Ricorda il nome di questa casella di testo, ecco TextBox1.
completamento automatico da un altro elenco

3. Fare clic con il pulsante destro del mouse sulla casella di testo e fare clic Properties dal menu contestuale. Poi dentro Properties riquadro, scegli I veri dagli elenchi a discesa in Multilinea ed Involucro di parole sezioni. Quindi chiudere il Properties riquadro.
completamento automatico da un altro elenco  completamento automatico da un altro elenco

Oppure puoi selezionare Vero dall'elenco a discesa in Dimensione dell'auto sezione nel riquadro Proprietà, la casella di testo verrà ridimensionata automaticamente in base alla lunghezza del contenuto della cella su cui fai clic.

4. Fare clic con il pulsante destro del mouse sulla scheda del nome del foglio nella barra di stato e fare clic Visualizza codice dal menu di scelta rapida.

5. Nel Microsoft Visual Basic, Applications Edition finestra, copia e incolla sotto il codice nello script vuoto.

VBA: espandi la cella per mostrare i contenuti

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub

completamento automatico da un altro elenco

Nota che TextBox1 è il nome della casella di testo che hai disegnato e A1: B4 è l'intervallo in cui funziona il codice, modificalo secondo necessità.

6. Torna al foglio, fai clic Costruttori > Modalità di progettazione esistere modalità di progettazione.
completamento automatico da un altro elenco

Ora quando fai clic sulla cella, la casella di testo apparirà accanto ad essa e mostrerà l'intero contenuto della cella.
completamento automatico da un altro elenco


Espandi la cella per mostrare tutti i contenuti utilizzando la barra delle formule più grande di Kutools per Excel

Se hai installato Kutools per Excel, la barra della formula più grande fornita mostrerà tutto il contenuto della cella in una casella spuntata quando fai clic finché lo attivi facendo clic Kutools > Barra della formula più grande.
completamento automatico da un altro elenco

Suggerimenti:

1. Con la barra della formula più grande, tranne per visualizzare il contenuto della cella attiva, puoi anche modificare il contenuto della cella nella barra della formula più grande.

2. Puoi ridimensionare la barra della formula più grande trascinando l'angolo in basso a destra della barra.

3. Se si selezionano più celle, nella barra della formula più grande viene visualizzato solo il contenuto della prima cella della selezione.

Maggiori dettagli su Bigger Formula Bar, si prega di visitare il suo lezione.


Altre operazioni (articoli)

Come disattivare il completamento automatico
Ecco un'opzione in Excel che può interrompere il completamento automatico.

Come ridurre le dimensioni del file Excel?
A volte, ci vorranno alcuni minuti per aprire o salvare se il file Excel è troppo grande. Per risolvere questo problema, qui in questo tutorial, ti spiega come ridurre le dimensioni del file Excel rimuovendo i contenuti o i formati non necessari o mai utilizzati.

Come completare automaticamente le celle da un'altra tabella
In questo tutorial, si parla di come completare automaticamente altre celle di colonna da una tabella in un altro foglio dopo aver inserito il valore di una colonna.

Come applicare l'ombreggiatura a righe / colonne pari o dispari (alternative) in Excel?
Durante la progettazione di un foglio di lavoro, molte persone tendono ad applicare l'ombreggiatura a righe o colonne pari o dispari (alternative) per rendere il foglio di lavoro più visivo. Questo articolo ti mostrerà due metodi per applicare l'ombreggiatura a righe / colonne pari o dispari in Excel.


  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne e conservazione dei dati; Contenuto delle celle divise; Combina righe duplicate e somma / media... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Formule preferite e di inserimento rapido, Intervalli, grafici e immagini; Crittografa celle con password; Crea mailing list e invia email ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Raggruppamento tabelle pivot per numero della settimana, giorno della settimana e altro ... Mostra celle sbloccate e bloccate da diversi colori; Evidenzia le celle che hanno formula / nome...
scheda kte 201905
  • 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!
fondo officetab
Comments (5)
Rated 4.5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
I am having the same issue as Neil. Code works fine, except when selecting any full row or column that include the cell range in the code, i am getting the Run-time error '94'. Invalid use of Null, highlighting to .Text = Target.Text. This code was very helpful except for the debug popping up every time. Please provide a solution
This comment was minimized by the moderator on the site
Hi, I have modified the code, it will not pop up a bug dialog when you select a column of cells or multiple cells, and the textbox will be hidden as well. Please try:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
If Target.CountLarge > 1 Then
    TextBox1.Visible = False
    Exit Sub
End If
xRgAddress = "A1:A20" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub
This comment was minimized by the moderator on the site
Sunny, this is absolutely perfect - thank you so much for your time and expertise.
This comment was minimized by the moderator on the site
Good day, this code is great - I have two columns included in my code and the expanding text box pops up no issues when a cell is clicked - however, if I highlight multiple cells including one of the cells I wish to have the text box pop up - I get run-time error '94' - Invalid use of Null. Debugging highlights the 2nd 'Text = Target.Text' line.

Appreciate any feedback.
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
Hi, do you want to show all contents of the selected cells to the textbox? Or just supports to select cells but show contents of the first one cell of the selection?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations