დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

პრობლემა

დავუშვათ, გვაქვს ასეთი მარტივი ცხრილი, რომელშიც თანხები გამოითვლება ყოველთვიურად ორ ქალაქში და შემდეგ ჯამი გარდაიქმნება ევროდ ყვითელი უჯრედიდან J2 კურსით.

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

პრობლემა ის არის, რომ თუ თქვენ დააკოპირებთ დიაპაზონს D2:D8 ფორმულებით სხვაგან ფურცელზე, მაშინ Microsoft Excel ავტომატურად შეასწორებს ამ ფორმულების ბმულებს, გადაიტანს მათ ახალ ადგილას და შეწყვეტს დათვლას:

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

დავალება: დააკოპირეთ დიაპაზონი ფორმულებით ისე, რომ ფორმულები არ შეიცვალოს და დარჩეს იგივე, დარჩეს გამოთვლის შედეგები.

მეთოდი 1. აბსოლუტური ბმულები

როგორც წინა სურათიდან ხედავთ, Excel ცვლის მხოლოდ შედარებით ბმულებს. აბსოლუტური ($ ნიშნებით) მითითება ყვითელ უჯრედზე $J$2 არ გადავიდა. ამიტომ, ფორმულების ზუსტი კოპირებისთვის, შეგიძლიათ დროებით გადაიყვანოთ ყველა ფორმულის ყველა მითითება აბსოლუტურზე. თქვენ უნდა აირჩიოთ თითოეული ფორმულა ფორმულების ზოლში და დააჭირეთ ღილაკს F4:
დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე
უჯრედების დიდი რაოდენობით, ეს ვარიანტი, რა თქმა უნდა, ქრება - ის ძალიან შრომატევადია.

მეთოდი 2: ფორმულების დროებით გამორთვა

კოპირების დროს ფორმულების შეცვლის თავიდან ასაცილებლად, თქვენ (დროებით) უნდა დარწმუნდეთ, რომ Excel შეწყვეტს მათ ფორმულებად განხილვას. ეს შეიძლება გაკეთდეს ტოლობის ნიშნის (=) ჩანაცვლებით ნებისმიერი სხვა სიმბოლოთი, რომელიც ჩვეულებრივ არ გვხვდება ფორმულებში, როგორიცაა ჰეშის ნიშანი (#) ან ამპერსანდების წყვილი (&&) კოპირების დროისთვის. Ამისთვის:

  1. აირჩიეთ დიაპაზონი ფორმულებით (ჩვენს მაგალითში D2:D8)
  2. დაწკაპეთ Ctrl + H კლავიატურაზე ან ჩანართზე მთავარი – იპოვეთ და აირჩიეთ – ჩანაცვლება (მთავარი — იპოვეთ და აირჩიეთ — ჩანაცვლება)

    დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

  3. დიალოგურ ფანჯარაში, რომელიც გამოჩნდება, შეიყვანეთ რას ვეძებთ და რითი შევცვალოთ და პარამეტრები (Პარამეტრები) არ დაგავიწყდეთ გარკვევა ძიების სფერო – ფორმულები. ვაჭერთ შეცვალეთ ყველა (შეცვალეთ ყველა).
  4. დააკოპირეთ მიღებული დიაპაზონი გამორთული ფორმულებით სწორ ადგილას:

    დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

  5. Replace # on = დაბრუნდით იმავე ფანჯრის გამოყენებით, დააბრუნეთ ფუნქციები ფორმულებში.

მეთოდი 3: დააკოპირეთ Notepad-ით

ეს მეთოდი ბევრად უფრო სწრაფი და მარტივია.

დააჭირეთ კლავიატურის მალსახმობს Ctrl+Ё ან ღილაკი ფორმულების ჩვენება tab formula (ფორმულები - ფორმულების ჩვენება), ფორმულის შემოწმების რეჟიმის ჩართვა - შედეგების ნაცვლად, უჯრედები აჩვენებს ფორმულებს, რომლითაც ისინი გამოითვლება:

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

დააკოპირეთ ჩვენი დიაპაზონი D2:D8 და ჩასვით სტანდარტში Notebook:

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

ახლა აირჩიეთ ყველაფერი ჩასმული (Ctrl + A), დააკოპირეთ ისევ ბუფერში (Ctrl + C) და ჩასვით ფურცელზე თქვენთვის საჭირო ადგილას:

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

რჩება მხოლოდ ღილაკის დაჭერა ფორმულების ჩვენება (ფორმულების ჩვენება)Excel ნორმალურ რეჟიმში დასაბრუნებლად.

შენიშვნა: ეს მეთოდი ზოგჯერ ვერ ხერხდება რთულ ცხრილებზე გაერთიანებული უჯრედებით, მაგრამ უმეტეს შემთხვევაში ის კარგად მუშაობს.

მეთოდი 4. მაკრო

თუ ხშირად გიწევთ ფორმულების ასეთი კოპირების გაკეთება მითითებების გადაადგილების გარეშე, მაშინ აზრი აქვს ამისთვის მაკროს გამოყენებას. დააჭირეთ კლავიატურის მალსახმობს Alt + F11 ან ღილაკი Visual Basic tab დეველოპერი (დეველოპერი), ჩადეთ ახალი მოდული მენიუში ჩასმა – მოდული  და დააკოპირეთ ამ მაკროს ტექსტი იქ:

Sub Copy_Formulas() Dim copyRange როგორც დიაპაზონი, pasteRange როგორც დიაპაზონი შეცდომის შემთხვევაში Resume შემდეგი Set copyRange = Application.InputBox("აირჩიე უჯრედები ფორმულებით დასაკოპირებლად.", _ "დააკოპირე ფორმულები ზუსტად", ნაგულისხმევი:=Selection.Address, Type := 8) თუ copyRange არაფერია, მაშინ გამოდით Sub Set pasteRange = Application.InputBox("ახლა აირჩიეთ ჩასმის დიაპაზონი." & vbCrLf & vbCrLf & _ "დიაპაზონი უნდა იყოს ზომით ორიგინალური " & vbCrLf & _ " უჯრედების დიაპაზონის ტოლი დააკოპირეთ." , "ზუსტად დააკოპირეთ ფორმულები", _ ნაგულისხმევი:=Selection.Address, Type:=8) If pasteRange.Cells.Count <> copyRange.Cells.Count შემდეგ MsgBox "Copy and Paste ranges vary in size!", vbExclamation, "Copy error" გამოდით Sub End თუ PasteRange არაფერია, შემდეგ გადით Sub Else pasteRange.Formula = copyRange.Formula End თუ End Sub

მაკროს გასაშვებად შეგიძლიათ გამოიყენოთ ღილაკი. Macros tab დეველოპერი (დეველოპერი - მაკრო) ან კლავიატურის მალსახმობი Alt + F8. მაკროს გაშვების შემდეგ ის მოგთხოვთ აირჩიოთ დიაპაზონი ორიგინალური ფორმულებით და ჩასმის დიაპაზონით და ავტომატურად დააკოპირებთ ფორმულებს:

დააკოპირეთ ფორმულები ბმულის ცვლის გარეშე

  • ფორმულებისა და შედეგების ერთდროულად მოსახერხებელი ნახვა
  • რატომ არის საჭირო R1C1 მითითების სტილი Excel ფორმულებში
  • როგორ სწრაფად მოვძებნოთ ყველა უჯრედი ფორმულებით
  • ინსტრუმენტი ზუსტი ფორმულების კოპირებისთვის PLEX დანამატიდან

 

დატოვე პასუხი