In hierdie artikel sal ek jou wys hoe jy 'n veranderlike op 'n selwaarde kan stel deur VBA in Excel te gebruik. Jy sal leer om 'n veranderlike op die waarde van 'n enkele sel en 'n reeks selle te stel.

Laai Oefenwerkboek af

Laai hierdie oefenwerkboek af om te oefen terwyl jy lees hierdie artikel.

3 vinnige voorbeelde om veranderlike na 'n selwaarde in Excel te stel

Hier het ons 'n datastel wat die name van sommige kliënte , hul kontaknommers en e-posadresse in reeks B3:D13 van 'n werkblad.

Ons beoog om veranderlikes na selwaardes van hierdie datastel te stel deur VBA te gebruik.

1. Stel veranderlike op 'n enkelselwaarde met behulp van Excel VBA

Eers sal ons leer om 'n veranderlike op 'n enkele selwaarde te stel deur VBA te gebruik.

Vir kom ons stel byvoorbeeld die waarde van sel B4 na 'n veranderlike genaamd Klantnaam .

Dit is beter as jy die datatipe van die waarde ken en dit vooraf verklaar. En stel dan die waarde in daardie veranderlike.

Byvoorbeeld, hier bevat sel B4 die naam, Boris Pasternak . Dit is 'n string-tipe veranderlike. Daarom kan jy die volgende 2 reëls kodes gebruik:

6937

Maar dit is goed as jy nie seker is oor die datatipe nie. In daardie geval, skryf slegs die 2de reël, en VBA sal die waarde korrek lees virjy.

7443

Om nou te kontroleer of VBA die waarde korrek gelees het of nie, voer die reël MsgBox Value in met enige van die twee stelle kodes en hardloop dan die kode.

'n Boodskapkas sal verskyn wat jou die waarde van sel B4 , Boris Pasternak wys.

2. Stel waardes van 'n aangrensende reeks selle in 'n veranderlike met behulp van Excel VBA

Nou sal ons die waardes van 'n aangrensende reeks selle in 'n veranderlike stel. Kom ons lees byvoorbeeld die reeks B3:D13 in die veranderlike Rng .

Hier sal die datatipe van die veranderlike 'n Reik wees . Jy kan dit óf voorheen so verklaar:

4899

Of jy kan die waardes direk daarmee toeken.

9289

Nou, om toegang tot die waardes van die Reikafstandvoorwerp te verkry, moet jy toegang daartoe kry met hul ry- en kolomnommers met 'n Selle-objek .

Byvoorbeeld, om toegang tot sel B4 , jy moet Rng.Cells(2,1) gebruik [ Sel B4 is in die 2de ry en 1ste kolom van die reeks B3:D13 .]

Voer die reël in MsgBox Rng.Cells(2,1) binne jou kode en hardloop dit. Dit sal Boris Pasternak wys, die waarde in sel B4 .

3. Stel waardes van 'n nie-aangrensende reeks selle in 'n veranderlike met behulp van Excel VBA

Laastens sal ons die waardes van 'n nie-aangrensende reeks selle in 'n veranderlike stel.

Kom ons probeer byvoorbeeld leesdie reeks B3:B13 en D3:D13 in 'n veranderlike genaamd Rng .

Dit is weer 'n datatipe van Range . Jy kan dit vooraf verklaar of nie.

Ons sal die Unie-metode van VBA gebruik om aan te sluit by 2 of meer nie-aangrensend reekse selle in 'n enkele reeks.

2796

Om nou toegang tot sel B4 te kry, moet jy weer die reël MsgBox invoer Rng.Selle(1,1). As ons dan die kode laat loop, sal dit die inhoud in sel B4 , Boris Pasternak vertoon.

Dinge om te onthou

Al die metodes wat hierbo beskryf word, werk slegs vir die aktiewe werkblad. As jy toegang tot 'n werkblad wil kry wat nie aktief is nie, moet jy die naam van die werkblad voor die reeks noem.

Byvoorbeeld, om toegang te verkry tot die reeks B4 van Blad1 , jy moet gebruik:

1448