Ez az oktatóanyag bemutatja, hogyan állítható be a sormagasság és az oszlopszélesség a VBA használatával.
Az Excel sormagasságai és oszlopszélességei megváltoztathatók a VBA -ban a .RowHeight és .ColumnWidth tulajdonságok beállításával.
Állítsa be az oszlop szélességét a VBA segítségével
Makró beállításához oszlop szélesség az A – E oszlopok közül:
123 | Aloszlop_szélessége ()Oszlopok ("A: E"). Oszlopszélesség = 30End Sub |
Állítsa be a sor magasságát a VBA segítségével
Makró beállításához sor magasság az 1. sorból:
123 | Részsormagasság ()Sorok ("1: 1"). RowHeight = 30End Sub |
Autofit oszlop szélessége
Az Excel lehetővé teszi az oszlopszélességek automatikus illesztését. Ez a funkció úgy állítja be az oszlop szélességét, hogy az oszlop (ok) elég szélesek legyenek ahhoz, hogy elférjen az oszlopban található összes szöveg.
Az oszlopszélességek automatikus illesztése a VBA -ban:
1 | Oszlopok ("A: B"). Automatikus illesztés |
Erről bővebben egy másik cikkben írtunk arról, hogyan lehet automatikusan beállítani egy oszlopot a VBA -ból, beleértve az összes használt oszlop automatikus illesztését.
Autofit sormagasság
A sorok magasságát is automatikusan beállíthatja hasonló módszerrel:
1 | Sorok ("1: 2"). Automatikus illesztés |
Állítsa be a cella szélességét
Az oszlopok szélességét cella hivatkozásával is módosíthatja:
1 | Tartomány ("a1"). EntireColumn.ColumnWidth = 20 |
Állítsa be a cella magasságát
Vagy módosítsa a sorok magasságát egy cella hivatkozásával:
1 | Tartomány ("a1"). EntireRow.RowHeight = 10 |
Oszlop szélességének megadása
Az oszlop szélességének meghatározása:
12 | halvány iColumnWidth, amígiColumnWidth = oszlopok ("a") |
Megjegyzés: Ez Null értéket ad vissza, ha a tartomány összes oszlopa nem azonos szélességű.
Szerezze meg a sor magasságát
Hasonlóképpen megkaphatja a sor magasságát:
12 | halvány iRowHeight, ameddigiRowHeight = sorok ("1"). RowHeight |