Þetta Excel-viðbótadæmi fjallar um grunnskrefin sem felast í því að búa til gagnlega viðbót sem þú getur notað til að pakka VBA-ferlum þínum. Þetta Excel VBA dæmi er byggt á tólinu Change Case textabreytingar.
Excel vinnubókin samanstendur af einu auðu vinnublaði, VBA einingu og UserForm.
Upprunalega útgáfan af tólinu inniheldur valkosti fyrir hástafi, lágstafi og rétta staf. Viðbótarútgáfan inniheldur tvo valkosti við UserForm svo það hefur sömu valkosti og innbyggða tólið í Microsoft Word:
Þessi mynd sýnir UserForm1. OptionButton stýringarnar fimm eru inni í Frame stjórn. Að auki hefur UserForm hnappinn Hætta við (sem heitir CancelButton) og OK hnappur (sem heitir OKButton).
UserForm fyrir Change Case viðbótina.
Kóðinn sem keyrður er þegar smellt er á Hætta við hnappinn er mjög einfaldur. Þessi aðferð losar UserForm án aðgerða:
Private Sub CancelButton_Click() Afhlaða UserForm1 End Sub
Kóðinn sem er keyrður þegar smellt er á OK hnappinn kemur á eftir. Þessi kóði gerir alla vinnu:
Einkaundir OKButton_Click()
Dimma TextCells As Range
Dimm reiti sem svið
Dimmur texti sem strengur
Dim i As Long
' Búðu til hlut með bara textaföstu
Á Villa Resume Next
Setja TextCells = Selection.SpecialCells(xlConstants, xlTextValues)
' Slökktu á skjáuppfærslu
Application.ScreenUpdating = False
' Farðu í gegnum frumurnar
Fyrir hvern reit Í TextCells
Texti = klefi.Value
Veldu Case True
Valkostur fyrir hástafi Lágmarksstafir
cell.Value = LCase(cell.Value)
Valmöguleikar fyrir hástafiEfri 'HÁSTASTAF
cell.Value = UCase(cell.Value)
Case OptionProper 'Proper Case
cell.Value = WorksheetFunction.Proper(cell.Value)
Case OptionSentence 'Sending case
Texti = UCase(Left(cell.Value, 1))
Texti = Texti & LCase(Mid(cell.Value, 2, Len(cell.Value)))
cell.Value = Texti
Tilfelli ValkosturSlökkva á 'SKIPTA MÁLI
Fyrir i = 1 Til Len(Texti)
Ef Mid(Texti, i, 1) Eins og "[AZ]" Þá
Mið(Texti, i, 1) = LCase(Mið(Texti, i, 1))
Annar
Mið(Texti, i, 1) = UCase(Mið(Texti, i, 1))
End If
Næst i
cell.Value = Texti
Endurval
Næst
' Taktu úr glugganum
Afhlaða UserForm1
End Sub
Prófaðu Excel viðbótina áður en þú umbreytir þessari vinnubók. Til að líkja eftir því sem gerist þegar vinnubókin er viðbót, ættir þú að prófa vinnubókina þegar önnur Excel vinnubók er virk. Vegna þess að Excel-viðbót er aldrei virka blaðið eða vinnubókin, getur það hjálpað þér að bera kennsl á hugsanlegar villur að prófa það þegar önnur vinnubók er opin.
Opnaðu nýja vinnubók og sláðu inn upplýsingar í sumum hólfum.
Í prófunartilgangi skaltu slá inn ýmsar tegundir upplýsinga, þar á meðal texta, gildi og formúlur. Eða bara opnaðu núverandi vinnubók og notaðu hana fyrir prófin þín. Mundu að ekki er hægt að afturkalla allar breytingar á vinnubókinni, svo þú gætir viljað nota afrit.
Veldu eina eða fleiri frumur (eða heilar línur og dálka).
Framkvæmdu ChangeCase fjölvi með því að velja nýju Skipunina Change Case úr flýtivalmyndinni þinni fyrir reit (eða röð eða dálk).
Ef skipunin Change Case birtist ekki í flýtivalmyndinni þinni er líklegasta ástæðan sú að þú hefur ekki virkjað fjölva þegar þú opnaðir change case.xlsm vinnubókina. Lokaðu vinnubókinni og opnaðu hana síðan aftur - og vertu viss um að þú kveikir á fjölvi.
Þó það sé ekki krafist er það talið vera besta starfsvenjan að slá inn lýsingu á Excel viðbótinni þinni . Fylgdu þessum skrefum til að bæta við lýsingu:
Virkjaðu change case.xlsm vinnubókina.
Veldu File → Info, og smelltu á Show All Properties neðst til hægri.
Excel stækkar Eiginleikalistann.
Sláðu inn titil fyrir viðbótina í Titill reitinn.
Þessi texti birtist á listanum yfir viðbætur í valmyndinni viðbætur. Fyrir þetta dæmi skaltu slá inn Breyta tilfelli.
Sláðu inn lýsingu í reitnum Athugasemdir.
Þessar upplýsingar birtast neðst í viðbótarglugganum þegar viðbótin er valin. Fyrir þetta dæmi, sláðu inn
Breytir hástöfum texta í völdum hólfum.
Fáðu aðgang að þessu tóli með því að nota flýtileiðavalmyndina.
Þessi mynd sýnir Eiginleikahlutann með titli og athugasemdareitunum útfyllta.
Notaðu Eiginleikahlutann til að slá inn lýsandi upplýsingar um viðbótina þína.
Ef þú vilt bæta við lykilorði til að koma í veg fyrir að aðrir sjái VBA kóðann skaltu fylgja þessum skrefum:
Virkjaðu VBE og veldu change case.xlsm vinnubókina í Project glugganum.
Veldu Tools → VBAProject Properties, og smelltu á Protection flipann í glugganum sem birtist.
Veldu Læsa verkefni til að skoða gátreitinn og sláðu inn lykilorð (tvisvar).
Smelltu á OK.
Vistaðu vinnubókina með því að velja Skrá → Vista í VBE eða með því að fara aftur í Excel gluggann og velja Skrá → Vista.
Á þessum tímapunkti hefur þú prófað change case.xlsm skrána og hún virkar rétt. Næsta skref er að búa til viðbótina. Fylgdu þessum skrefum:
Ef þörf krefur, endurvirkjaðu Excel.
Virkjaðu change case.xlsm vinnubókina og veldu Skrá → Vista sem → Vafra.
Excel birtir Vista sem gluggann.
Í fellivalmyndinni Vista sem tegund skaltu velja viðbót (*.xlam).
Tilgreindu staðsetninguna og smelltu á Vista.
Ný viðbótaskrá (með .xlam endingunni) er búin til og upprunalega XLSM útgáfan er áfram opin.
Til að forðast rugling skaltu loka XLSM vinnubókinni áður en þú opnar viðbótina sem þú bjóst til úr þeirri vinnubók.
Opnaðu viðbótina með því að fylgja þessum skrefum:
Veldu þróunaraðila → Viðbætur → Viðbætur (eða ýttu á Alt+TI).
Excel sýnir viðbætur valmynd.
Smelltu á hnappinn Vafra.
Finndu og veldu viðbótina sem þú bjóst til.
Smelltu á OK til að loka glugganum Vafra.
Eftir að þú hefur fundið nýja viðbótina þína, listar viðbætur valmyndin upp viðbótina. Eins og sýnt er hér að neðan sýnir viðbótarglugginn einnig lýsandi upplýsingar sem þú gafst upp á skjalaeiginleikum spjaldinu.
Í viðbótarglugganum er nýja viðbótin valin.
Gakktu úr skugga um að nýja viðbótin þín sé valin í Add-Ins valmyndinni.
Smelltu á OK til að loka glugganum.
Excel opnar viðbótina. Nú geturðu notað það með öllum vinnubókunum þínum. Svo lengi sem það er áfram valið í Viðbótarglugganum, opnast viðbótin í hvert skipti sem þú ræsir Excel.
Ef þú ert í rausnarlegu skapi geturðu dreift þessari viðbót til annarra Excel notenda einfaldlega með því að gefa þeim afrit af XLAM skránni. (Þeir þurfa ekki XLSM útgáfuna.) Þegar þeir opna viðbótina birtist nýja Breyta tilfelli skipunin í flýtivalmyndinni þegar þeir velja svið, eina eða fleiri línur eða einn eða fleiri dálka. Ef þú læsir VBA verkefninu með lykilorði geta aðrir ekki skoðað makrókóðann þinn nema þeir viti lykilorðið.
Hægt er að breyta viðbót eins og hverri annarri vinnubók. Þú getur breytt XLAM skránni beint (þú þarft ekki að vinna með upprunalegu XLSM útgáfuna) með því að fylgja þessum skrefum:
Opnaðu XLAM skrána þína, ef hún er ekki þegar opin.
Virkjaðu VBE. Tvísmelltu á nafn verkefnisins í Verkefnaglugganum.
Ef þú varðir kóðann ertu beðinn um lykilorðið.
Sláðu inn lykilorðið þitt og smelltu á OK.
Gerðu breytingar þínar á kóðanum.
Vistaðu skrána með því að velja Skrá → Vista.
Ef þú býrð til viðbót sem geymir upplýsingar í vinnublaði, verður þú að stilla IsAddIn eiginleika vinnubókarinnar á False til að skoða vinnubókina. Þú gerir þetta í Properties glugganum þegar ThisWorkbook hluturinn er valinn. Eftir að þú hefur gert breytingar þínar á vinnubókinni skaltu ganga úr skugga um að þú stillir IsAddIn eignina aftur á True áður en þú vistar skrána.
Að gera viðbót ekki viðbót.
Fyrir þá sem vilja læra um aðferðir eins og <strong>ROUND</strong>, <strong>ROUNDUP</strong> og <strong>ROUNDDOWN</strong> í Excel 2007, skoðaðu þessa skref-fyrir-skref leiðbeiningu um hvernig á að rúnna tölur á réttan hátt.
Hvernig á að koma í veg fyrir að Microsoft Word opni skrár í skrifvarandi ham á Windows. Microsoft Word opnar skrár í skrifvarandi ham, sem gerir það ómögulegt að breyta þeim? Ekki hafa áhyggjur, aðferðirnar eru hér að neðan
Hvernig á að laga villur við prentun á röngum Microsoft Word skjölum Villur við prentun Word skjala með breyttu letri, sóðalegar málsgreinar, texta sem vantar eða glatað efni eru nokkuð algengar. Hins vegar ekki
Ef þú hefur notað pennann eða hápunktarann til að teikna á PowerPoint glærurnar þínar meðan á kynningu stendur geturðu vistað teikningarnar fyrir næstu kynningu eða eytt þeim út svo næst þegar þú sýnir þær byrjarðu á hreinum PowerPoint glærum. Fylgdu þessum leiðbeiningum til að eyða penna- og auðkenningarteikningum: Að eyða línum einni á […]
Stílsafnið inniheldur CSS skrár, Extensible Stylesheet Language (XSL) skrár og myndir sem notaðar eru af fyrirfram skilgreindum aðalsíðum, síðuuppsetningum og stjórntækjum í SharePoint 2010. Til að finna CSS skrár í stílasafni útgáfusíðunnar: Veldu Site Actions→ View Allt efni á síðunni. Innihald síðunnar birtist. Style bókasafnið er staðsett í […]
Ekki yfirgnæfa áhorfendur með stórkostlegum tölum. Í Microsoft Excel geturðu bætt læsileika mælaborða og skýrslna með því að forsníða tölurnar þínar þannig að þær birtast í þúsundum eða milljónum.
Lærðu hvernig á að nota SharePoints samfélagsnetverkfæri sem gera einstaklingum og hópum kleift að eiga samskipti, vinna saman, deila og tengjast.
Julian dagsetningar eru oft notaðar í framleiðsluumhverfi sem tímastimpill og fljótleg tilvísun fyrir lotunúmer. Þessi tegund af dagsetningarkóðun gerir söluaðilum, neytendum og þjónustuaðilum kleift að bera kennsl á hvenær vara var framleidd og þar með aldur vörunnar. Julian dagsetningar eru einnig notaðar í forritun, hernum og stjörnufræði. Mismunandi […]
Þú getur búið til vefforrit í Access 2016. Svo hvað er vefforrit eiginlega? Jæja, vefurinn þýðir að hann er á netinu og app er bara stytting fyrir „umsókn“. Sérsniðið vefforrit er gagnagrunnsforrit á netinu sem hægt er að nálgast úr skýinu með vafra. Þú smíðar og viðheldur vefforritinu í skrifborðsútgáfunni […]
Flestar síður í SharePoint 2010 sýna lista yfir flakktengla á flýtiræsingarstikunni vinstra megin á síðunni. Flýtiræsingarstikan sýnir tengla á innihaldsefni vefsvæða eins og lista, bókasöfn, síður og útgáfusíður. Flýtiræsingarstikan inniheldur tvo mjög mikilvæga tengla: Tengill á allt efni vefsvæðis: […]
