Ако искате групово да отворите множество хипервръзки в Excel, можете да се обърнете към тази статия. Тук ще ви представим 3 удобни метода. Всеки от тях има своите плюсове и минуси. Можете да изберете всеки според вашите нужди.
В някои случаи, когато преглеждате файл на Excel, който се състои от много хипервръзки, може да искате да отворите партида на няколко хипервръзки. Ако има само три или повече връзки, които трябва да бъдат отворени, можете просто да използвате метода 1 по-долу. И все пак, ако искате групово да отворите всички връзки в желаните диапазони, вместо това можете да използвате Метод 2. Разбира се, понякога може да искате да отворите групово всички връзки, разпръснати из цялата работна книга. След това можете да използвате последния начин.
Метод 1: Отворете ръчно хипервръзки една по една
За да отворите хипервръзка в клетка ръчно, можете директно да кликнете върху клетката. Следователно, ако няма твърде много хипервръзки за отваряне, можете да щракнете върху клетките, за да отворите хипервръзките една по една.
Метод 2: Партидни отворени хипервръзки в избрани диапазони
И все пак понякога искате групово да отворите всички хипервръзки в избраните диапазони. В този случай всъщност можете да използвате следния VBA код.
- Първо, задействайте редактора на VBA в текущия файл на Excel според „Как да стартирате VBA код във вашия Excel".
- След това поставете следния код в модул или проект.
Sub BatchOpenHyperLinks_SelectedRanges()
Dim objSelectedRange As Excel.Range
Dim objHyperlink As Excel.Hyperlink
'Get selected ranges
Set objSelectedRange = Excel.Application.Selection
For Each objHyperlink In objSelectedRange.Hyperlinks
objHyperlink.Follow
Next
End Sub
- След това добавете този макрос към лентата с инструменти за бърз достъп или лентата.
- И накрая, можете да изберете желаните диапазони и да щракнете върху бутона за макрос.
- Веднага всички хипервръзки в избраните диапазони ще се отворят в браузъра по подразбиране.
Метод 3: Партидно отваряне на всички хипервръзки в работна книга
Понякога може да искате да отворите всички хипервръзки в работна книга, без значение в кой работен лист. В тази ситуация вместо това можете да използвате VBA кода.
- Отначало поставете следния код в модул или проект в редактора на VBA.
Sub BatchOpenHyperLinks_Workbook()
Dim objWorksheet As Excel.Worksheet
Dim objSelectedRange As Excel.Range
Dim objHyperlink As Excel.Hyperlink
'Process each worksheet
For Each objWorksheet In ThisWorkbook.Sheets
For Each objHyperlink In objWorksheet.Hyperlinks
objHyperlink.Follow
Next
Next
End Sub
- След това натиснете „F5“, за да стартирате този макрос точно сега.
- Веднага ще се отворят всички хипервръзки във всеки работен лист.
Поправяне на проблеми с Excel
Подобно на документите на Word, работните книги на Excel са много уязвими. Това означава, че файловете в Excel могат да бъдат повредени поради множество фактори, включително вирусна инфекция, човешки грешки и сривове в Excel и т.н. Следователно трябва да подготвите мощен инструмент за коригиране на Excel, като например DataNumen Excel Repair, който може възстанови Excel данни без пот.
Въведение на автора:
Шърли Джанг е експерт по възстановяване на данни в DataNumen, Inc., която е световен лидер в технологиите за възстановяване на данни, включително mdf възстановяване и outlook софтуерни продукти за ремонт. За повече информация посетете WWW.datanumen.com




