Овај водич ће показати како форматирати ћелије помоћу ВБА.
Форматирање ћелија
Постоји много својстава која се могу поставити за (низ) ћелија попут ове:
| 1234567891011 | Суб СетЦеллФормат ()Са радним листовима ("Лист 1"). Распон ("Б5: Ц7").ХоризонталАлигнмент = клХАлигнДистрибутед.АддИндент = Тачно.Фонт.ФонтСтиле = "Курзив".НумберФормат = "Опште".Интериор.Цолор = РГБ (128, 100, 250)ЗавршитиЕнд Суб |
Погледајмо их по абецедном реду:
АддИндент
Постављањем вредности овог својства на Тачно, текст ће бити аутоматски увучен када је поравнање текста у ћелији постављено, хоризонтално или вертикално, на једнаку расподелу (погледајте Хоризонтално поравнање и Вертикално поравнање).
| 12345 | Са радним листовима ("Лист1"). Распон ("А1").Оријентација = клВертикално.ВертицалАлигнмент = клВАлигнДистрибутед.АддИндент = ТачноЗавршити |
Границе
Можете поставити формат ивице ћелије. За више информација о границама погледајте овде.
Као пример, можете поставити црвену испрекидану линију око ћелије Б2 на листу 1 овако:
| 1 | Радни листови ("Схеет1"). Распон ("Б2"). БордерАроунд ЛинеСтиле: = клДасх, ЦолорИндек: = 3 |
Фонт
Можете прилагодити формат фонта ћелије постављањем назива фонта, стила, величине, боје, додавањем подцртавања и или ефеката (прецртани, под- или горњи индекс). За више информација о фонтовима ћелија погледајте овде.
Ево неколико примера:
| 12345 | Са распоном ("А1: Ц5"). Фонт.Наме = "Век".ФонтСтиле = "Подебљано".Стрикетхроугх = ТачноЗавршити |
ФормулаХидден
Ово својство враћа или поставља вредност варијанте која означава да ли ће формула бити скривена када је радни лист заштићен. На пример:
| 1 | Радни листови ("Лист1"). Распон ("А1: Б1"). ФормулаХидден = Труе |
Хоризонтално поравнање
Ово својство формата ћелије својства враћа или поставља вредност варијанте која представља хоризонтално поравнање за наведени објекат. Враћене или постављене константе могу бити: клГенерал, клЦентер, клДистрибутед, клЈустифи, клЛефт, клРигхт, клФилл, клЦентерАцроссСелецтион. На пример:
| 1 | Радни листови ("Лист1"). Распон ("Д3"). ХоризонталАлигнмент = клРигхт |
ИндентЛевел
Враћа или поставља целобројну вредност између 0 и 15 која представља ниво увлачења за ћелију или опсег.
| 1 | Радни листови ("Лист1"). Распон ("А1"). ИндентЛевел = 7 |
Ентеријер
Можете поставити или добити повратне информације о унутрашњости ћелије: њену боју, ЦолорИндек, Паттерн, ПаттернЦолор, ПаттернЦолорИндек, ПаттернТхемеЦолор, ПаттернТинтАндСхаде, ТхемеЦолор, ТинтАндСхаде, овако:
| 123 | Иф Нот Ранге ("А1"). Интериор.ТхемеЦолор = ТхемеЦолорЛигхт2 ЗатимРаспон ("А1"). Интериор.Паттерн = клПаттернУпКрај Ако |
Закључано
Ово својство враћа Труе ако је ћелија или опсег закључан, Фалсе ако се објект може изменити када је лист заштићен, или Нулл ако наведени опсег садржи и закључане и откључане ћелије. Може се користити и за закључавање или откључавање ћелија.
Овај пример откључава ћелије А1: Б2 на листу 1 тако да се могу мењати када је лист заштићен.
| 12 | Радни листови ("Лист1"). Распон ("А1: Б2"). Закључан = НетачноРадни листови („Лист1“). Заштитите |
Спајати ћелије
Подесите ово својство на Тачно ако желите да спојите опсег. Његова вредност постаје Тачна ако одређени опсег садржи спојене ћелије. На пример, ако морате да спојите опсег Ц5: Д7, можете користити овај код:
| 1 | Радни листови ("Лист1"). Опсег ("Ц5: Д7"). МергеЦеллс = Труе |
НумберФормат
Можете поставити формат броја унутар ћелија / ћелија на Опште, Број, Валута, Рачуноводство, Датум, Време, Проценат, Разломци, Научно, Текст, Посебно и Прилагођено.
Ево примера научних и процентуалних формата броја:
| 12 | Опсег ("А1"). НумберФормат = "0.00Е+00"Опсег ("Б1"). НумберФормат = "0,00%" |
НумберФорматЛоцал
Ово својство враћа или поставља вредност варијанте која представља код формата за објекат као стринг на језику корисника.
Оријентација
Овим својством можете поставити (или добити поврат) оријентацију текста унутар ћелија (ћелија). Његова вредност може бити једна од ових константи: клДовнвард, клХоризонтал, клУпвард, клВертицал или целобројна вредност од -90 до 90 степени.
| 1 | Радни листови ("Лист1"). Распон ("А1"). Оријентација = -60 |
Родитељ
Ово је својство само за читање које враћа надређени објект наведеног објекта.
Смањити да стане
Ово својство враћа или поставља вредност варијанте која означава да ли се текст аутоматски смањује како би се уклопио у доступну ширину колоне.
| 1 | Радни листови ("Лист1"). Распон ("А1"). СхринкТоФит = Тачно |
Вертикално поравнање
Ово својство формата ћелије својства враћа или поставља вредност варијанте која представља вертикално поравнање за наведени објекат. Враћене или постављене константе могу бити: клЦентер, клДистрибутед, клЈустифи, клБоттом, клТоп. На пример:
| 1 | Радни листови ("Лист1"). Распон ("А1"). ВертицалАлигнмент = клТоп |
Преломити текст
Ово својство враћа Труе ако је текст умотан у све ћелије у наведеном опсегу, Фалсе ако текст није умотан у све ћелије унутар наведеног опсега, или Нулл ако наведени опсег садржи неке ћелије које омотају текст и друге ћелије које то не чине.
На пример, ако имате овај распон ћелија:
овај доњи код ће вратити Нулл у непосредном прозору:
| 1 | ? Радни листови ("Лист1"). Распон ("А1: Б1"). ВрапТект |
