Hoe kolombreedte automatisch aanpassen in Excel?
In Excel kunt u de kolombreedte aanpassen aan de celinhoud door de AutoFit Kolombreedte voorzien zijn van. Soms wilt u dat de kolombreedte automatisch wordt bijgewerkt op basis van de langste tekst in die kolom, dat wil zeggen dat wanneer u een lange tekstreeks in de cel invoert, de kolombreedte automatisch wordt aangepast aan de lengte van de inhoud. Is dit mogelijk om het in Excel af te handelen?
Kolombreedte automatisch aanpassen met VBA-code
Kolommen automatisch aanpassen met sneltoetsen
Kolombreedte automatisch aanpassen met VBA-code
Het lijkt erop dat de kolombreedte automatisch wordt bijgewerkt met de lengte van de celinhoud, is een interessante truc, je kunt de volgende VBA-code gebruiken om het af te maken.
1. Houd de ALT + F11 toetsen, en het opent de Microsoft Visual Basic for Applications-venster.
2. Dubbelklik vervolgens Dit Werkboek in de VBA-project objecten in het linkerdeelvenster om een lege module te openen en kopieer en plak vervolgens de volgende VBA-code in de module:
VBA-code: kolom automatisch aanpassen met in werkmap
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
3. Sla deze code vervolgens op en sluit deze. Als u nu lange tekst in een cel invoert, wordt de kolombreedte automatisch aangepast aan de inhoud.
Kolommen automatisch aanpassen met sneltoetsen
Als je meerdere kolommen hebt waarvan een deel van de celinhoud verborgen is zoals in de volgende schermafbeelding, wil je de kolombreedte in één keer aanpassen aan hun inhoud. De volgende sneltoetsen kunnen u helpen.
1. Selecteer het gegevensbereik waarvan u de kolombreedte wilt wijzigen.
2. Houd ingedrukt anders toets en druk op H+O+I, en nu zijn uw kolombreedten onmiddellijk automatisch aan hun inhoud aangepast. Zie screenshot:
Opmerking: Als u Excel 2003 en eerdere versies gebruikt, moet u deze sneltoetsen gebruiken: ALT+O+C+A.
Gerelateerde artikelen:
Hoe rijhoogte van samengevoegde cellen automatisch aanpassen in Excel?
Hoe kan ik de rijhoogte of kolombreedte aanpassen aan tekst in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!