Santykinė nuoroda į "Excel" makrokomandų priemonėmis, palyginti su šiuo metu aktyviai langelį. Taigi būkite atsargūs pasirinkdami aktyvų langelį – tiek įrašydami santykinę nuorodos makrokomandą, tiek ją paleisdami.
Pirmiausia atidarykite Pavyzdinį failą.xlsx, pasiekiamą internete . Tada atlikite šiuos veiksmus, kad įrašytumėte santykinę nuorodos makrokomandą:
Skirtuke Kūrėjas pasirinkite parinktį Naudoti santykines nuorodas.
Makrokomandos įrašymas su santykinėmis nuorodomis.
Įsitikinkite, kad pasirinktas langelis A1.
Skirtuke Kūrėjas pasirinkite Įrašyti makrokomandą.
Pavadinkite makrokomandą AddTotalRelative.
Įrašymo vietai pasirinkite šią darbaknygę.
Spustelėkite Gerai, kad pradėtumėte įrašymą.
Pasirinkite langelį A16 ir langelyje įveskite Total.
Pasirinkite pirmą tuščią langelį D stulpelyje (D16) ir įveskite = COUNTA(D2:D15).
Skirtuke Kūrėjas spustelėkite Stabdyti įrašymą, kad sustabdytumėte makrokomandos įrašymą.
Šiuo metu įrašėte dvi makrokomandas. Skirkite šiek tiek laiko ir išnagrinėkite naujai sukurtos makrokomandos kodą, skirtuke Kūrėjas pasirinkę Makrokomandos, kad atidarytumėte makrokomandos dialogo langą. Pasirinkite makrokomandą AddTotalRelative ir spustelėkite Redaguoti.
Vėl atidaromas „Visual Basic“ redaktorius ir rodomas kodas, kuris buvo parašytas įrašant makrokomandą. Šį kartą jūsų kodas atrodo maždaug taip:
Sub AddTotalRelative()
ActiveCell.Offset(15, 0).Range("A1").Pasirinkite
ActiveCell.FormulaR1C1 = "Iš viso"
ActiveCell.Offset(0, 3).Range("A1").Pasirinkite
ActiveCell.FormulaR1C1 = "= COUNTA(R[-14]C:R[-1]C)"
Pabaigos sub
Pirmiausia atminkite, kad kode nėra nuorodų į konkrečius langelių diapazonus (išskyrus pradinį tašką A1). Atminkite, kad šioje makrokomandoje „Excel“ naudoja aktyvaus langelio ypatybę Offset. Ši savybė nurodo žymekliui perkelti tam tikrą langelių skaičių aukštyn arba žemyn ir tam tikrą skaičių langelių į kairę arba į dešinę.
Šiuo atveju poslinkio ypatybės kodas nurodo „Excel“ perkelti 15 eilučių žemyn ir 0 stulpelių per aktyvų langelį (A1). Kadangi makrokomanda buvo įrašyta naudojant santykinę nuorodą, „Excel“ aiškiai nepasirinks konkretaus langelio, kaip tai padarė įrašant absoliučią nuorodos makrokomandą.
Norėdami pamatyti šią makrokomandą, ištrinkite abiejų lentelių eilutę Iš viso ir atlikite šiuos veiksmus:
Pasirinkite langelį A1.
Skirtuke Kūrėjas pasirinkite Makrokomandas.
Raskite ir pasirinkite makrokomandą AddTotalRelative.
Spustelėkite mygtuką Vykdyti.
Pasirinkite langelį F1.
Skirtuke Kūrėjas pasirinkite Makrokomandas.
Raskite ir pasirinkite makrokomandą AddTotalRelative.
Spustelėkite mygtuką Vykdyti.
Atminkite, kad ši makrokomanda, skirtingai nei ankstesnė makrokomanda, veikia abiejuose duomenų rinkiniuose. Kadangi makrokomanda taiko sumas, palyginti su šiuo metu aktyviu langeliu, sumos taikomos teisingai.
Kad ši makrokomanda veiktų, tiesiog turite tai užtikrinti
-
Prieš paleisdami makrokomandą, pasirinkote tinkamą pradžios langelį.
-
Duomenų bloke yra tiek pat eilučių ir stulpelių, kiek duomenų, kuriuose įrašėte makrokomandą.