KIMI mahi i roto i te VBA: Me pehea te whakamahi?

hiahia ki te ako ki te whakamahi KIMI mahi i roto i te VBA🇧🇷 Na kei te waahi tika koe!

Ko wai kare e mohio ki te whiringa RAPU i Excel? Mena kua roa koe e mahi ana me Excel, kua whakamahia pea e koe te mahi SEARCH, te taviri pokatata rongonui ranei Ctrl + L hei kimi i tetahi kupu, waahanga ihirangi ranei e hiahia ana koe ki te rapu i roto i to pepamahi katoa. rite ki te pukamahi katoa.

Ano, kei roto i te VBA he mahi e kiia nei ko FIND hei awhina i a maatau ki te rapu i te uara e rapu ana matou.

Whaia nga korero i raro nei ki te ako atu mo tenei ahuatanga ma nga tauira whai kiko.

He pehea te mahi a te FIND i roto i te VBA?

Ko te mahi Excel VBA FIND e rapu ana i tetahi uara motuhake i roto i te awhe motuhake. Ka rapu i te putanga tuatahi o taua uara, a, ki te kitea, ka whakahokia e te mahi te pūtau kei roto. Heoi, ki te kore e kitea he taurite, karekau te mahi e whakahoki mai. Ka taea e te mahi VBA FIND te whakahoki mai i te tukinga tika, waahanga ranei.

Hei tauira, ko te waehere e whai ake nei e rapu ana i te kuputuhi "San Pablo» i roto i te waahi A1:A10 en «Pepamahi1..

Me nga Rau("Raurangi1"). Awhe("A1:A10")
Tautuhi Rng = .Kimi(He aha:="São Paulo")

Ko te kaupapa o te whakamahi i te mahi FIND i roto i te VBA ko te kimi i te uara e hiahiatia ana i roto i te huinga raraunga kua homai. Ma te waehere VBA, ka taea e koe te whakaaunoa i te mahi rapu uara ki Excel.

VBA KIMI Hanga Wetereo

Ko te wetereo mahi VBA FIND e kiia ana e whai ake nei:

kupu.Kimihia(He aha, Muri, TitiroMai, TitiroAt, RapuOrder, RapuDirection, MatchCase, MatchByte, RapuFormat)

Kei hea:

kīanga: ko te ahanoa awhe, kei mua i te mahi KIMI i te waehere VBA. Ko te awhe rapu ka kotahi, neke atu ranei nga rarangi, nga pou, te ripanga katoa ranei. Ka whakaaetia e te mahi VBA FIND nga tohenga e whai ake nei:

  • He aha: Koinei te uara hei rapu. Ka taea te tau, te tuhinga, me etahi atu momo raraunga Excel. He rite tonu tenei tautohe ki te whiringa Rapu o te "kimihia ka whakakapi” mai i a Excel.
  • I muri: He tohu i te pūtau ka timata te rapu. Ka whakauruhia hei tohutoro pūtau kotahi. Ki te waihotia tenei tautohe, ka timata te rapunga i muri i te pūtau kei te kokonga maui o runga o te awhe rapu kua tohua.
  • Titiro ki roto: Koinei te waahi (raraunga ranei) me tiro ake te uara. Ka taea he korero (xlComments), he tauira (xlFormulas), he uara ranei (xlValues). Ko te uara taunoa mo tenei tautohe ko xlFormulas. Ano hoki, he rite tenei tautohe ki te whiringa Rapu o te "kimihia ka whakakapi” mai i a Excel.
  • Titiro: Ka whakatauhia e tenei tautohe mehemea ka taurite ki te katoa o nga ihirangi pūtau (whakariterite tika) ki tetahi waahanga ranei o te ihirangi pūtau (whakaritenga wahanga). Ko nga taurite he xlWhole me te xlPart mo nga tukinga tika me te wahanga wahanga. Ko te uara taunoa mo tenei tautohe ko xlPart.
  • Raupapa rapu: Ko tenei tautohetohe e whakaatu ana i te raupapa rapu. Ka taea e koe te tautuhi mena kei nga rarangi (xlByRows) te rapunga, nga pou ranei (xlByColumns). Ko te uara taunoa mo tenei tautohe ko xlByRows. Ano hoki, he rite tenei tautohe ki te whiringa Rapu o te "kimihia ka whakakapi” mai i a Excel.
  • Rapu wāhitau: Ka tohu i te wahitau ka mahia te rapu. Ka taea e koe te rapu ki raro, ki te pūtau e whai ake nei me te xlNext tamau. Ka taea ranei te rapu whakamuri (whakarunga) i te pūtau o mua me te xlO mua tonu. Ko te uara taunoa mo tenei tautohe ko xlNext.
  • Ōrite kēhi: Ma tenei tohenga e whakatau mena he take tairongo te rapunga, kaore ranei. Mēnā he pū tairongo te rapunga, ka tohua tenei tautohe hei pono (TRUE), ki te kore he teka (HAKA). Ko te uara taunoa mo tenei tautohe he Heke.
  • MatchByte: Me whakamahi tenei tautohe mena kua whakauruhia, kua tohua ranei e tetahi te tautoko reo paita-rua. Me tauwhāitihia hei pono mena ka taurite nga tohu paita-rua ki nga tohu-paita-rua. Me whakatauhia he teka mena ka taurite nga tohu paita-rua ki o raatau paita kotahi.
  • hōputu rapu: Ka tohu mehemea me noho te uara hei rapunga i roto i te whakatakotoranga motuhake (penei i te maia, te titaha ranei) kaore ranei. Mena me whai te uara rapu ki tetahi tikanga whakahōputu, ka tohua tenei tohenga hei pono, mena he teka. Ko te uara taunoa o tenei tautohe he teka (FALSE).

te tautohe noa aha e tika ana. Ko etahi atu tohenga he mea whiriwhiri.

Ka whakahokia e te mahi FIND tetahi o nga hua e whai ake nei:

  • Ki te kitea he taurite, ka whakahokia e te mahi te pūtau tuatahi i kitea ai te uara.
  • Ki te kore e kitea he taurite, karekau te mahi e whakahoki mai. Ko tenei na te mea kua tautuhia te ahanoa mahi ki te kore.

I tua atu, ki te kore e kitea he rite, he karere ritenga kua tohua ma te mahi pouaka karere ka taea te whakahoki (tirohia nga tauira waehere i raro nei).

Tuhipoka 1: Ka timata te rapunga i muri i te pūtau kua tohua ki te tohenga. I muri i ka haere tonu ki te pūtau whakamutunga o te awhe rapu. Ki te kore e kitea te uara tae noa ki tenei pūtau whakamutunga, ka timata ano te rapunga mai i te pūtau tuatahi o te awhe rapu ki te pūtau kua tohua ki te tohenga. I muri i..

Na reira, te pūtau i tohua i roto i te tohenga I muri i ka rapua i te mutunga o te mahi rapu. Mo etahi atu korero mo te whakamahinga o te tohenga I muri itirohia te tauira tuarua i tenei tuhinga.

Tuhipoka 2: I nga wa katoa ka whakamahia te mahi VBA FIND, ko te titiro ki roto.. Mirara.. raupapa rapu y MatchByte Na reira, ki te waiho enei uara i te wa e whakamahia ana te mahi, ka whakamahia e Excel nga uara kua tiakina o mua. Na reira, e taunaki ana kia whakaatu marama nga tohenga kua whakaratohia i nga wa katoa ka mahia te rapunga ma te whakamahi i te mahi VBA FIND.

Me pehea te whakamahi i te mahi KIMI i Excel VBA?

Kia mohio ai koe ki te whakamahinga o te mahi FIND i roto i te VBA, kua wehea e matou etahi tauira mahi i raro nei.

Tauira 1: Te whiriwhiri i te pūtau me te putanga tuatahi o te uara rapu

I tenei tauira tuatahi, me whakaaro kei a koe he rarangi ingoa kei roto i te ahua i raro nei, ka hiahia koe ki te tirotiro me te kowhiri i te pūtau kei roto te ingoa. pedro..

Mai i reira, whai i enei taahiraa:

1. Uru ki te aratohu Kaiwhakawhanake .. taketake ataata🇧🇷 (Mena karekau koe i te ripa Kaiwhakawhanake e whakahohea i to Excel, tirohia konei taahiraa i te taahiraa).

kaiarahi kaiwhakawhanake

rua. I runga i te mata VBA, tohua te raumahi e hiahiatia ana mai i te tahua kei te taha maui. I tenei tauira, ka tohua e matou te Pepamahi1 ko te raumahi kei roto te rarangi ingoa.

3. I muri i te kowhiri i te pepa mahi e hiahiatia ana, i te waahi ki te taha matau, whakauruhia te waehere i raro nei:

Tīpakohia te pūtau me te putanga tuatahi o te uara rapu

Ingoa Wahi iti()
Awhe("A1:A10"). Kimihia(He aha:="Peter").Tīpakohia
Sub whakamutunga
  • Panui i roto i te waehere i runga ake nei i whakahuahia e matou te awhe e rapu ana matou (A1: A10..
  • Whai muri i te whakahua i te awhe, tuhia he waahi (.) ka pato HE WHAKAMAHI..
  • Ko ta matou tautohetohe tuatahi ko ta matou e rapu ana. Hei whakanui i te tautohetohe, ka taea e tatou te tuku i te tautohetohe aha:=ka whai hua tenei ki te tautuhi ko tehea tawhā e korero ana matou.
  • Ko te waahanga whakamutunga i muri i te kimi i te kupu e hiahia ana matou ki te mahi. Me whiriwhiri tatou i te kupu, no reira tukuna te tautohe hei Tīpakohia..
  • Na ka whakahaere i tenei waehere ma te whakamahi i te matua F5 ma te ringa ranei e whakaatuhia ana i te ahua i raro nei hei kowhiri i te pūtau tuatahi kei roto te ingoa pedro..

kimi i roto i te VBA

Tauira 2: Tīpakohia te pūtau me te putanga tuarua o te uara rapu

I roto i tenei tauira tuarua, kia mahara kei te ahua e whai ake nei etahi ingoa kei te awhe A1:A10. Kia mahara ko te ingoa "pedro” e rua nga putanga i te pou A.

Tīpakohia te pūtau me te takanga tuarua

I tenei keehi, e hiahia ana matou ki te rapu me te kowhiri i te puta tuarua o te ingoa “Peter” kei te pou A (ara, te pūtau A7). Hei mahi i tenei ka whakamahia e matou te waehere e whai ake nei:

KIMI te putanga tuarua o te VBA

Ingoa Wahi iti()
Awhe("A1:A10"). Kimihia(He aha:="Peter", Muri:=Awhe("A2")).Tīpakohia
Sub whakamutunga

Kia mahara ki te waehere i runga ake nei ka timata te rapunga i muri i te pūtau A2 ka haere tonu ki te pūtau whakamutunga i te tīwae A. Ko te take i tohua te awhe rapu hei tīwae A (A1:A10).

Na, i te mea ka timata te rapunga i roto i te pūtau A3, ko te uara "pedro” kei roto i te pūtau A7 hoatu"Ripanga2🇧🇷 Na reira, ka tohua te pūtau A7 e te mahi KIMI i te wa e mahia ana te waehere.

Mena te ingoa "pedro” kare ano i kitea i te pūtau A3 tae noa ki te pūtau whakamutunga i te tīwae A, ka tīmata anō te rapunga i te pūtau A1 ka mutu ki te pūtau A2 i tēnei wā. Na reira, ko te pūtau i tohua ki te tohenga "I muri i” ka rapua tika i te mutunga o te mahi rapu.

Tauira 3: Kimihia te kuputuhi ma te tohu i etahi o ona tohu

Ki te rapu kupu ma te tohu i tetahi waahanga anake, whakauruhia te tohenga Mirara como xlWahanga waiho ranei tenei tautohe. Ma te taunoa, ka taurite te mahi FIND ki nga tohu o te uara rapu ki te aho katoa. Ka whakahokia te pūtau kei roto tenei aho katoa.

Tirohia te tauira i raro nei:

Ingoa Wahi iti()
Awhe("A1:A10"). Kimihia(What:="Ped", LookAt:=xlWāhanga).Tīpakohia
Sub whakamutunga

Ko tenei waehere e rapu ana i nga tohu "ui” i roto i te awhe A1:A25 o “Speet3”. Ko te pūtau kei roto te uara ka whakahokia, ka whakaingoatia reta wahi🇧🇷 No reira, ahakoa ka tuuhia nga tohu uara rapu ki te timatanga, ki waenganui, ki te mutunga ranei o te aho, ka whakahoki mai a Excel VBA i tetahi whakataetae.

Tohu: te mau tonu xlWahanga ka taea te whakakore i te waehere na te mea ko te uara taunoa o te mahi FIND. Engari ki te tohua tenei tohenga, tirohia kia kaua e kapi ki nga korukī rua.

Tauira 4: Te kimi kupu i roto i te korero

Ka taea hoki e koe te whakamahi i te mahi VBA FIND ki te rapu kupu i roto i te korero o te pūtau i Excel.

Kia pai ake te maarama, tirohia te tauira i raro nei kei a matou he pepa mahi e toru nga pūtau me nga korero (e tohuhia ana e nga tapatoru whero). Mai i tenei e hiahia ana matou ki te rapu i te tuhinga "komihana utua” kei roto i tetahi o nga korero. I tenei keehi, ka whakamahia e matou te waehere e whai ake nei:

Wāhitau Kōrero()
Awhe("A1:B10"). Kimihia(He aha:="Ka Utu Te Komihana", Tirohia:=xlKorero).Tīpakohia
Sub whakamutunga

Kimihia te kuputuhi i roto i te korero

Ko te mutunga, ka kowhiria e Excel anake te pūtau kei roto te korero i tohua tana tuhinga ki roto i ta maatau waehere.

Tauira 5: Hapa te whakahaere i te mahi KIMI i VBA

Mena karekau te tuhinga e rapuhia ana e matou i roto i te awhe kua homai, ka whakahokia mai e te VBA he hapa penei i raro nei:

hapa 91

Hei karo i tenei hapa, ka taea e tatou te whakamahi i tetahi waehere penei i raro nei:

Ingoa Wahi iti()
Hua Ataahua Hei Rerekē

I muri i te Hapa I muri
Awhe("A1:A10"). Kimihia(What:="Cristina").Tīpako
Kei te Hapa HaereTo 0

Hua = ActiveCell.Value

Ki te Hua = "" Na
MsgBox "Ko te uara e rapu ana koe kaore i te waatea i te awhe kua whakaratohia!"
Putaatu Sub
Whakamutunga Ki te

Sub whakamutunga

Tirohia i roto i te waehere i runga ake nei mena ka kitea e te VBA te uara, ka whakaatu i te uara kua kitea, ki te kore ranei ka whakaatuhia te karere hei "Ko te uara e rapu ana koe kaore i te waatea i te awhe kua homai..

Mo etahi atu tohutohu mo te whakatika i nga hapa VBA, tirohia te tuhinga: Nga hapa Excel VBA: nga mea katoa e hiahia ana koe ki te mohio!

Nga korero hei maumahara

  • Ko te mahi FIND he wahanga o te taonga RANGE a me whakamahi koe i te FIND i muri i te kowhiri i te awhe anake.
  • I roto i te mahi FIND, ko te tohenga tuatahi (aha), me nga mea katoa he mea whiriwhiri.
  • Mena ka kitea e koe te uara i muri i tetahi pūtau motuhake, ka taea e koe te whakahua i te pūtau i te tawhā I muri i o te wetereo rapu.

Tangohia te ripanga i konei kei roto nga tauira e whakaatuhia ana i tenei akoranga.

Tirohia hoki nga tohutohu Excel e whai ake nei:

Na he aha to whakaaro mo te mahi KIMI i roto i te VBA? Mena kei a koe etahi patai, waiho to korero i raro nei. Tirohia hoki etahi atu tohutohu Excel me VBA i runga i ta maatau paetukutuku!

Tommy Peeke
Ka hari matou ki te whakarongo ki o whakaaro

waiho he whakautu

TechnoBreak | Nga Tuku me nga Arotake
Moko
Whakahohehia te rehitatanga ki nga waahanga - he whanui
Te Kete Hoko