Во оваа статија, ќе ви покажам како можете да поставите променлива на вредност на ќелија користејќи VBA во Excel. Ќе научите да поставувате променлива на вредноста на една клетка и опсег на ќелии.

Преземете ја работната книга за вежбање

Преземете ја оваа работна книга за вежбање за да вежбате додека ја читате оваа статија.

3 брзи примери за поставување на променлива на вредност на ќелија во Excel

Овде имаме збир на податоци што ги содржи имињата на некои клиенти , нивните контактни броеви и адресите на е-пошта во опсегот B3:D13 на работен лист.

Наша цел е да поставиме променливи на вредностите на ќелиите од овој сет на податоци користејќи VBA .

1. Поставете ја променливата на вредност од една ќелија користејќи Excel VBA

Прво, ќе научиме да поставиме променлива на вредност од една ќелија користејќи VBA .

За на пример, ајде да ја поставиме вредноста на ќелијата B4 на променливата наречена Customer_Name .

Подобро е ако го знаете типот на податоци на вредноста и претходно го декларирате. И потоа поставете ја вредноста во таа променлива.

На пример, овде ќелијата B4 го содржи името, Борис Пастернак . Тоа е променлива тип на низа . Затоа, можете да ги користите следниве 2 линии кодови:

3237

Но, во ред е ако не сте сигурни за типот на податоци. Во тој случај, напишете ја само втората линија и VBA правилно ќе ја прочита вредноста завие.

7306

Сега, за да проверите дали VBA ја прочитала вредноста правилно или не, внесете ја линијата Вредност на MsgBox со кој било од двете групи на кодови и потоа извршете го кодот.

Ќе се појави поле за пораки што ќе ви ја покаже вредноста на ќелијата B4 , Борис Пастернак .

2. Поставете вредности на соседниот опсег на ќелии во променлива користејќи Excel VBA

Сега, ќе ги поставиме вредностите на соседниот опсег на ќелии во променлива. На пример, да го прочитаме опсегот B3:D13 во променливата Rng .

Овде типот на податоци на променливата ќе биде Опсег . Можете или да го декларирате претходно вака:

5525

Или можете директно да ги доделите вредностите со него.

8308

Сега, за да пристапите до вредностите на Објектот Range , треба да им пристапите со нивните броеви на редови и колони со Cells објект .

На пример, да пристапете ја ќелијата B4 , мора да користите Rng.Cells(2,1) [ Ќелијата B4 е во редот 2 и 1-ва колона од опсегот B3:D13 .]

Внесете ја линијата MsgBox Rng.Cells(2,1) внатре во вашиот код и стартувајте го. Ќе го прикаже Борис Пастернак , вредноста во ќелијата B4 .

3. Поставете вредности на не-соседен опсег на ќелии во променлива користејќи Excel VBA

На крајот, ќе ги поставиме вредностите на несоседниот опсег на ќелии во променлива.

На пример, да се обидеме да читамеопсегот B3:B13 и D3:D13 во променлива наречена Rng .

Тоа е повторно тип на податоци од Опсег . Можете да го пријавите претходно или не.

Ќе го користиме методот на Унијата од VBA за да се придружиме 2 или повеќе не-соседни опсези на ќелии во еден опсег.

1431

Сега за да пристапите до ќелијата B4 , повторно треба да ја внесете линијата MsgBox Rng.Cells(1,1). Тогаш, ако го извршиме кодот, тој ќе ја прикаже содржината во ќелијата B4 , Борис Пастернак .

Работи што треба да се запаметат

Сите методи опишани погоре работат само за активниот работен лист. Ако сакате да пристапите до работен лист што не е активен, треба да го споменете името на работниот лист пред опсегот.

На пример, за пристап до опсегот B4 од Листот1 , треба да користите:

6590