Excel: Cum să extindeți celula pentru a afișa tot conținutul când faceți clic

În unele cazuri, dacă conținutul celulei este mai lung decât lățimea celulei și există valori în celulele coloanei următoare, numai părți din conținut sunt afișate ca în captura de ecran de mai jos. Pentru a evita modificarea lățimii și înălțimii celulelor, puteți face clic pe celulă și puteți vizualiza întregul conținut în bara de formule. Dar dacă bara de formule este ascunsă sau mai scurtă decât conținutul, cum se face? Aici sunt prezentate două metode care pot afișa conținutul celulei într-o casetă de text atunci când faceți clic pe ea.

Extindeți celula pentru a afișa tot conținutul inserând o casetă de text Active X Controls

Extindeți celula pentru a afișa tot conținutul utilizând Bara de formule mai mare a Kutools pentru Excel

Notă: metodele furnizate în acest tutorial sunt testate în Excel 2021, pot exista unele diferențe în diferite versiuni de Excel.

1. Activați foaia de lucru pe care doriți să o extindeți celula, faceți clic Dezvoltator > Insera > Casetă de text (Controale ActiveX).

Dacă nu există Dezvoltator fila din panglică, vă rugăm să o afișați mai întâi, vă rugăm să vizualizați acest tutorial Cum să afișați/afișați fila Dezvoltator în panglica Excel

2. Apoi trageți cursorul pentru a desena o casetă de text cu o lățime și o înălțime care pot afișa cel mai lung conținut de celule. Amintiți-vă numele acestei casete de text, aici este TextBox1.

3. Faceți clic dreapta pe caseta de text și faceți clic Proprietăţi din meniul contextual. Apoi în Proprietăţi panoul, alegeți Adevărat din listele derulante din MultiLine si WordWrap secțiuni. Apoi închideți Proprietăţi panoul.
  >>>  

Sau puteți selecta Adevărat din lista derulantă din Dimensiune automată secțiunea din panoul Proprietăți, caseta de text va fi dimensionată automat în funcție de lungimea conținutului celulei pe care faceți clic.

4. Faceți clic dreapta pe fila cu numele foii din bara de stare și faceți clic Afișați codul din meniul contextual.

5. În Microsoft Visual Basic pentru aplicații fereastră, copiați și lipiți codul de mai jos pe scriptul gol.

VBA: extindeți celula pentru a afișa conținutul

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

Observați că TextBox1 este numele casetei de text pe care ați desenat-o și A1:B4 este intervalul în care funcționează acest cod, modificați-le după cum aveți nevoie.

6. Reveniți la foaie, faceți clic Dezvoltator > Mod de proiectare să existe modul de proiectare.

Acum, când faceți clic pe celulă, caseta de text va apărea lângă ea și va afișa întregul conținut al celulei.

Dacă ați instalat Kutools pentru Excel, Bara de formule mai mare pe care a furnizat-o va afișa tot conținutul celulei într-o casetă deschisă atunci când faceți clic atâta timp cât o activați făcând clic Kutools > Bar de formule mai mare.

Sfat:

1. Cu Bigger Formula Bar, cu excepția pentru a vizualiza conținutul celulei active, puteți edita și conținutul celulei în Bigger Formula Bar.

2. Puteți redimensiona bara de formule mai mare trăgând colțul din dreapta jos al barei.

3. Dacă selectați mai multe celule, numai conținutul primei celule a selecției este afișat în Bara de formule mai mare.

Mai multe detalii despre Bigger Formula Bar, vă rugăm să vizitați tutorialul său.