Պատճենել բանաձևերը առանց հղման հերթափոխի

խնդիր

Ենթադրենք, որ մենք ունենք այսպիսի պարզ աղյուսակ, որտեղ գումարները հաշվարկվում են յուրաքանչյուր ամսվա համար երկու քաղաքներում, և այնուհետև գումարը վերածվում է եվրոյի՝ J2 դեղին բջիջի փոխարժեքով:

Պատճենել բանաձևերը առանց հղման հերթափոխի

Խնդիրն այն է, որ եթե դուք պատճենեք D2:D8 միջակայքը բանաձևերով թերթի մեկ այլ տեղ, ապա Microsoft Excel-ը ավտոմատ կերպով կուղղի այս բանաձևերի հղումները՝ դրանք տեղափոխելով նոր տեղ և կդադարեցնի հաշվել.

Պատճենել բանաձևերը առանց հղման հերթափոխի

Առաջադրանք՝ ընդգրկույթը պատճենեք բանաձևերով, որպեսզի բանաձևերը չփոխվեն և մնան նույնը՝ պահպանելով հաշվարկի արդյունքները։

Մեթոդ 1. Բացարձակ հղումներ

Ինչպես տեսնում եք նախորդ նկարից, Excel-ը տեղափոխում է միայն հարաբերական հղումները: $J$2 դեղին բջիջի բացարձակ ($ նշաններով) հղումը չի տեղափոխվել: Հետևաբար, բանաձևերի ճշգրիտ պատճենման համար կարող եք բոլոր բանաձևերի բոլոր հղումները ժամանակավորապես վերածել բացարձակի: Դուք պետք է ընտրեք յուրաքանչյուր բանաձև բանաձևի տողում և սեղմեք ստեղնը F4:
Պատճենել բանաձևերը առանց հղման հերթափոխի
Բջիջների մեծ քանակով այս տարբերակը, իհարկե, անհետանում է. դա չափազանց աշխատատար է:

Մեթոդ 2. Ժամանակավորապես անջատել բանաձևերը

Պատճենելիս բանաձևերի փոփոխությունը կանխելու համար դուք պետք է (ժամանակավորապես) համոզվեք, որ Excel-ը դադարում է դրանք դիտարկել որպես բանաձևեր: Դա կարելի է անել՝ փոխարինելով հավասարման նշանը (=) որևէ այլ նիշով, որը սովորաբար չի գտնվում բանաձևերում, օրինակ՝ հեշ նշանը (#) կամ կրկնօրինակման ժամանակի զույգ ամպերսանդերը (&&): Սրա համար:

  1. Ընտրեք տիրույթը բանաձևերով (մեր օրինակում D2:D8)
  2. Սեղմել Ctrl + H ստեղնաշարի կամ ներդիրի վրա Գլխավոր – Գտնել և ընտրել – Փոխարինել (Տուն — Գտնել և ընտրել — Փոխարինել)

    Պատճենել բանաձևերը առանց հղման հերթափոխի

  3. Երկխոսության վանդակում, որը երևում է, մուտքագրեք այն, ինչ մենք փնտրում ենք և ինչով փոխարինում ենք, և ներս Պարամետրեր (Ընտրանքներ) մի մոռացեք պարզաբանել Որոնման շրջանակը – Բանաձևեր. Մենք սեղմում ենք Փոխարինել բոլորը (Փոխարինել բոլորը).
  4. Պատճենեք ստացված միջակայքն ապաակտիվացված բանաձևերով ճիշտ տեղում.

    Պատճենել բանաձևերը առանց հղման հերթափոխի

  5. Փոխարինել # on = հետ՝ օգտագործելով նույն պատուհանը՝ ֆունկցիոնալությունը վերադարձնելով բանաձևերին:

Մեթոդ 3. Պատճենել Notepad-ի միջոցով

Այս մեթոդը շատ ավելի արագ և հեշտ է:

Սեղմեք ստեղնաշարի դյուրանցումը Ctrl+Ё կամ կոճակ Ցույց տալ բանաձևերը ականջակալ ֆորմուլա (Բանաձևեր — Ցույց տալ բանաձևերը), բանաձևի ստուգման ռեժիմը միացնելու համար. արդյունքների փոխարեն բջիջները կցուցադրեն այն բանաձևերը, որոնցով դրանք հաշվարկվում են.

Պատճենել բանաձևերը առանց հղման հերթափոխի

Պատճենեք մեր D2:D8 միջակայքը և տեղադրեք այն ստանդարտի մեջ տետր:

Պատճենել բանաձևերը առանց հղման հերթափոխի

Այժմ ընտրեք այն ամենը, ինչ տեղադրվել է (Ctrl + A), նորից պատճենեք այն clipboard-ում (Ctrl + C) և տեղադրեք այն թերթիկի վրա ձեզ անհրաժեշտ տեղում.

Պատճենել բանաձևերը առանց հղման հերթափոխի

Մնում է միայն սեղմել կոճակը Ցույց տալ բանաձևերը (Ցույց տալ բանաձևերը)Excel-ը նորմալ ռեժիմին վերադարձնելու համար:

Նշում. այս մեթոդը երբեմն ձախողվում է միաձուլված բջիջներով բարդ աղյուսակներում, բայց դեպքերի ճնշող մեծամասնությունում այն ​​լավ է աշխատում:

Մեթոդ 4. Մակրո

Եթե ​​դուք հաճախ ստիպված եք լինում բանաձևերի նման պատճենում անել՝ առանց հղումները տեղափոխելու, ապա դրա համար իմաստ ունի օգտագործել մակրո: Սեղմեք ստեղնաշարի դյուրանցումը Alt + F11 կամ կոճակ Visual Basic ականջակալ երեվակիչ (մշակող), ցանկի միջոցով տեղադրեք նոր մոդուլ Ներդիր – մոդուլ  և պատճենեք այս մակրոյի տեքստը այնտեղ.

Sub Copy_Formulas() Dim copyRange As Range, pasteRange As Range On Error Resume Next Set copyRange = Application.InputBox("Select cell with formulas to copy.", _ "Copy բանաձեւերը ճշգրիտ", Default:=Selection.Address, Type := 8) Եթե copyRange-ը ոչինչ չէ, ապա Դուրս եկեք Sub Set pasteRange = Application.InputBox («Այժմ ընտրեք տեղադրման տիրույթը»: & vbCrLf & vbCrLf & _ «Շրջանակը պետք է հավասար լինի բնօրինակի « & vbCrLf & _» տիրույթին: պատճենելու համար։" , "Պատճենել բանաձևերը ճշգրիտ", _ Լռելյայն:=Ընտրություն.Հասցե, Տիպ:=8) If pasteRange.Cells.Count <> copyRange.Cells.Count Այնուհետեւ MsgBox "Պատճենել և տեղադրել միջակայքերը տարբերվում են չափերով", vbExclamation, "Copy error" Դուրս եկեք ենթավերջից, եթե pasteRange-ը ոչինչ չէ, ապա դուրս եկեք Sub Else pasteRange.Formula = copyRange.Formula End If End Sub

Մակրո գործարկելու համար կարող եք օգտագործել կոճակը: Մակրո ականջակալ երեվակիչ (Մշակող — մակրո) կամ ստեղնաշարի դյուրանցում Alt + F8. Մակրոն գործարկելուց հետո այն կխնդրի ձեզ ընտրել տիրույթը բնօրինակ բանաձևերով և տեղադրման տիրույթով և ինքնաբերաբար պատճենելու է բանաձևերը.

Պատճենել բանաձևերը առանց հղման հերթափոխի

  • Բանաձևերի և արդյունքների միաժամանակ հարմար դիտում
  • Ինչու է անհրաժեշտ R1C1 հղման ոճը Excel-ի բանաձևերում
  • Ինչպես արագ գտնել բոլոր բջիջները բանաձևերով
  • Գործիք՝ ճշգրիտ բանաձեւերը PLEX հավելումից պատճենելու համար

 

Թողնել գրառում