Denna handledning visar hur du ställer in radhöjd och kolumnbredder med VBA.
Excel Radhöjder och kolumnbredder kan ändras i VBA genom att ställa in egenskaperna .RowHeight och .ColumnWidth.
Ställ in kolumnbredd med VBA
Makro för att ställa in kolumnbredd av kolumnerna A till E:
| 123 | Underkolumn_bredd ()Kolumner ("A: E"). ColumnWidth = 30Avsluta Sub |
Ställ in radhöjd med VBA
Makro för att ställa in Radhöjd på rad 1:
| 123 | Sub RowHeight ()Rader ("1: 1"). RowHeight = 30Avsluta Sub |
Autofit -kolumnbredd
Excel erbjuder möjlighet att "Autofit" kolumnbredder. Denna funktion justerar kolumnbredden så att kolumnerna är tillräckligt breda för att passa all text som finns i den kolumnen.
Så här automatiskt anpassar du kolumnbredder i VBA:
| 1 | Kolumner ("A: B"). Automatisk anpassning |
Vi skrev mer om detta i en annan artikel om hur man automatiskt anpassar en kolumn från VBA, inklusive hur man automatiskt anpassar alla använda kolumner.
Anpassa radhöjd
Du kan också automatiskt anpassa radhöjder med en liknande metod:
| 1 | Rader ("1: 2"). Automatisk anpassning |
Ställ in cellbredd
Du kan också justera kolumnbredder genom att referera till en cell:
| 1 | Område ("a1"). EntireColumn.ColumnWidth = 20 |
Ställ in cellhöjd
Eller justera radhöjder genom att referera till en cell:
| 1 | Område ("a1"). EntireRow.RowHeight = 10 |
Skaffa kolumnbredd
Så här får du kolumnbredden på en kolumn:
| 12 | dim iColumnWidth så längeiColumnWidth = kolumner ("a"). ColumnWidth |
Obs! Detta returnerar Null om alla kolumner i intervallet inte har samma bredd.
Skaffa radhöjd
På samma sätt kan du få radhöjden:
| 12 | dim iRowHeight så längeiRowHeight = rader ("1"). RowHeight |
