Note: The other languages of the website are Google-translated. Back to English
Logga in  \/ 
x
or
x
Registrera  \/ 
x

or

Hur passar jag automatiskt kolumnbredd i Excel?

I Excel kan du justera kolumnbredden så att den passar cellinnehållet snabbt med hjälp av Autopassa kolumnbredd funktion. Ibland skulle du vilja att kolumnbredden automatiskt uppdateras baserat på den längsta texten i den kolumnen, det vill säga när du matar in någon lång textsträng i cellen, ändras kolumnbredden automatiskt så att den passar innehållets längd. Är det möjligt att hantera det i Excel?

Anpassa kolumner automatiskt med VBA-kod

Anpassa kolumner automatiskt med snabbtangenter

Fliken Office Aktiverar flikredigering och surfning i Office, och gör ditt arbete mycket enklare ...
Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%
  • Återanvänd allt: Lägg till de mest använda eller komplexa formlerna, diagrammen och allt annat till dina favoriter och återanvänd dem snabbt i framtiden.
  • Mer än 20 textfunktioner: Extrahera nummer från textsträng; Extrahera eller ta bort en del av texterna; Konvertera siffror och valutor till engelska ord.
  • Sammanfoga verktyg: Flera arbetsböcker och ark till en; Slå ihop flera celler / rader / kolumner utan att förlora data; Slå samman duplicerade rader och summa.
  • Dela verktyg: Dela data i flera ark baserat på värde; En arbetsbok för flera Excel-, PDF- eller CSV-filer; En kolumn till flera kolumner.
  • Klistra över Dolda / filtrerade rader; Räkna och summa av bakgrundsfärg; Skicka personliga e-postmeddelanden till flera mottagare i bulk.
  • Superfilter: Skapa avancerade filterscheman och tillämpas på alla ark; Svart per vecka, dag, frekvens och mer; Filter med fetstil, formler, kommentarer ...
  • Mer än 300 kraftfulla funktioner; Fungerar med Office 2007-2019 och 365; Stöder alla språk; Enkel distribution i ditt företag eller organisation.

pil blå höger bubbla Anpassa kolumner automatiskt med VBA-kod

Det verkar göra kolumnbredden automatiskt uppdaterad med cellinnehållets längd är ett intressant trick, du kan använda följande VBA-kod för att avsluta den.

1. Håll ner ALT + F11 knapparna och det öppnar Microsoft Visual Basic for Applications-fönstret.

2. Dubbelklicka sedan Denna arbetsbok i VBA-projekt objekt i den vänstra rutan för att öppna en tom modul och sedan kopiera och klistra in följande VBA-kod i modulen:

VBA-kod: automatisk passningskolumn med i arbetsboken

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'Update 20141127
Dim xCol, xoutCol
xCol = Target.Column
If xCol > 52 Then
xoutCol = Chr(Int((xCol - 1) / 52) + 64) & _
Chr(Int((xCol - 27) / 26) + 64) & _
Chr(Int((xCol - 27) Mod 26) + 65)
ElseIf xCol > 26 Then
xoutCol = Chr(Int((xCol - 1) / 26) + 64) & _
Chr(Int((xCol - 1) Mod 26) + 65)
Else
xoutCol = Chr(xCol + 64)
End If
Columns(xoutCol & ":" & xoutCol).AutoFit
End Sub

doc-autofit-kolumn-bredd-1

3. Spara och stäng sedan den här koden, och nu när du anger lång text i en cell kommer kolumnbredden att justeras så att den passar innehållet automatiskt.


pil blå höger bubbla Anpassa kolumner automatiskt med snabbtangenter

Om du har flera kolumner där en del av cellinnehållet är dolt som följande skärmdump visas, vill du ändra storlek på kolumnbredden på en gång för att passa deras innehåll. Följande genvägar kan hjälpa dig.

doc-autofit-kolumn-bredd-1

1. Välj det dataområde som du vill ändra storlek på kolumnbredden.

2. Håll ner andra och tryck på H + O + I, och nu har dina kolumnbredder automatiskt anpassats till deras innehåll omedelbart. Se skärmdump:

doc-autofit-kolumn-bredd-1

Notera: Om du använder Excel 2003 och tidigare versioner måste du använda dessa kortkommandon: ALT + O + C + A..


Relaterade artiklar:

Hur passar jag automatiskt radhöjd för sammanslagna celler i Excel?

Hur ändrar jag storlek på radhöjd eller kolumnbredd för att passa text i Excel?


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • 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 utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... 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 ...
  • 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...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2019 och 365. Stöder alla språk. Enkel distribution i ditt företag eller organisation. Fullständiga funktioner 30-dagars gratis provperiod. 60-dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • 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

 

Say something here...
symbols left.
You are guest
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.
    Bakrudin · 2 years ago
    saya tertarik dengan code VB yang anda terapkan tentang Cara mengisi kolom excel dengan VBA, jika pertanyaannya begini Bagaimana cara mengisi kolom dan baris tertentu di excel dnegan VBA?
    jadi yang terisi adalah kolom dan barisnya secara otomatis? mohon jawabannya..