VBA til að athuga hvort strengur inniheldur annan streng í Excel (6 aðferðir)

  • Deildu Þessu
Hugh West

Að innleiða VBA er áhrifaríkasta, fljótlegasta og öruggasta aðferðin til að keyra hvaða aðgerð sem er í Excel. Í þessari grein munum við sýna þér hvernig á að athuga hvort strengur inniheldur annan streng í Excel með VBA .

Hlaða niður æfingasniðmáti

Þú getur sótt ókeypis Excel sniðmátið héðan.

VBA til að athuga hvort strengur inniheldur Value.xlsm

6 aðferðir í VBA til að athuga hvort strengur inniheldur annan streng í Excel

Niður í þessum hluta finnur þú 6 árangursríkar aðferðir til að útfæra VBA til að athuga hvort strengur inniheldur annan streng eða ekki .

1. VBA til að athuga hvort strengur inniheldur undirstreng

Hér að neðan er dæmi um InStr fallið til að finna hvort strengur inniheldur undirstreng í Excel.

Skref:

  • Ýttu á Alt + F11 á lyklaborðinu þínu eða farðu í flipann Hönnuði -> Visual Basic til að opna Visual Basic Editor .

  • Í sprettiglugganum, frá valmyndastikunni , smelltu á Setja inn -> Module .

  • Í kóðaglugganum, afritaðu eftirfarandi kóða og límdu hann.
4551

Þitt kóði er nú tilbúinn til að keyra.

  • Keyra fjölva.

Ef strengurinn þinn inniheldur undirstrenginn þá muntu finna samsvörun, annars skilar hann engri samsvörun.

Í dæminu okkar , vildum við komast að því hvort okkaraðalstrengur „ Movie: Iron Man, Batman, Superman, Spiderman, Thor “ inniheldur orðið „ Hulk “ eða ekki. Þar sem það gerist ekki fáum við niðurstöðu Kvikmynd fannst ekki .

2. VBA til að athuga hvort strengur inniheldur númer

Þú getur leitað hvort strengir innihaldi tölur eða ekki með því að nota VBA kóðann.

Sjáðu eftirfarandi dæmi þar sem við finnur hvaða strengir innihalda tölur með nöfnum kvikmyndarinnar.

Skref til að athuga hvort strengir innihalda tölur með VBA eru gefin fyrir neðan.

Skref:

  • Sömu leið og áður, opnaðu Visual Basic Editor frá Developer flipanum og Insert a Module í kóðaglugganum.
  • Í kóðaglugganum, afritaðu eftirfarandi kóða og límdu hann.
9863
  • Þetta er ekki undiraðferð fyrir VBA forritið til að keyra, þetta er að búa til User Defined Function (UDF), sem við munum kalla í vinnublaðið okkar til að framkvæma verkefnið. Svo, eftir að hafa skrifað kóðann, í stað þess að smella á Run hnappinn, smelltu á hnappinn Vista á valmyndastikunni til að vista makróskrána.
  • Farðu nú til baka í vinnublaðið sem þú vilt og skrifaðu notendaskilgreinda aðgerðina sem þú bjóst til í VBA kóðanum ( SearchNumber , í fyrstu línu kóðans) og innan sviga fallsins , sláðu inn tilvísunarnúmer hólfs strengsins sem hefur fremstu tölur (t.d. klefiB5 ).
  • Ýttu á Enter .

Þú færð Boolean gildi ( TRUE eða False ), ef strengurinn í reitnum inniheldur tölur þá færðu TRUE , annars FALSE .

  • Dragðu reitinn niður með Fill Handle til að nota formúluna á restina af reitunum til að athuga hvaða strengur inniheldur tölur og hver ekki.

3. VBA til að draga tölur úr streng

Í kaflanum hér að ofan lærum við hvernig á að athuga hvort strengurinn inniheldur tölur eða ekki. Og í þessum hluta munum við læra hvernig á að draga þessar tölur út og setja þær í annan reit með dæminu hér að neðan.

Skref til að athuga hvort strengir innihalda tölur og draga þær út með VBA er að finna hér að neðan.

Skref:

  • Opnaðu Visual Basic Editor frá Developer flipann og Insert a UserForm að þessu sinni frá Insert flipanum í kóðaglugganum.
  • Í Toolbox sem birtist skaltu draga og slepptu Command Button í UserForm .

  • Tvísmelltu á hnappinn, afritaðu eftirfarandi kóða og límdu hann.
7422
  • Keyddu kóðann og hann mun fara með þig á vinnublaðið sem þú vilt.
  • Smelltu á stjórnhnappinn og þú munt fá útdráttarnúmerið úr strengjunum.

4. VBA til að athuga hvort strengur inniheldur ákveðinn staf

Þessi aðferð er næstumsvipað og aðferðin við að athuga undirstreng í streng.

Hér fyrir neðan er InStr fallið til að finna hvort strengur inniheldur ákveðinn staf í Excel.

Skref :

  • Sömu leið og áður, opnaðu Visual Basic Editor frá Developer flipanum og Insert a Module í kóðaglugganum.
  • Í kóðaglugganum, afritaðu eftirfarandi kóða og límdu hann.
3670

Kóðinn þinn er nú tilbúinn til að keyra.

  • Keyra forritið. Ef strengurinn þinn inniheldur stafinn þá færðu samsvörun, annars mun hann ekki skila neinni samsvörun.

Í dæminu okkar , vildum við komast að því hvort aðalstrengurinn okkar „ Movie: Iron Man, Batman, Superman, Spiderman, Thor “ inniheldur stafinn „ Z “ eða ekki. Þar sem það gerist ekki fáum við niðurstöðu Bréf fannst ekki .

5. VBA til að athuga hvort svið af strengi inniheldur annan streng

Við höfum lært hvernig á að athuga hvort tiltekinn strengur inniheldur annan streng eða ekki. En í þessum hluta munum við læra hvernig á að athuga hvort strengjasvið inniheldur undirstreng eða ekki með eftirfarandi gagnasafni sem dæmi.

Skref:

  • Opnaðu Visual Basic Editor á flipanum Developer og Settu inn module í kóðaglugganum .
  • Í kóðaglugganum, afritaðu eftirfarandi kóða og límdu hann.
5332

Kóðinn þinn er nú tilbúinn til aðkeyra.

  • Keyra kóðann.

Ef þitt svið strengs inniheldur undirstrenginn þá færðu samsvörun fundin, annars skilar hann engri samsvörun.

6. VBA til að draga strengi úr streng

Í þessum hluta munum við sjá hvernig á að athuga hvort strengir innihalda ákveðna undirstrengi og draga þá út í öðrum reit.

Við munum draga út upplýsingar um nöfn sem byrja á „ Chris “ úr eftirfarandi gagnasafni.

Skref :

  • Opnaðu Visual Basic Editor frá Developer flipanum og Settu inn Module í kóðaglugganum.
  • Í kóðaglugganum, afritaðu eftirfarandi kóða og límdu hann.
2470

Kóðinn þinn er nú tilbúinn til að keyra.

  • Keyra kóðann.

Aðeins nöfnin sem byrja á „ Chris “ munu vera geymd í fyrirfram skilgreindum hólfum.

Hugh West er mjög reyndur Excel þjálfari og sérfræðingur með yfir 10 ára reynslu í greininni. Hann er með BA gráðu í bókhaldi og fjármálum og meistaragráðu í viðskiptafræði. Hugh hefur ástríðu fyrir kennslu og hefur þróað einstaka kennsluaðferð sem auðvelt er að fylgja eftir og skilja. Sérfræðiþekking hans á Excel hefur hjálpað þúsundum nemenda og fagfólks um allan heim að bæta færni sína og skara fram úr í starfi. Í gegnum bloggið sitt deilir Hugh þekkingu sinni með heiminum og býður upp á ókeypis Excel námskeið og netþjálfun til að hjálpa einstaklingum og fyrirtækjum að ná fullum möguleikum.