Me pehea te wawahi i nga hononga ki Excel

Ko te whakawhitiwhiti korero he waahanga tino whai hua i roto i te Excel. I muri i nga mea katoa, he maha nga wa me whakamahi nga kaiwhakamahi i nga korero mai i etahi atu konae. Engari i etahi ahuatanga, ka nui ake te kino i te pai. I muri i nga mea katoa, hei tauira, ki te tukuna e koe enei konae ma te mēra, kaore nga hononga e mahi. I tenei ra ka korero maatau ake mo nga mahi hei karo i taua raru.

He aha nga hononga i roto i te Excel

Ko nga hononga i roto i te Excel ka whakamahia i te taha o nga mahi penei i te VPRki te tiki korero mai i tetahi atu pukamahi. Ka taea te tango i te ahua o te hono motuhake kei roto te wahitau o te pūtau anake, engari ano hoki te pukapuka kei reira nga raraunga. Ko te mutunga, he penei te ahua o taua hononga: =VLOOKUP(A2;'[Hokona 2018.xlsx]Ripoata'!$A:$F;4;0). Ranei, mo te ahua ngawari ake, tohuhia te wahitau ki te ahua e whai ake nei: ='[Hokona 2018.xlsx]Ripoata'!$A1. Kia tātarihia ia o nga huānga hono o tenei momo:

1. [Hokona 2018.xlsx]. Kei roto i tenei kongakonga he hononga ki te konae e hiahia ana koe ki te tiki korero. Ka kiia hoki ko te puna.
2. Whakaahua. I whakamahia e matou te ingoa e whai ake nei, engari ehara tenei i te ingoa e tika ana. Kei roto i tenei poraka te ingoa o te rau hei kimi korero.
3. $A:$F me te $A1 – te wāhitau o tētahi pūtau, awhe rānei kei roto ngā raraunga kei roto i tēnei tuhinga.

Ko te tikanga, ko te hanga hononga ki tetahi tuhinga o waho e kiia ana ko te hono. I muri i to rehitatanga i te wahitau o te pūtau kei roto i tetahi atu konae, ka huri nga ihirangi o te ripa "Raraunga". Ara, ka kaha te paatene "Huri hononga", me te awhina ka taea e te kaiwhakamahi te whakatika i nga hononga o naianei.

Te mauri o te raruraru

Ka rite ki te tikanga, karekau he raruraru ka puta ake hei whakamahi hononga. Ahakoa ka puta ake he ahuatanga ka huri nga pūtau, ka whakahou aunoa nga hononga katoa. Engari ki te whakaingoa kē koe i te pukamahi ake, ka nukuhia ranei ki tetahi wahitau rereke, ka kore te mana o Excel. No reira, ka puta te korero e whai ake nei.

I konei, e rua nga whiringa ka taea e te kaiwhakamahi mo te mahi i tenei ahuatanga. Ka taea e ia te panui "Haere tonu" ka kore e whakahouhia nga huringa, ka taea ranei e ia te patene i te paatene "Hurihia nga Hononga", ka taea e ia te whakahou i a ringa. I muri i ta maatau paatene i tenei paatene, ka puta he matapihi taapiri ka taea te whakarereke i nga hononga, e tohu ana kei hea te konae tika i tenei wa me te aha e kiia ana.

I tua atu, ka taea e koe te whakatika i nga hononga ma te paatene e tika ana kei runga i te ripa "Raraunga". Ka taea hoki e te kaiwhakamahi te mohio kua pakaru te hononga e te hapa #LINK, ka puta mai i te wa kaore e taea e Excel te uru atu ki nga korero kei tetahi wahitau motuhake na te mea he muhu te wahitau ake.

Me pehea te wete hononga i roto i te Excel

Ko tetahi o nga huarahi ngawari ki te whakatika i te ahuatanga kua whakaahuahia i runga ake nei mena kaore e taea e koe te whakahou i te waahi o te konae hono ko te whakakore i te hono ake. He tino ngawari tenei ki te mea he hononga kotahi anake te tuhinga. Ki te mahi i tenei, me mahi e koe te raupapa o nga taahiraa e whai ake nei:

1. Whakatuwherahia te tahua "Raraunga".
2. Ka kitea e matou te waahanga "Hononga", kei reira - te whiringa "Huri hononga".
3. I muri i tera, pawhiria te "Wetehono".

Mena kei te hiahia koe ki te tuku mēra atu i tenei pukapuka ki tetahi atu tangata, e pai ana kia mahia e koe i mua. I muri i nga mea katoa, i muri i te whakakore i nga hononga, ko nga uara katoa kei roto i tetahi atu tuhinga ka utaina aunoa ki roto i te konae, whakamahia i roto i nga tauira, a hei utu mo te wahitau pūtau, ko nga korero kei roto i nga pūtau e rite ana ka hurihia hei uara. .

Me pehea te wete hononga pukapuka katoa

Engari ki te nui rawa te maha o nga hononga, ka roa pea te whakakore a-ringa. Hei whakaoti i tenei raruraru i te wa kotahi, ka taea e koe te whakamahi i tetahi tonotono motuhake. Kei roto i te taapiri VBA-Excel. Me whakahohe koe ka haere ki te ripa o taua ingoa. Ka puta he waahanga "Hononga", me paato tatou i te paatene "Whiritia nga hononga katoa".

Waehere VBA

Ki te kore e taea te whakahohe i tenei taapiri, ka taea e koe te hanga tonotono. Ki te mahi i tenei, whakatuwheratia te ētita Visual Basic ma te pehi i nga taviri Alt + F11, ka tuhia nga rarangi e whai ake nei ki te mara whakauru waehere.

Sub UnlinkWorkBooks()

    WbLinks atarua

    Ataahua me te Roa

    Tīpakohia te Case MsgBox("Ka tangohia nga tohutoro katoa ki etahi atu pukapuka mai i tenei konae, ka whakakapihia nga tauira e pa ana ki etahi atu pukapuka ki nga uara." & vbCrLf & "Kei te tino hiahia koe ki te haere tonu?", 36, "Wete hono?" )

    Take 7′ No

        Putaatu Sub

    Whiriwhiri Whakamutunga

    WbLinks = ActiveWorkbook.LinkSources(Momo:=xlLinkTypeExcelLinks)

    Mena karekau he Putea(WbLinks) Na

        Mo i = 1 Ki te UBound(WbLinks)

            ActiveWorkbook.BreakLink Ingoa:=WbLinks(i), Momo:=xlLinkTypeExcelLinks

        Panuku

    atu

        MsgBox "Karekau he hononga ki etahi atu pukapuka kei roto i tenei konae.", 64, "He hononga ki etahi atu pukapuka"

    Whakamutunga Ki te

Sub whakamutunga

Me pehea te wetewete i nga here i roto i te awhe kua tohua

Mai i tera wa ki tera wa, he nui te maha o nga hononga, a ka mataku te kaiwhakamahi kei muri i te whakakore i tetahi o aua mea, kaore e taea te whakahoki mai i nga mea katoa mena he nui noa atu etahi. Engari he raruraru tenei he ngawari ki te karo. Ki te mahi i tenei, me whiriwhiri koe i te awhe hei muku i nga hononga, katahi ka mukua. Ki te mahi i tenei, me mahi e koe te raupapa o nga mahi e whai ake nei:

1. Tīpakohia te huingararaunga me whakarerekē.
2. Tāutahia te tāpiri-ake VBA-Excel, ka haere ki te ripa e tika ana.
3. I muri mai, ka kitea e matou te tahua "Hononga" ka paato i te paatene "Whiritia nga hononga ki nga awhe kua tohua".

Whai muri i tera, ka mukua nga hononga katoa o te huinga o nga pūtau kua tohua.

He aha te mahi ki te kore e motu nga here

He pai nga mea katoa o runga ake nei, engari i roto i nga mahi he maha tonu nga ahuatanga. Hei tauira, tera pea he ahuatanga kaore e pakaru nga here. I tenei keehi, ka puta tonu he pouaka korero e kii ana kaore e taea te whakahou aunoa i nga hononga. He aha te mahi i tenei ahuatanga?

1. Tuatahi, me tirotiro koe mena kei roto etahi korero kei roto i nga rarangi ingoa. Ki te mahi i tenei, pehia te huinga matua Ctrl + F3 ka whakatuwhera ranei i te ripa "Taia" - "Kaiwhakahaere Ingoa". Mena kua ki tonu te ingoa o te konae, me whakarere kee koe me tango katoa ranei. I mua i te whakakore i nga awhe kua whakaingoatia, me kape koe i te konae ki etahi atu waahi kia hoki ai koe ki te putanga taketake mena kua he nga mahi.
2. Ki te kore e taea e koe te whakaoti rapanga ma te tango ingoa, ka taea e koe te tirotiro i te whakatakotoranga herenga. Ko nga pūtau kei tetahi atu ripanga ka taea te tohutoro ki nga ture whakahōputu herenga. Ki te mahi i tenei, kimihia te mea e pa ana ki te ripa "Kainga", ka paato i te paatene "Whakahaere Kōnae".

   Ko te tikanga, karekau a Excel e hoatu ki a koe te kaha ki te tuku i te wahitau o etahi atu pukamahi i roto i te whakahōputu herenga, engari ka mahia e koe mena ka tirohia e koe tetahi awhe ingoa me te tohutoro ki tetahi atu konae. I te nuinga o te wa, ahakoa ka tangohia te hono, ka mau tonu te hononga. Kaore he raruraru ki te tango i taua hononga, no te mea kei te kore te hono e mahi. Na reira, kaore he kino e pa ki te tangohia e koe.

Ka taea hoki e koe te whakamahi i te mahi "Tirotiro Raraunga" ki te mohio mena he hononga kore. Ka noho tonu nga hononga ki te whakamahia te momo "Rarangi" mo te whakamana raraunga. Engari me aha mena he maha nga pūtau? He mea tika kia tirohia ia o raatau i te raupapa? Ko te akoranga kaore. Ka mutu, ka roa rawa te waa. Na reira, me whakamahi koe i tetahi waehere motuhake hei whakaora nui.

Kōwhiringa Maamaa

'————————————————————————————

' Kaituhi: The_Prist(Shcherbakov Dmitry)

' Te whakawhanaketanga ngaio o nga tono mo MS Office ahakoa he uaua

' Te whakahaere whakangungu mo MS Excel

' https://www.excel-vba.ru

' [kua tiakina te imeera]

'WebMoney—R298726502453; Yandex.Money — 41001332272872

' Te kaupapa:

'————————————————————————————

Raro KimiErrLink()

    'me titiro tatou ki te Raraunga -Huri hononga hono ki te konae puna

    'a hoatu nga kupumatua ki konei ki te puriki iti (he wahanga o te ingoa kōnae)

    Ko te 'asterisk ka whakakapi noa i te maha o nga tohu kia kore koe e awangawanga mo te ingoa tika

    Const sToFndLink$ = “*hoko 2018*”

    Dim rr As Range, rc As Range, rres As Range, s$

    'tautuhia nga pūtau katoa me te whakamana raraunga

    I muri i te Hapa I muri

    Tautuhi rr = ActiveSheet.UsedRange.SpecialCells(xlCellTypeAllValidation)

    Ki te rr Kore he mea Na

        MsgBox “Karekau he pūtau whai mana raraunga i runga i te rau hohe”, vbInformation, “www.excel-vba.ru”

        Putaatu Sub

    Whakamutunga Ki te

    Kei te Hapa HaereTo 0

    'tirohia ia pūtau mō ngā hononga

    Mo ia rc In rr

        'mehemea, ka pekehia e matou nga hapa - ka puta ano tenei

        'engari me noho kore o tatou hononga, ka tino kitea

        s = «»

        I muri i te Hapa I muri

        s = rc.Whakamana.Taia1

        Kei te Hapa HaereTo 0

        'i kitea - ka kohia e matou nga mea katoa i roto i te awhe motuhake

        Ki te LCase(s) Pērā i sToFndLink Na

            Ki te rres Ko te mea Na

                Tautuhi rres = rc

            atu

                Tautuhi rres = Uniana(rc, rres)

            Whakamutunga Ki te

        Whakamutunga Ki te

    Panuku

    'mēnā he hononga, tīpakohia ngā pūtau katoa me ngā arowhai raraunga pēnei

    Ki te kore rres Ko te mea Na

        rres.Tīpako

' rres.Interior.Color = vbRed 'ki te hiahia koe ki te whakanui me te tae

    Whakamutunga Ki te

Sub whakamutunga

Me hanga he kōwae paerewa ki te ētita tonotono, kātahi ka kōkuhu i tēnei tuhinga ki reira. I muri i tera, waeahia te matapihi tonotono ma te whakamahi i te huinga matua Alt + F8, ka tohua to maatau tonotono ka paato i te paatene "Run". He iti nga mea hei maumahara ina whakamahi ana i tenei waehere:

1. I mua i to rapu hononga kua kore e whai take, me matua whakatau koe he aha te ahua o te hononga i hangaia ai. Ki te mahi i tenei, haere ki te tahua "Raraunga" ka kitea te mea "Huri Hononga" kei reira. I muri i tera, me titiro koe ki te ingoa o te konae, ka tohua i roto i nga korukī. Hei tauira, penei: Const sToFndLink$ = “*hoko 2018*”
2. Ka taea te tuhi i te ingoa kaore i te katoa, engari me whakakapi noa nga tohu kore me te whetūriki. A, i roto i nga korero, tuhia te ingoa kōnae ki nga reta iti. I tenei keehi, ka kitea e Excel nga konae katoa kei roto he aho penei i te mutunga.
3. Ka taea e tenei waehere anake te tirotiro mo nga hononga o te rau e hohe ana i tenei wa.
4. Ma tenei tonotono, ka taea e koe anake te kowhiri i nga pūtau kua kitea e ia. Me muku a ringa koe i nga mea katoa. He taapiri tenei, na te mea ka taea e koe te tirotiro tuarua i nga mea katoa.
5. Ka taea hoki e koe te hanga i nga pūtau kia tohua ki tetahi tae motuhake. Ki te mahi i tenei, tangohia te apostrophe i mua i tenei rarangi. rres.Interior.Color = vbRed

I te nuinga o te wa, ka oti i a koe nga hikoi e whakaahuatia ana i nga tohutohu i runga ake nei, me kore he hononga kore. Engari ki te mea kei roto etahi o enei i roto i te tuhinga kaore e taea e koe te tango mo tetahi take, mo tetahi atu (he tauira angamaheni ko te haumarutanga o nga raraunga i roto i te rau), ka taea e koe te whakamahi i tetahi atu raupapa mahi. He tika tenei tohutohu mo nga putanga 2007 me teitei ake.

1. Ka hangaia e matou he kape taapiri o te tuhinga.
2. Whakatuwheratia tenei tuhinga ma te whakamahi i te purongo. Ka taea e koe te whakamahi i tetahi e tautoko ana i te whakatakotoranga ZIP, engari ka mahi ano a WinRar, me te mea i hangaia ki Windows.
3. I roto i te purongo ka puta, me rapu koe i te kōpaki xl, ka whakatuwhera i waho Hononga.
4. Kei roto i tenei kōpaki nga hononga o waho katoa, e rite ana ki tetahi konae ahua externalLink1.xml. Ko enei katoa he tatau noa, na reira kaore te kaiwhakamahi e whai waahi ki te mohio he aha te ahua o tenei hononga. Kia mohio ai koe he aha te momo hononga, me whakatuwhera te kōpaki _rels, ka titiro ki reira.
5. Whai muri i tera, ka tangohia e matou nga hononga katoa, hononga motuhake ranei, i runga i nga mea i akohia e matou i roto i te kōnae externalLinkX.xml.rels.
6. I muri i tera, ka whakatuwherahia ta maatau konae ma te whakamahi i a Excel. Ka puta he korero mo te hapa penei i te "Hapa ki tetahi waahanga o te ihirangi kei roto i te Pukapuka." Ka hoatu e matou te whakaaetanga. Whai muri i tera, ka puta ano he korero. Ka kati tatou.

I muri i tera, me tango nga hononga katoa.