Ko z VBA manipulirate z delovnim listom, boste morda morali samodejno prilagoditi svoje stolpce, da prikažete najlepši možni končni rezultat. Tukaj je opisano, kako samodejno prilagodite stolpce z uporabo VBA.
Samodejno prilagodi stolpec z uporabo VBA
Ta koda se samodejno prilega stolpcem A in B. Samodejna prilagoditev se uporabi na aktivnem listu.
1 | Stolpci ("A: B"). Celoten stolpec.Avtofit |
Samodejno prilagodi vse rabljene stolpce
Kaj pa, če želite samodejno prilagoditi vse uporabljene stolpce na delovnem listu? Uporabite zgornjo metodo v kombinaciji s štetjem števila uporabljenih stolpcev in zanko.
Naslednja koda samodejno prilagodi vse uporabljene stolpce z uporabo VBA:
1234567891011 | Sub AutofitAllUsed ()Dim x kot celo številoZa x = 1 Za ActiveSheet.UsedRange.Columns.CountStolpci (x) .EntireColumn.autofitNaslednji xEnd Sub |