Ovaj će vodič pokazati kako postaviti visinu retka i širinu stupaca pomoću VBA.
Visine redova Excel i širine stupaca mogu se promijeniti u VBA postavljanjem svojstava .RowHeight i .ColumnWidth.
Postavite širinu stupca s VBA
Makro za postavljanje širina stupa stupaca od A do E:
123 | Širina_dr. Stupca ()Stupci ("A: E"). Širina stupca = 30Kraj podm |
Postavite visinu reda s VBA
Makro za postavljanje visina reda prvog reda:
123 | Visina podreda ()Redci ("1: 1"). Visina reda = 30Kraj podm |
Automatska prilagodba širine stupaca
Excel nudi mogućnost "Automatskog prilagođavanja" širine stupaca. Ova značajka prilagođava širinu stupca tako da su stupci dovoljno široki da stanu u sav tekst koji se nalazi u tom stupcu.
Za automatsko prilagođavanje širina stupaca u VBA:
1 | Stupci ("A: B"). Automatsko uklapanje |
O tome smo više pisali u drugom članku o tome kako Automatski prilagoditi stupac iz VBA -e, uključujući kako Automatski prilagoditi sve korištene stupce.
Automatska prilagodba visine reda
Visine redova možete i automatski prilagoditi na sličan način:
1 | Redci ("1: 2"). Automatsko prilagođavanje |
Postavite širinu ćelije
Širine stupaca možete prilagoditi i pozivanjem na ćeliju:
1 | Raspon ("a1"). EntireColumn.ColumnWidth = 20 |
Postavite visinu ćelije
Ili prilagodite visine reda pozivanjem na ćeliju:
1 | Raspon ("a1"). EntireRow.RowHeight = 10 |
Dobijte širinu stupca
Da biste dobili širinu stupca stupca:
12 | dim iColumnWidth koliko godiColumnWidth = stupci ("a"). ColumnWidth |
Napomena: Ovo će vratiti Null ako svi stupci u rasponu nemaju istu širinu.
Dobijte visinu reda
Slično, možete dobiti visinu retka:
12 | dim iRowHeight koliko godiRowHeight = retci ("1"). RowHeight |