„Excel“ lentelė kaip kvadratinis popierius - VBA makrokomanda

Turinys

Naudodami makrokomandą sukurkite naują lentelę, kurioje visos langeliai suformatuoti kaip maži kvadratai ir taip gaunamas kvadratas

Dėžutės popierius yra naudingas. Ją galite naudoti ne tik skaičiuodami matematiką, bet ir atlikdami kitas užduotis.

Dėl langelio struktūros „Excel“ skaičiuoklė iš esmės tinka kvadratiniam popieriui įgauti.

Atitinkamą formatavimą galite atlikti rankiniu būdu. Su makrokomandomis lengviau. Ši VBA makrokomanda sukuria naują darbaknygę ir formuoja pirmąjį šios darbaknygės darbalapį su mažais kvadratais:

Sub CreateCatchedPaper ()
Tamsus kampas Kaip sveikasis skaičius
Su darbaknygėmis. Pridėti darbalapius (1). Ląstelės
.RowHeight = 12
.ColumnWidth = 1.5
Kampui = nuo 7 iki 12
Su .Borders (kampas)
.Svoris = xl Plaukų linija
.ColorIndex = xlAutomatinis
.LineStyle = xlTęstinis
Pabaiga su
Kitas kampas
Pabaiga su
Pabaiga Sub

Toliau pateiktame paveikslėlyje parodyta, kaip atrodo atitinkama „Excel“ lentelė. Tai atrodo kaip puslapis su dėžutėmis, tokiomis kaip matematikos pamokos.

Norėdami įvesti makrokomandą, „Excel“ paspauskite ALT F11, kad atidarytumėte VBA redaktorių. VBA redaktoriuje pasirinkite komandą INSERT - MODULE ir įveskite makrokomandą. Norėdami pradėti makrokomandą, „Excel“ suaktyvinkite klavišų kombinaciją ALT F8. Du spartieji klavišai veikia visose „Excel“ versijose.

Padėsite svetainės plėtrą, dalintis puslapį su draugais

wave wave wave wave wave