Ta vadnica bo pokazala, kako nastavite višino vrstice in širino stolpcev z uporabo VBA.
Višine vrstic Excel in širine stolpcev lahko v VBA spremenite tako, da nastavite lastnosti .RowHeight in .ColumnWidth.
Širino stolpca nastavite z VBA
Makro za nastavitev širina stolpca stolpcev od A do E:
123 | Širina pod stolpca ()Stolpci ("A: E"). Širina stolpca = 30End Sub |
Nastavite višino vrstice z VBA
Makro za nastavitev višina vrstice prve vrstice:
123 | Sub RowHeight ()Vrstice ("1: 1"). Višina vrstice = 30End Sub |
Samodejno prilagodi širino stolpca
Excel ponuja možnost samodejnega prilagajanja širine stolpcev. Ta funkcija prilagodi širino stolpca, tako da so stolpci dovolj široki, da ustrezajo vsem besedilom v tem stolpcu.
Če želite samodejno prilagoditi širino stolpcev v VBA:
1 | Stolpci ("A: B"). Samodejno prilagodi |
Več o tem smo pisali v drugem članku o tem, kako samodejno prilagoditi stolpec iz VBA, vključno s tem, kako samodejno prilagoditi vse uporabljene stolpce.
Samodejna višina vrstice
Višine vrstic lahko tudi samodejno prilagodite na podoben način:
1 | Vrstice ("1: 2"). Samodejno prilagodi |
Nastavite širino celice
Širine stolpcev lahko prilagodite tudi s sklicevanjem na celico:
1 | Obseg ("a1"). EntireColumn.ColumnWidth = 20 |
Nastavite višino celice
Ali pa prilagodite višino vrstic s sklicevanjem na celico:
1 | Obseg ("a1"). EntireRow.RowHeight = 10 |
Pridobite širino stolpca
Če želite pridobiti širino stolpca:
12 | dim iColumnWidth tako dolgoiColumnWidth = stolpci ("a"). ColumnWidth |
Opomba: To bo vrnilo vrednost Null, če vsi stolpci v obsegu nimajo enake širine.
Pridobite višino vrstice
Podobno lahko dobite višino vrstice:
12 | dim iRowHeight tako dolgoiRowHeight = vrstice ("1"). RowHeight |