VBA z - Kako uporabljati z ... Končaj z izjavo v Excelu VBA?

Z izjavo v Excelu VBA

Stavek With se v VBA uporablja za dostop do vseh lastnosti in metod omenjenega predmeta. Najprej moramo navesti, na kateri objekt VBA se sklicujemo, nato izjavo With zapremo s End With in nato znotraj tega stavka. Izvedemo lahko vse spremembe lastnosti in metode omenjenega predmeta.

Spodaj je sintaksa With Statement v VBA.

Z (OBJECT) (Koda … Kaj je treba storiti?) Končajte z

Predmet ni nič drugega kot nabor celic ali celic, na katere se sklicujemo, nato pa lahko spremenimo lastnosti in izvedemo vse metode, povezane s to določeno celico ali celicami.

Kako uporabljati izjavo v Excelu VBA?

Spodaj je nekaj primerov za uporabo z izjavo v Excelu VBA.

Primer # 1

Predpostavimo, da imate določeno vrednost v celici A1, v celico A1 sem vnesel besedilo kot »Excel VBA«.

Zdaj za to celico moram opraviti nekaj nalog, tj. Formatiranje v Excelu.

Spremeniti želim velikost pisave, ime pisave in barvo notranjosti, vstaviti obrobo itd. … Običajno je, da celico najprej napotimo s pomočjo predmeta VBA RANGE.

Koda:

Sub With_Example1 () Obseg ("A1") Konec Sub

Zdaj za spremembo velikosti pisave dostopamo do lastnosti "font" te celice.

V razdelku FONT lastnost dostopamo do lastnosti Size in vnesemo velikost tako, da damo enak znak.

Koda:

Sub With_Example1 () Obseg ("A1"). Font.Size = 15 End Sub

Zdaj podobno opravljamo tudi druge naloge oblikovanja, kot je prikazano spodaj.

Koda:

Sub With_Example1 () Obseg ("A1"). Font.Size = 15 Obseg ("A1"). Font.Name = Obseg "Verdana" ("A1"). Notranjost. Barva = vbRumeni obseg ("A1"). Meje .LineStyle = xlNeprekinjena končna pod

S tem boste opravili vsa omenjena opravila, če pa pogledate kodo za izvedbo vsake dejavnosti formatiranja, smo vsakič navedli naslov celice. Zaradi tega je koda videti dolgotrajna in dolgotrajna.

Zdaj bomo z izjavo VBA With uporabili za vsakič manjši vnos naslova celice. Odprite izjavo WITH v Excelu VBA in vnesite naslov celice.

Koda:

Sub With_Example1 () With Range ("A1") End Sub

Znotraj stavka With postavite piko, da si ogledate vse lastnosti in metode celice A1.

Zdaj prva dejavnost oblikovanja spreminja velikost pisave, zato dostopajte do FONT in pod to lastnost SIZE.

Koda:

Sub With_Example1 () Z obsegom ("A1"). Font.Size = 15 End Sub

Podobno navedite druge kode za oblikovanje in zaprite VBA z izjavo.

Koda:

Sub With_Example1 () Z obsegom ("A1"). Font.Size = 15. Font.Name = "Verdana" .Interior.Color = vbRumena .Borders.LineStyle = xlNeprekinjen konec s koncem Sub

Zaženite kodo, da si ogledate vse oblike v omenjenem objektu, tj. Celico A1.

Torej, vse oblikovanje, uporabljeno za celico. Poglejte, kako kul je ta tehnika.

2. primer

Če želite na primer spremeniti vse lastnosti, povezane s pisavo, lahko omenite lastnost celice in FONT.

Koda:

Sub With_Example2 () Z obsegom ("A1"). Pisava se konča s koncem Sub

Znotraj izjave VBA With State lahko vidimo seznam IntelliSense. Prikazale bodo lastnosti in metode, povezane samo z lastnostjo FONT.

Zdaj lahko s tem izvajamo poljuben sklop dejavnosti.

Koda:

Sub With_Example2 () Z obsegom ("A1"). Pisava. Bold = True 'Pisava bo krepka .Color = vbAlias' Barva pisave bo vzdevek. Italic = True 'Pisava bo v ležečem slogu. Velikost = 20' Velikost pisave bo be 20. .Underline = True 'Pisava bo podčrtana End With End Sub

Rezultat tega bo prikazan spodaj.

3. primer

Spodnja koda bo dostopala samo do lastnosti, povezanih z mejo celic.

Koda:

Sub With_Example3 () Z obsegom ("B2"). Obrobe .Color = vbRed 'Barva obrobe bo rdeča. LineStyle = xlContinuous' Polna obroba. Teža = xlThick 'Debela obroba Konec s koncem Sub

Rezultat te kode je naslednji.

Stvari, ki si jih je treba zapomniti

  • Izjava se uporablja za zmanjšanje kode.
  • Najprej moramo dostaviti objekt za izjavo With.
  • Ko dobite določen objekt, lahko dostopamo samo do lastnosti in metod tega predmeta.

Zanimive Članki...