Nakon što manipulirate radnim listom s VBA -om, možda će biti potrebno automatsko prilagođavanje stupaca kako biste prikazali najljepši mogući krajnji rezultat. Evo kako automatski prilagoditi stupce pomoću VBA.
Automatsko prilagođavanje stupca pomoću VBA
Ovaj se kôd automatski uklapa u stupce A i B. Automatsko uklapanje primjenjuje se na aktivni list.
1 | Stupci ("A: B"). Cijela kolona.Autofit |
Automatski podesi sve rabljene stupce
Što ako želite automatski prilagoditi sve korištene stupce na radnom listu? Upotrijebite gornju metodu u kombinaciji s Broji broj iskorištenih stupaca i petlju.
Sljedeći kod automatski prilagođava sve korištene stupce koristeći VBA:
1234567891011 | Sub AutofitAllUsed ()Dim x kao cijeli brojZa x = 1 Za ActiveSheet.UsedRange.Columns.CountStupci (x) .CijelaKolona.autofitSljedeći xKraj podm |