VBA granice (Vodič korak po korak) - Kako postaviti granice s programom Excel VBA?

Sadržaj

Granice u VBA Excelu

Granice u VBA Excelu

Koristimo obrube u Excelu kako bismo istakli svoje podatke, na bilo kojoj nadzornoj ploči vrlo je važna vještina predstavljanja važnih podataka i to se radi po obrubima, obrubi su svojstvo u VBA-u kojem se može pristupiti upotrebom metode raspona i davanjem odgovarajuće stil obruba kao što znamo postoje različiti oblici stilova.

Ako se dobro formatirate u Excelu, tada se možete nazvati "Excel kozmetičarom". Kako bi izvješća izgledala privlačno krajnjem korisniku ili čitateljima, formatiranje u tome igra vitalnu ulogu. Nadam se da dobro poznajete tehnike oblikovanja na redovnom radnom listu. Formatiranje putem VBA kodiranja zahtijeva znatnu količinu VBA kodirajućeg jezika. U ovom ćemo vam članku pokazati jednu od najcjenjenijih tehnika formatiranja, tj. Primjenu excel VBA granica.

Primjeri granica u VBA

Pogledajmo neke primjere kako bismo to bolje razumjeli.

Primjer # 1 - Primijenite VBA granice s kodiranjem

Stvaranje makronaredbe za primjenu excel VBA granica s različitim stilovima, čineći ih dostupnima kao dodatak na excel vrpci, olakšava posao kad god želimo primijeniti VBA granice.

Svaka ćelija na radnom listu ima obrube i boje pozadine. Prema zadanim postavkama, svaka ćelija nema obruba i boju pozadine.

U radnom listu na kartici HOME imamo opciju obruba, a ako kliknete na padajući popis u Excelu, imamo razne mogućnosti.

Ali u VBA prvo što moramo učiniti je odlučiti ćeliju ili raspon ćelija koje ćemo primijeniti u stilovima formatiranja excel VBA granica. Dakle, možemo se pozvati na raspon stanica ili stanica pomoću objekta VBA RANGE. Na primjer, ako želite promijeniti granicu ćelije B5, tada možete napisati kod ovako.

Raspon ("B5")

Tada trebamo pristupiti svojstvu " Borders ".

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Bo End Sub

Nakon primjene svojstva excel VBA "Granice", otvorite zagradu da biste vidjeli sve vrste mogućnosti oblikovanja obruba.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Granice (Kraj Sub

Ovdje imamo xlDiagonalDown, xlDiagonalUp, xlEdgeBottom, xlEdgeLeft, xlEdgeRight, xlEdgeTop, xlInsideHorizontal i xlInsideVertical.

Nakon što je odabran stil obruba, moramo odabrati karakteristiku s kojom želimo raditi. Jedan od znakova koje ovdje trebamo koristiti je „ Stil linije“, pa odaberite svojstvo „Stil linije“.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .li Kraj Sub

Jednom kada je svojstvo stila crte odabrano, u VBA koju ćemo primijeniti moramo postaviti vrstu linije linije ili vrstu obruba.

Stavite znak jednakosti i odaberite nabrajanje "XlLineStyle" .

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle. Kraj pod

Stavite točku da biste vidjeli sve dostupne stilove obruba.

Kodirati:

Ovdje imamo mnogo mogućnosti. xlContinuous, xldash, xlDashDot, xlDashDotDot, xlDot, xlDouble, XlLineStyleNone i xlSlantDashDot.

Ok, sada sam odabrao opciju " xlDouble".

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlDvostruki kraj Sub

Sada, ako pokrenem kod, primijenit će dvostruku liniju na dno ćelije B5 .

Vrsta linije: “ xlContinuous ”.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlContinuous End Sub

Proizlaziti:

Vrsta retka: "clash".

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlDash End Sub

Proizlaziti:

Vrsta retka: " xlDashDot."

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlDashDot End Sub

Proizlaziti:

Vrsta retka: “ xlDashDotDot ”.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlDashDotDot End Sub

Proizlaziti:

Vrsta linije: " xlDot."

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlDot End Sub

Proizlaziti:

Vrsta linije: “ xlLineStyleNone ”.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlLineStyleNone End Sub

Proizlaziti:

Ovo će ukloniti granicu navedene ćelije.

Vrsta linije: “ xlSlantDashDot ”.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). Borders (xlEdgeBottom) .LineStyle = XlLineStyle.xlSlantDashDot End Sub

Proizlaziti:

Primjer # 2 - Promijenite granicu metodom VBA Borders Around

Granice stanice možemo promijeniti i metodom VBA Borders Around . Jednom kad se spomene raspon stanica ili stanica, trebamo pristupiti metodi VBA Borders Around .

Otvorite zagradu da biste vidjeli sve parametre.

Raspon ("B5"). BorderAround ((stil linije), (težina kao xlBorderWeight), (ColorIndex), (boja), (tema teme))

Možemo spomenuti stil crte, boju crte, težinu obruba i još mnogo toga što možemo učiniti ovom metodom.

Kodirati:

Sub Border_Example1 () Raspon ("B5"). BorderAround LineStyle: = xlContinuous, Weight: = xlTick End Sub

Ovo će promijeniti stil linije u xlContinuous.

Stil linije: = xlNeprekidno

Težina Granice je gusta.

Težina: = xlDebela

Rezultat ovog koda je kao u nastavku.

Poput ovog koristeći svojstvo i metodu excel VBA Borders and Border Around, možemo promijeniti obrube i elemente obruba pomoću VBA kodiranja.

Preporučeni članci

Ovo je Vodič za VBA granice. Ovdje učimo kako postaviti granice s Excel VBA kodiranjem, zajedno s praktičnim primjerima i predlošcima koda za preuzimanje. Možda ćete pogledati i druge članke koji se odnose na Excel VBA -