Jinsi ya kuvunja viungo katika Excel

Mawasiliano ni kipengele muhimu sana katika Excel. Baada ya yote, mara nyingi watumiaji wanapaswa kutumia habari kutoka kwa faili zingine. Lakini katika hali fulani, wanaweza kufanya madhara zaidi kuliko mema. Baada ya yote, kwa mfano, ikiwa unatuma faili hizi kwa barua, viungo havifanyi kazi. Leo tutazungumza kwa undani zaidi juu ya nini cha kufanya ili kuzuia shida kama hiyo.

Ni mahusiano gani katika Excel

Mahusiano katika Excel hutumiwa mara nyingi kwa kushirikiana na kazi kama vile VPRkupata habari kutoka kwa kitabu kingine cha kazi. Inaweza kuchukua fomu ya kiungo maalum ambacho kina anwani ya si tu kiini, lakini pia kitabu ambacho data iko. Kama matokeo, kiunga kama hiki kinaonekana kama hii: =VLOOKUP(A2;'[Mauzo 2018.xlsx]Ripoti'!$A:$F;4;0). Au, kwa uwakilishi rahisi zaidi, wakilisha anwani katika fomu ifuatayo: ='[Mauzo 2018.xlsx]Ripoti'!$A1. Wacha tuchambue kila moja ya viungo vya aina hii:

1. [Mauzo 2018.xlsx]. Kipande hiki kina kiunga cha faili ambayo unataka kupata habari. Pia inaitwa chanzo.
2. pics. Tulitumia jina lifuatalo, lakini hili sio jina linalopaswa kuwa. Kizuizi hiki kina jina la laha ambayo unahitaji kupata habari.
3. $A:$F na $A1 - anwani ya kisanduku au safu iliyo na data iliyo katika hati hii.

Kweli, mchakato wa kuunda kiungo kwa hati ya nje inaitwa kuunganisha. Baada ya kusajili anwani ya seli iliyo kwenye faili nyingine, yaliyomo kwenye kichupo cha "Data" hubadilika. Yaani, kitufe cha "Badilisha miunganisho" inakuwa hai, kwa msaada ambao mtumiaji anaweza kuhariri miunganisho iliyopo.

Kiini cha tatizo

Kama sheria, hakuna shida za ziada zinazotokea ili kutumia viungo. Hata ikiwa hali itatokea ambayo seli hubadilika, basi viungo vyote vinasasishwa kiatomati. Lakini ikiwa tayari umebadilisha jina la kitabu yenyewe au uhamishe kwa anwani tofauti, Excel inakuwa haina nguvu. Kwa hiyo, inazalisha ujumbe ufuatao.

Hapa, mtumiaji ana chaguo mbili zinazowezekana za jinsi ya kutenda katika hali hii. Anaweza kubofya "Endelea" na kisha mabadiliko hayatasasishwa, au anaweza kubofya kitufe cha "Badilisha Mashirika", ambayo anaweza kuyasasisha kwa mikono. Baada ya kubofya kifungo hiki, dirisha la ziada litaonekana ambalo itawezekana kubadilisha viungo, kuonyesha ambapo faili sahihi iko wakati huu na kile kinachoitwa.

Kwa kuongeza, unaweza kuhariri viungo kupitia kifungo sambamba kilicho kwenye kichupo cha "Data". Mtumiaji anaweza pia kujua kwamba uunganisho umevunjwa na hitilafu ya #LINK, ambayo inaonekana wakati Excel haiwezi kupata taarifa iko kwenye anwani maalum kutokana na ukweli kwamba anwani yenyewe ni batili.

Jinsi ya kutenganisha katika Excel

Mojawapo ya njia rahisi zaidi za kutatua hali iliyoelezwa hapo juu ikiwa huwezi kusasisha eneo la faili iliyounganishwa mwenyewe ni kufuta kiungo yenyewe. Hii ni rahisi sana kufanya ikiwa hati ina kiungo kimoja tu. Ili kufanya hivyo, lazima ufanye mlolongo wa hatua zifuatazo:

1. Fungua menyu ya "Data".
2. Tunapata sehemu ya "Viunganisho", na huko - chaguo "Badilisha viunganisho".
3. Baada ya hayo, bofya "Ondoa".

Ikiwa una nia ya kutuma kitabu hiki kwa mtu mwingine, inashauriwa sana ufanye hivyo mapema. Baada ya yote, baada ya kufuta viungo, maadili yote yaliyomo kwenye hati nyingine yatapakiwa moja kwa moja kwenye faili, kutumika katika fomula, na badala ya anwani ya seli, habari katika seli zinazofanana zitabadilishwa tu kuwa maadili. .

Jinsi ya kutenganisha vitabu vyote

Lakini ikiwa idadi ya viungo inakuwa kubwa sana, kuvifuta kwa mikono kunaweza kuchukua muda mrefu. Ili kutatua tatizo hili kwa wakati mmoja, unaweza kutumia macro maalum. Iko kwenye nyongeza ya VBA-Excel. Unahitaji kuiwasha na uende kwenye kichupo cha jina moja. Kutakuwa na sehemu ya "Viungo", ambayo tunahitaji kubofya kitufe cha "Vunja viungo vyote".

Nambari ya VBA

Ikiwa haiwezekani kuwezesha programu-jalizi hii, unaweza kuunda macro mwenyewe. Ili kufanya hivyo, fungua mhariri wa Visual Basic kwa kushinikiza funguo za Alt + F11, na uandike mistari ifuatayo kwenye uwanja wa kuingia msimbo.

Vitabu Vidogo vya UnlinkWorkbooks()

    Dim WbLinks

    Dim na Muda mrefu

    Chagua Kesi MsgBox(“Marejeleo yote ya vitabu vingine yataondolewa kwenye faili hii, na fomula zinazorejelea vitabu vingine zitabadilishwa na thamani.” & vbCrLf & “Je, una uhakika ungependa kuendelea?”, 36, “Tenganisha?” )

    Kesi ya 7′ No

        Toka Sub

    Maliza Chagua

    WbLinks = ActiveWorkbook.LinkSources(Aina:=xlLinkTypeExcelLinks)

    Ikiwa Sio IsEmpty(WbLinks) Basi

        Kwa i = 1 hadi UBound (WbLinks)

            ActiveWorkbook.BreakLink Name:=WbLinks(i), Aina:=xlLinkTypeExcelLinks

        Inayofuata

    mwingine

        MsgBox "Hakuna viungo vya vitabu vingine katika faili hii.", 64, "Viungo vya vitabu vingine"

    Kama mwisho

Mwisho Sub

Jinsi ya kuvunja mahusiano tu katika safu iliyochaguliwa

Mara kwa mara, idadi ya viungo ni kubwa sana, na mtumiaji anaogopa kwamba baada ya kufuta mmoja wao, haitawezekana kurejesha kila kitu ikiwa baadhi yalikuwa ya juu. Lakini hili ni tatizo ambalo ni rahisi kuepuka. Ili kufanya hivyo, unahitaji kuchagua safu ambayo unaweza kufuta viungo, na kisha uifute. Ili kufanya hivyo, lazima ufanye mlolongo ufuatao wa vitendo:

1. Chagua mkusanyiko wa data unaohitaji kurekebishwa.
2. Sakinisha nyongeza ya VBA-Excel, na kisha uende kwenye kichupo kinachofaa.
3. Ifuatayo, tunapata menyu ya "Viungo" na ubofye kitufe cha "Vunja viungo kwenye safu zilizochaguliwa".

Baada ya hapo, viungo vyote katika seti iliyochaguliwa ya seli vitafutwa.

Nini cha kufanya ikiwa mahusiano hayavunjwa

Yote ya hapo juu inaonekana nzuri, lakini katika mazoezi daima kuna baadhi ya nuances. Kwa mfano, kunaweza kuwa na hali ambapo mahusiano hayavunjwa. Katika kesi hii, kisanduku cha mazungumzo bado kinaonekana kusema kuwa haiwezekani kusasisha viungo kiotomatiki. Nini cha kufanya katika hali hii?

1. Kwanza, unahitaji kuangalia ikiwa habari yoyote iko katika safu zilizotajwa. Ili kufanya hivyo, bonyeza mchanganyiko muhimu Ctrl + F3 au ufungua kichupo cha "Mfumo" - "Meneja wa Jina". Ikiwa jina la faili limejaa, basi unahitaji tu kuhariri au kuiondoa kabisa. Kabla ya kufuta visanduku vilivyotajwa, unahitaji kunakili faili kwenye eneo lingine ili uweze kurudi kwenye toleo asili ikiwa hatua zisizo sahihi zilichukuliwa.
2. Ikiwa huwezi kutatua tatizo kwa kuondoa majina, unaweza kuangalia umbizo la masharti. Seli katika jedwali lingine zinaweza kurejelewa katika sheria za umbizo la masharti. Ili kufanya hivyo, pata kipengee kinacholingana kwenye kichupo cha "Nyumbani", na kisha bofya kitufe cha "Usimamizi wa Faili".

   Kwa kawaida, Excel haikupi uwezo wa kutoa anwani ya vitabu vingine vya kazi katika umbizo la masharti, lakini unafanya hivyo ikiwa unarejelea safu iliyotajwa na kumbukumbu ya faili nyingine. Kwa kawaida, hata baada ya kiungo kuondolewa, kiungo kinabaki. Hakuna shida katika kuondoa kiunga kama hicho, kwa sababu kiunga hicho hakifanyi kazi. Kwa hiyo, hakuna kitu kibaya kitatokea ikiwa utaiondoa.

Unaweza pia kutumia kipengele cha "Kuangalia Data" ili kujua ikiwa kuna viungo visivyohitajika. Viungo kwa kawaida husalia ikiwa aina ya "Orodha" ya uthibitishaji wa data inatumiwa. Lakini nini cha kufanya ikiwa kuna seli nyingi? Je! ni muhimu kuangalia kila mmoja wao kwa mlolongo? Bila shaka hapana. Baada ya yote, itachukua muda mrefu sana. Kwa hiyo, unahitaji kutumia msimbo maalum ili uihifadhi kwa kiasi kikubwa.

Chaguo Wazi

‘——————————————————————————————

Mwandishi : The_Prist(Shcherbakov Dmitry)

' Maendeleo ya kitaaluma ya maombi ya Ofisi ya MS ya utata wowote

' Kuendesha mafunzo kwenye MS Excel

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

' [email protected]

'WebMoney—R298726502453; Yandex.Money - 41001332272872

' Kusudi:

‘——————————————————————————————

Sub FindErrLink()

    'tunahitaji kuangalia kwenye kiungo cha Data -Change kwa faili chanzo

    'na weka maneno muhimu hapa kwa herufi ndogo (sehemu ya jina la faili)

    'asterisk inachukua nafasi ya idadi yoyote ya wahusika ili usiwe na wasiwasi kuhusu jina halisi

    Const sToFndLink$ = "*mauzo 2018*"

    Dim rr Kama Masafa, rc Kama Masafa, rres Kama Masafa, s$

    'fafanua seli zote zilizo na uthibitishaji wa data

    On Hitilafu Endelea Ifwatayo

    Weka rr = ActiveSheet.UsedRange.SpecialCells(xlCellTypeAllValidation)

    Ikiwa rr Sio Kitu Basi

        MsgBox "Hakuna visanduku vilivyo na uthibitishaji wa data kwenye laha inayotumika", vbInformation, "www.excel-vba.ru"

        Toka Sub

    Kama mwisho

    Kwenye Kosa GoTo 0

    'angalia kila seli kwa viungo

    Kwa Kila rc Katika rr

        'ikiwa tu, tutaruka makosa - hii inaweza pia kutokea

        'lakini miunganisho yetu lazima iwe bila wao na hakika itapatikana

        s = «»

        On Hitilafu Endelea Ifwatayo

        s = rc.Validation.Formula1

        Kwenye Kosa GoTo 0

        'imepatikana - tunakusanya kila kitu katika safu tofauti

        Ikiwa LCase(s) Kama sToFndLink Basi

            Ikiwa rres Sio Kitu Basi

                Weka res = rc

            mwingine

                Weka res = Muungano (rc, res)

            Kama mwisho

        Kama mwisho

    Inayofuata

    'ikiwa kuna muunganisho, chagua visanduku vyote vilivyo na ukaguzi kama huo wa data

    Ikiwa sio res Sio Kitu Basi

        res.Chagua

' res.Interior.Color = vbRed 'ikiwa unataka kuangazia kwa rangi

    Kama mwisho

Mwisho Sub

Ni muhimu kufanya moduli ya kawaida katika mhariri mkuu, na kisha ingiza maandishi haya hapo. Baada ya hayo, piga dirisha la macro kwa kutumia mchanganyiko muhimu Alt + F8, na kisha uchague macro yetu na ubofye kitufe cha "Run". Kuna mambo machache ya kuzingatia unapotumia nambari hii:

1. Kabla ya kutafuta kiungo ambacho hakifai tena, lazima kwanza uamue jinsi kiungo ambacho kimeundwa kinavyoonekana. Ili kufanya hivyo, nenda kwenye menyu ya "Data" na upate kipengee cha "Badilisha Viungo". Baada ya hayo, unahitaji kuangalia jina la faili, na uelezee katika quotes. Kwa mfano, kama hii: Const sToFndLink$ = "*mauzo 2018*"
2. Inawezekana kuandika jina sio kamili, lakini tu badala ya herufi zisizohitajika na nyota. Na katika nukuu, andika jina la faili kwa herufi ndogo. Katika kesi hii, Excel itapata faili zote ambazo zina kamba kama hiyo mwishoni.
3. Msimbo huu unaweza tu kuangalia viungo katika laha ambayo inatumika kwa sasa.
4. Kwa jumla hii, unaweza kuchagua tu seli ambazo imepata. Lazima ufute kila kitu kwa mikono. Hii ni nyongeza, kwa sababu unaweza kuangalia kila kitu mara mbili tena.
5. Unaweza pia kufanya seli ziangaziwa kwa rangi maalum. Ili kufanya hivyo, ondoa apostrophe kabla ya mstari huu. res.Interior.Color = vbRed

Kawaida, baada ya kukamilisha hatua zilizoelezwa katika maagizo hapo juu, haipaswi kuwa na uhusiano usiohitajika. Lakini ikiwa kuna baadhi yao katika hati na huwezi kuwaondoa kwa sababu moja au nyingine (mfano wa kawaida ni usalama wa data kwenye karatasi), basi unaweza kutumia mlolongo tofauti wa vitendo. Maagizo haya ni halali kwa matoleo ya 2007 na matoleo mapya zaidi.

1. Tunaunda nakala ya nakala ya hati.
2. Fungua hati hii kwa kutumia kumbukumbu. Unaweza kutumia yoyote ambayo inasaidia muundo wa ZIP, lakini WinRar pia itafanya kazi, pamoja na ile iliyojengwa kwenye Windows.
3. Katika kumbukumbu inayoonekana, unahitaji kupata folda ya xl, na kisha ufungue Viungo vya nje.
4. Folda hii ina viungo vyote vya nje, ambavyo kila kimoja kinalingana na faili ya fomu externalLink1.xml. Zote zimehesabiwa tu, na kwa hiyo mtumiaji hawana fursa ya kuelewa ni aina gani ya uhusiano huu. Ili kuelewa ni aina gani ya uunganisho, unahitaji kufungua folda ya _rels, na uangalie hapo.
5. Baada ya hapo, tunaondoa viungo vyote au maalum, kulingana na kile tunachojifunza kwenye faili ya externalLinkX.xml.rels.
6. Baada ya hayo, tunafungua faili yetu kwa kutumia Excel. Kutakuwa na maelezo kuhusu hitilafu kama vile "Hitilafu katika sehemu ya maudhui katika Kitabu." Tunatoa kibali. Baada ya hapo, mazungumzo mengine yatatokea. Tunaifunga.

Baada ya hayo, viungo vyote vinapaswa kuondolewa.