Овај водич ће вас научити како да комуницирате са вредностима ћелија помоћу ВБА.
Подесите вредност ћелије
Да бисте поставили вредност ћелије, користите својство Валуе објекта Ранге или Целлс.
Ранге.Валуе & Целлс.Валуе
Постоје два начина за позивање ћелија на ВБА:
- Објекат домета - Опсег („А2“). Вредност
- Ћелије Објекат - Ћелије (2,1) .Вредност
Објекат Ранге омогућава вам референцирање ћелије помоћу стандардног записа „А1“.
Ово ће поставити вредност опсега А2 = 1:
| 1 | Опсег („А2“). Вредност = 1 |
Објекат Ћелије вам омогућава да референцирате ћелију према броју реда и броју колоне.
Ово ће поставити вредност опсега А2 = 1:
| 1 | Ћелије (2,1). Вредност = 1 |
Имајте на уму да прво уносите број реда:
| 1 | Ћелије (редни број, број_броја) |
Подесите вредности више ћелија одједном
Уместо позивања на једну ћелију, можете референцирати опсег ћелија и променити све вредности ћелија одједном:
| 1 | Опсег ("А2: А5"). Вредност = 1 |
Постави вредност ћелије - текст
У горњим примерима вредност ћелије постављамо једнаком броју (1). Уместо тога, можете поставити вредност ћелије једнаку низу текста. У ВБА, сав текст мора бити окружен наводницима:
| 1 | Опсег ("А2"). Вредност = "Текст" |
Ако текст не окружите цитатима, ВБА ће помислити да упућујете на променљиву …
Сет Целл Валуе - Вариабле
Такође можете поставити вредност ћелије једнаку променљивој
| 1234 | Затамните стрТект као СтрингстрТект = "Низ текста"Опсег ("А2"). Вредност = стрТект |
Добијте вредност ћелије
Вредности ћелија можете добити помоћу истог својства Валуе које смо користили горе.
Добијте вредност АцтивеЦелл -а
Да бисте добили вредност АцтивеЦелл и приказали је у оквиру за поруку:
| 1 | МсгБок АцтивеЦелл.Валуе |
Додели вредност ћелије променљивој
Да бисте добили вредност ћелије и доделили је променљивој:
| 123 | Дим вар као Вариантвар = Опсег ("А1"). Вредност |
Овде смо користили променљиву типа Вариант. Варијабле варијанте могу прихватити било коју врсту вредности. Уместо тога, можете користити тип променљиве Стринг:
| 123 | Дим вар као Стрингвар = Опсег ("А1"). Вредност |
Врста променљиве Стринг ће прихватити нумеричке вредности, али ће складиштити бројеве као текст.
Ако знате да ће ваша вредност ћелије бити нумеричка, можете да користите тип двоструке променљиве (двоструке променљиве могу да складиште децималне вредности):
| 123 | Дим вар као Доублевар = Опсег ("А1"). Вредност |
Међутим, ако покушате да сачувате вредност ћелије која садржи текст у двострукој променљивој, добићете грешку неусклађености типа:
Други примери вредности ћелије
Копирај вредност ћелије
Лако је поставити вредност ћелије једнаку другој вредности ћелије (или „Копирати“ вредност ћелије):
| 1 | Опсег ("А1"). Вредност = Опсег ("Б1"). Вредност |
То чак можете учинити и са опсезима ћелија (распони морају бити исте величине):
| 1 | Опсег ("А1: А5"). Вредност = Опсег ("Б1: Б5"). Вредност |
Упоредите вредности ћелија
Вредности ћелија можете упоредити помоћу стандардних оператора поређења.
Тестирајте да ли су вредности ћелија једнаке:
| 1 | МсгБок Ранге ("А1"). Валуе = Ранге ("Б1"). Валуе |
Враћа ТРУЕ ако су вредности ћелија једнаке. Иначе ФАЛСЕ.
Такође можете да креирате Иф Иф Статемент за поређење вредности ћелија:
| 12345678910111213 | Ако опсег ("А1"). Вредност> Опсег ("Б1"). Вредност ЗатимОпсег ("Ц1"). Вредност = "Више од"Елсеиф Ранге ("А1"). Валуе = Ранге ("Б1"). Валуе тхенОпсег ("Ц1"). Вредност = "Једнако"ИначеОпсег ("Ц1"). Вредност = "Мање од"Крај Ако |
Можете упоредити текст на исти начин (запамтите да ВБА разликује велика и мала слова)
