როდესაც Excel-ის სამუშაო წიგნს აქვს მრავალი სამუშაო ფურცელი, მათზე სწრაფად წვდომის მიზნით, შეიძლება დაგჭირდეთ შექმნათ ჰიპერბმულების სია ყველა სამუშაო ფურცელზე. ამ სტატიაში ჩვენ გაგიზიარებთ 3 მეთოდს.
თუ თქვენ გაქვთ Excel-ის სამუშაო წიგნი, რომელიც შეიცავს უამრავ სამუშაო ფურცელს, შეიძლება გაგიჭირდეთ თქვენთვის სასურველი სამუშაო ფურცლის პოვნა და წვდომა. ამ შემთხვევაში, თქვენ შეგიძლიათ შექმნათ ჰიპერბმულების სია ყველა სამუშაო ფურცელზე, რომელიც საშუალებას მოგცემთ გადახვიდეთ კონკრეტულ სამუშაო ფურცელზე უბრალოდ ჰიპერბმულზე დაწკაპუნებით. საკმაოდ მოსახერხებელია. ამრიგად, აქ წარმოგიდგენთ 3 გზას ასეთი სიის შესაქმნელად.
მეთოდი 1: ხელით შექმნა
- დასაწყებად, გახსენით კონკრეტული Excel-ის სამუშაო წიგნი.
- შემდეგ ჩადეთ ახალი ფურცელი პირველი სამუშაო ფურცლის წინ.

- შემდეგი, დააწკაპუნეთ მაუსის მარჯვენა ღილაკით უჯრედზე A1 და აირჩიეთ "ჰიპერბმული" კონტექსტური მენიუდან.
- მოგვიანებით, "ჰიპერბმულის ჩასმა" ფანჯარაში აირჩიეთ "განთავსება ამ დოკუმენტში" მარცხენა მხარეს.
- ამის შემდეგ, სიაში „ან აირჩიეთ ადგილი ამ დოკუმენტში“, აირჩიეთ პირველი ფურცელი, გარდა მიმდინარე ახალი ფურცლისა.
- შემდეგ შეცვალეთ „ტექსტი საჩვენებლად“ ფურცლის სახელზე.
- ბოლოს დააწკაპუნეთ „OK“ ჰიპერბმულის ჩასართავად.
- ახლა თქვენ შეგიძლიათ სათითაოდ ჩასვათ ჰიპერბმულები დანარჩენ ფურცლებზე.
მეთოდი 2: შექმნა ფორმულის საშუალებით
- პირველ რიგში, შექმენით ახალი ფურცელი.
- შემდეგ, ჩამოთვალეთ ყველა სამუშაო ფურცლის სახელი მე-2 მეთოდის მიხედვით პოსტში „3 სწრაფი გზა Excel-ის სამუშაო წიგნში ყველა სამუშაო ფურცლის სახელების სიის მისაღებად".
- მოგვიანებით ჩადეთ ქვემოთ მოცემული ფორმულა C1 უჯრედში.
=HYPERLINK("#'"&B1&"'!A1",B1)
- საბოლოო ჯამში, გადაიტანეთ ფუნქცია ქვემოთ, რათა მიიღოთ ჰიპერბმულები სხვა ფურცლებზე.
მეთოდი 3: შექმნა VBA-ით
- თავიდანვე გაუშვით Excel VBA რედაქტორი "როგორ გაუშვათ VBA კოდი თქვენს Excel-ში".
- შემდეგ ჩადეთ ქვემოთ მოცემული კოდი პროექტში ან მოდულში.
Sub CreateMenuOfHyperlinksToAllWorksheets()
Dim objSheet As Worksheet
ActiveWorkbook.Sheets.Add(Before:=Worksheets(1)).Name = "Sheet Menu"
Range("A1").Select
For Each objSheet In ActiveWorkbook.Worksheets
If ActiveSheet.Name <> objSheet.Name Then
ActiveCell.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= "'" & objSheet.Name & "'" & "!A1", TextToDisplay:=objSheet.Name
ActiveCell.Offset(1, 0).Select
ActiveCell.EntireColumn.AutoFit
End If
Next objSheet
With ActiveSheet
.Rows(1).Insert
.Cells(1, 1) = "MENU"
.Cells(1, 1).Font.Bold = True
.Cells(1, 1).Font.Size = 14
.Cells(1, 1).Columns.AutoFit
End With
End Sub
- შემდეგი, დააჭირეთ "F5" ამ მაკროს გასაშვებად.
- ერთბაშად ნახავთ ახალ სამუშაო ფურცელს, რომელიც შეიცავს ყველა ჰიპერბმულს ყველა სამუშაო ფურცელზე, როგორიცაა შემდეგი ეკრანის სურათი.
შედარება
| უპირატესობები | ნაკლოვანებები | |
| მეთოდი 1 | მარტივი მუშაობას | ძალიან დამღლელი, თუ ძალიან ბევრი სამუშაო ფურცელია |
| მეთოდი 2 | უფრო სწრაფი ვიდრე მეთოდი 1 მრავალი სამუშაო ფურცლის შემთხვევაში | ითხოვს წინასწარ ჩამოთვალოთ ნომრები და ფურცლების სახელები |
| მეთოდი 3 | ბევრად უფრო სწრაფი და ეფექტური ვიდრე ზემოთ მოცემული 2 მეთოდი | ფრთხილად იყავით გარე მაკროებთან, რომლებიც შეიძლება მავნე იყოს |
აღადგინეთ დაზიანებული Excel ფაილები
Excel შეიძლება დროდადრო ავარიული იყოს, რამაც შეიძლება გამოიწვიოს Excel ფაილის კორუფცია. აქედან გამომდინარე, თქვენ უნდა იყოთ მიჩვეული ფაილის შენახვას ყოველ ჯერზე Excel ფაილის შეცვლისას. წინააღმდეგ შემთხვევაში, თუ Excel ავარიულია, მაგრამ თქვენ არ გაქვთ შენახული გახსნილი ფაილი, თქვენ უნდა მიმართოთ xls შესწორება პროგრამული უზრუნველყოფა, როგორიცაა DataNumen Excel Repair, დაზიანებული Excel მონაცემების დასაბრუნებლად.
ავტორი შესავალი:
შირლი ჟანგი არის მონაცემთა აღდგენის ექსპერტი DataNumen, Inc., რომელიც მსოფლიო ლიდერია მონაცემთა აღდგენის ტექნოლოგიებში, მათ შორის mdf აღდგენა და Outlook სარემონტო პროგრამული პროდუქტები. დამატებითი ინფორმაციისთვის ეწვიეთ www.datanumen. ერთად








