Note: The other languages of the website are Google-translated. Back to English

Excel: Hur man expanderar cell för att visa allt innehåll när man klickar

I vissa fall, om cellinnehållet är längre än cellens bredd och det finns värden i nästa kolumnceller, visas endast delar av innehållet som skärmbilden nedan. För att undvika att ändra bredden och höjden på cellerna kan du klicka på cellen och se hela innehållet i formelfältet. Men om formelfältet är dold eller kortare än innehållet, hur gör man det? Här introduceras en VBA som kan visa cellinnehållet i en textruta när man klickar på den.
automatisk komplett från en annan lista

Obs: metoderna som tillhandahålls i denna handledning testas i Excel 2021, det kan finnas några olika i olika Excel-versioner.


Expandera cellen för att visa allt innehåll när du klickar

1. Aktivera kalkylbladet som du vill expandera cell, klicka Utvecklare > Insert > Textruta (ActiveX-kontroller).
automatisk komplett från en annan lista

Om det inte finns något Utvecklare fliken i menyfliksområdet, vänligen visa den först, vänligen se denna handledning Hur man visar/visar utvecklarfliken i Excel Ribbon

2. Dra sedan markören för att rita en textruta med en bredd och höjd som kan visa det längsta innehållet i celler. Kom ihåg den här textrutans namn, här är TextBox1.
automatisk komplett från en annan lista

3. Högerklicka på textrutan och klicka Fastigheter från snabbmenyn. Sedan i Fastigheter välj Sant från rullgardinslistor i MultiLine och WordWrap avsnitt. Stäng sedan Fastigheter rutan.
automatisk komplett från en annan lista  automatisk komplett från en annan lista

Eller så kan du välja True från rullgardinsmenyn i AutoSize avsnittet i rutan Egenskaper kommer textrutan att anpassas automatiskt baserat på längden på cellinnehållet du klickar på.

4. Högerklicka på arknamnsfliken i statusfältet och klicka Visa kod från snabbmenyn.

5. I Microsoft Visual Basic för applikationer fönster, kopiera och klistra in under koden i det tomma skriptet.

VBA: Expandera cellen för att visa innehållet

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

automatisk komplett från en annan lista

Lägg märke till att TextBox1 är namnet på textrutan du ritade, och A1:B4 är intervallet som denna kod fungerar, ändra dem efter behov.

6. Gå tillbaka till arket, klicka Utvecklare > Designläge att existera designläge.
automatisk komplett från en annan lista

När du nu klickar på cellen visas textrutan bredvid den och visar hela innehållet i cellen.
automatisk komplett från en annan lista


Annan verksamhet (artiklar)

Hur man stänger av automatisk komplettering
Här är ett alternativ i Excel som kan stoppa automatisk komplettering.

Hur man minskar Excel-filstorleken?
Ibland tar det några minuter att öppna eller spara om Excel-filen är för stor. För att lösa detta problem, här i denna handledning, berättar den hur du minskar Excel-filstorleken genom att ta bort innehållet eller formaten som är onödiga eller aldrig används.

Hur man fyller i celler automatiskt från en annan tabell
I den här handledningen talar det om hur man automatiskt kompletterar andra kolumnceller från en tabell i ett annat ark efter att ha angett ett kolumnvärde.

Hur applicerar jag skuggning på udda eller jämna (alternativa) rader / kolumner i Excel?
När man utformar ett kalkylblad tenderar många att använda skuggning på udda eller jämna (alternativa) rader eller kolumner för att göra kalkylbladet mer visuellt. Den här artikeln visar två metoder för att tillämpa skuggning på udda eller jämna rader / kolumner i Excel.



  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner och förvaring av data; Delat cellinnehåll; Kombinera duplicerade rader och summa / genomsnitt... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Favorit och sätt snabbt in formler, Intervall, diagram och bilder; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Gruppering av pivottabell efter veckonummer, veckodagen och mer ... Visa olåsta, låsta celler av olika färger; Markera celler som har formel / namn...
kte-flik 201905
  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50% och minskar hundratals musklick åt dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (0)
Inga betyg än. Bli först med att betygsätta!
Det finns inga kommentarer här ännu
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser