Прескочи на основното съдържание

Как да извлека име на домейн от URL в Excel?

Автор: Xiaoyang Последна промяна: 2014-09-17

Ако винаги имате работа с много URL адреси в работната си книга, понякога може да искате да извлечете само името на домейна от всяка уеб страница. В Excel как можете бързо да получите имената на домейни от URL адреси?

Извличане на име на домейн от URL с формула

Извличане на име на домейн от URL с дефинирана от потребителя функция


стрелка син десен балон Извличане на име на домейн от URL с формула

Следната дълга формула може да ви помогне да върнете името на домейна от уеб страницата, както ви е необходимо. Моля, направете следното:

1. В празна клетка, която до клетката на вашата уеб страница, въведете следната формула, в този пример ще напиша формулата в клетка B2: =IF(ISNUMBER(FIND("www.",A2)),MID(A2,FIND("www.",A2)+4,IF(ISNUMBER(FIND("/",A2,9)),FIND("/",A2,9),LEN(A2)+1)-FIND("www.",A2)-4),MID(A2,FIND("//",A2)+2,IF(ISNUMBER(FIND("/",A2,9)),FIND("/",A2,9),LEN(A2)+1)-FIND("//",A2)-2)).

doc-extract-domain-url-1

Забележка: в горната формула, A2 показва клетката, която съдържа уеб страницата, от която искате да получите името на домейна, можете да го промените според нуждите си.

2. След това натиснете Въведете и изберете клетка B2, плъзнете манипулатора за запълване надолу до диапазона, към който искате да приложите тази формула, и всички имена на домейни са извлечени от всеки URL. Вижте екранна снимка:

doc-extract-domain-url-1


стрелка син десен балон Извличане на име на домейн от URL с дефинирана от потребителя функция

Ако се интересувате от VBA код, можете да създадете a Потребителска функция за извличане на името на домейна от URL адреси.

1. Задръжте натиснат ALT + F11 за да отворите Прозорец на Microsoft Visual Basic за приложения.

2. Щракнете Поставете > Модулии поставете следния код в Прозорец на модула.

VBA код: извлечете име на домейн от URL

Function ExtractDomain(ByVal URL As String) As String
'Update 20140904
    If InStr(URL, "//") Then
        URL = Mid(URL, InStr(URL, "//") + 2)
    End If
    If Left(URL, 4) Like "[Ww][Ww][Ww0-9]." Then
        URL = Mid(URL, 5)
    End If
    ExtractDomain = Split(URL, "/")(0)
End Function

3. След това запазете и затворете кода, върнете се в работния лист и въведете тази формула =Извличане на домейн(A2) в празна клетка до уеб страницата, вижте екранната снимка:

doc-extract-domain-url-1

4. И след това натиснете Въведете изберете клетка B2 и плъзнете манипулатора за запълване надолу до клетките, които искате да съдържат тази формула, и всички имена на домейни ще бъдат извлечени от всяка клетка на уеб страница.


Още по темата:

Как да извлека домейни от множество имейл адреси в Excel?

Как бързо да извлека имейл адрес от текстов низ?

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This formula worked for all my URLs except for ones with another URL in the query string. Would love a fix for that, but otherwise, it's great!
This comment was minimized by the moderator on the site
Thank you very much for making this formula available. I was able to use it. Thank you.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations