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

Excel: Sådan udvides celle for at vise alt indhold, når du klikker

I nogle tilfælde, hvis celleindholdet er længere end cellens bredde, og der er værdier i de næste kolonneceller, vises kun dele af indholdet som vist på nedenstående skærmbillede. For at undgå at ændre cellernes bredde og højde kan du klikke på cellen og se hele indholdet i formellinjen. Men hvis formellinjen er skjult eller kortere end indholdet, hvordan gør man det så? Her introduceres en VBA, som kan vise celleindholdet i en tekstboks, når du klikker på den.
automatisk fuldfør fra en anden liste

Bemærk: metoderne i denne vejledning er testet i Excel 2021, der kan være nogle forskellige i forskellige Excel-versioner.


Udvid cellen for at vise alt indhold, når du klikker

1. Aktiver det regneark, du vil udvide celle, klik Udvikler > indsatte > Tekstboks (ActiveX-kontroller).
automatisk fuldfør fra en anden liste

Hvis der ikke er nogen Udvikler fanen i båndet, vis den først, se venligst denne vejledning Sådan viser/viser du udviklerfane i Excel-bånd

2. Træk derefter markøren for at tegne en tekstboks med en bredde og højde, der kan vise det længste indhold af celler. Husk denne tekstboks navn, her er TextBox1.
automatisk fuldfør fra en anden liste

3. Højreklik på tekstboksen, og klik Ejendomme fra kontekstmenuen. Så ind Ejendomme vælg Sand fra drop-down lister i MultiLine og Tekstombrydning sektioner. Luk derefter Ejendomme rude.
automatisk fuldfør fra en anden liste  automatisk fuldfør fra en anden liste

Eller du kan vælge Sand fra rullelisten i Autostørrelse sektionen i Egenskaber-ruden, vil tekstboksen blive automatisk størrelse baseret på længden af ​​det celleindhold, du klikker på.

4. Højreklik på fanen arknavn i statuslinjen, og klik Vis kode fra kontekstmenuen.

5. i Microsoft Visual Basic til applikationer vindue, kopier og indsæt nedenstående kode til det tomme script.

VBA: Udvid celle for at vise indholdet

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 fuldfør fra en anden liste

Bemærk, at TextBox1 er navnet på den tekstboks, du tegnede, og A1:B4 er det område, som denne kode fungerer, skift dem efter behov.

6. Gå tilbage til arket, klik Udvikler > Design Mode at eksistere designtilstand.
automatisk fuldfør fra en anden liste

Når du nu klikker på cellen, vises tekstboksen ved siden af ​​den og viser hele indholdet af cellen.
automatisk fuldfør fra en anden liste


Andre operationer (artikler)

Sådan slår du Autofuldførelse fra
Her er en mulighed i Excel, der kan stoppe den automatiske fuldførelse.

Hvordan reducerer man Excel-filstørrelsen?
Nogle gange vil det tage minutter at åbne eller gemme, hvis Excel-filen er for stor. For at løse dette problem, her i denne tutorial, fortæller den dig, hvordan du reducerer Excel-filstørrelsen ved at fjerne indholdet eller formaterne, som er unødvendige eller aldrig brugt.

Sådan udfyldes celler automatisk fra en anden tabel
I denne tutorial taler det om, hvordan man automatisk udfylder andre kolonneceller fra en tabel i et andet ark efter at have indtastet en kolonneværdi.

Hvordan anvendes skygge på ulige eller lige (alternative) rækker / kolonner i Excel?
Mens man designer et regneark, har mange mennesker tendens til at anvende skygge på ulige eller lige (alternative) rækker eller kolonner for at gøre regnearket mere visuelt. Denne artikel viser dig to metoder til at anvende skygge på ulige eller lige rækker / kolonner i Excel.



  • Super formel bar (let redigere flere linjer med tekst og formel); Læsning Layout (let at læse og redigere et stort antal celler); Indsæt til filtreret rækkevidde...
  • Flet celler / rækker / kolonner og opbevaring af data; Split celler indhold; Kombiner duplikatrækker og sum / gennemsnit... Forhindre duplikerede celler; Sammenlign områder...
  • Vælg Duplicate eller Unique Rækker; Vælg tomme rækker (alle celler er tomme); Super Find og Fuzzy Find i mange arbejdsbøger; Tilfældig valg ...
  • Præcis kopi Flere celler uden at ændre formelreference; Auto Opret referencer til flere ark; Indsæt kugler, Afkrydsningsfelter og mere ...
  • Foretrukne og hurtigt indsætte formler, Områder, diagrammer og billeder; Krypter celler med adgangskode Opret postliste og send e-mails ...
  • Uddrag tekst, Tilføj tekst, Fjern efter position, Fjern mellemrum; Opret og udskriv personsøgningssubtotaler; Konverter mellem celler indhold og kommentarer...
  • Superfilter (gem og anvend filterskemaer på andre ark); Avanceret sortering efter måned / uge / dag, hyppighed og mere; Specielt filter af fed, kursiv ...
  • Kombiner arbejdsbøger og arbejdsark; Fletabeller baseret på nøglekolonner; Opdel data i flere ark; Batch Konverter xls, xlsx og PDF...
  • Pivottabelgruppering efter ugenummer, ugedag og mere ... Vis ulåste, låste celler ved forskellige farver; Fremhæv celler, der har formel / navn...
kte-fane 201905
  • Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
  • Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
  • Øger din produktivitet med 50% og reducerer hundredvis af museklik for dig hver dag!
officetab bund
Sorter kommentarer efter
Kommentarer (0)
Ingen vurderinger endnu. Vær den første til at bedømme!
Der er endnu ingen kommentarer her
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder