Предыстория этой статьи такова: преподаватель, имеющий хорошие отношения с университетом, спросил меня, могу ли я загрузить файлы PDF, соответствующие 1000 URL-адресам гиперссылок в Excel. Хотя можно и вручную нажать, чтобы скачать по одному, но это слишком трудоемко и отнимает много времени. Я вспомнил свой предыдущий опыт с рептилиями, проанализировал целесообразность для учителя, а затем применил его на практике.
Неожиданно вначале я столкнулся с трудностями, а гиперссылки в Excel при чтении на Python отображались прямо на китайском языке. Поэтому первым шагом является сортировка URL-адресов, соответствующих гиперссылкам, а затем использование Python для сканирования PDF-файла соответствующих URL-адресов. В этой статье рассказывается о первом этапе пакетной загрузки файлов сканером и преобразовании гиперссылок в соответствующие URL-адреса из Excel. В следующей статье представлен код пакетных сканеров для загрузки файлов PDF.
Каталог статей
1. Желаемый эффект
Давайте сначала посмотрим на желаемый эффект: первый столбец — это исходная гиперссылка, а второй столбец — соответствующий URL-адрес, который мы хотим получить.
2. Три способа конвертировать гиперссылки в соответствующие URL-адреса
В Интернете есть много способов добиться конвертации гиперссылок. Я поделюсь 3 методами, которые я пробовал. Первые 2 метода не увенчались успехом, а последний оказался успешным.
1 Способ 1: преобразование щелчка мыши по одной гиперссылке
Первый способ — выбрать ячейку, гиперссылку которой вы хотите преобразовать в соответствующий URL-адрес, затем дважды щелкнуть левой кнопкой мыши и нажать Enter. Содержимое ячейки будет автоматически преобразовано в URL-адрес. Этот метод подходит только для преобразования небольшого количества гиперссылок, и я не смог этого сделать.
2 Способ второй: автоформат
Второй способ — нажать «Файл» — «Дополнительно» — «Параметры» — «Правда» — «Параметры автозамены» — «Автоматически форматировать при вводе», выбрать Интернет- и сетевые пути для замены гиперссылками, а затем нажать «ОК». Я попробовал второй метод, но он все равно не удался...
3 Способ 3: преобразование пользовательских функций VBA
Третий метод — настроить функцию VBA для преобразования.
[1] Включите [Инструменты разработки], конкретные шаги следующие:
Щелкните левой кнопкой мыши вкладку [Файл] в строке меню, затем щелкните левой кнопкой мыши [Еще], затем щелкните левой кнопкой мыши [Параметры]. Щелкните левой кнопкой мыши параметр [Настроить ленту] в [Параметры Excel], затем установите небольшой флажок перед [Инструменты разработки], а затем щелкните левой кнопкой мыши кнопку [ОК], и появится еще один пункт. Выберите [Инструменты разработки].
Шаг 1: Щелкните левой кнопкой мыши вкладку [Файл] в строке меню, затем щелкните левой кнопкой мыши [Еще], а затем щелкните левой кнопкой мыши [Параметры].
Шаг 2: Щелкните левой кнопкой мыши параметр [Пользовательская лента] в [Параметры Excel], затем установите небольшой флажок перед [Инструменты разработки], а затем щелкните левой кнопкой мыши кнопку [ОК].
Шаг 3. Проверьте, есть ли в строке меню опция [Инструменты разработки].
[2] Настройте функцию VBA GetAdrs.
Сначала щелкните левой кнопкой мыши параметр [Инструменты разработки], а затем щелкните левой кнопкой мыши [Редактор Visual Basic] на ленте [Код]. Щелкните правой кнопкой мыши окно [Проводник проекта], переместите указатель мыши на параметр [Вставить], щелкните левой кнопкой мыши параметр [Модуль] во вторичном меню, вставьте [Модуль 1] и скопируйте и вставьте следующий код в [ Module] 1] после окна кода и, наконец, закройте редактор Visual Basic.
Шаг 1. Щелкните левой кнопкой мыши параметр [Инструменты разработки], а затем щелкните левой кнопкой мыши [Редактор Visual Basic] на ленте [Код].
Шаг 2. Щелкните правой кнопкой мыши окно [Проводник проекта], переместите указатель мыши на параметр [Вставить], щелкните левой кнопкой мыши параметр [Модуль] во вторичном меню, вставьте [Модуль 1] и скопируйте и вставьте следующий код в После открытия окна кода [Модуля 1] наконец закройте редактор Visual Basic.
Function GetAdrs(Rng)
Application.Volatile True
With Rng.Hyperlinks(1)
GetAdrs = IIf(.Address = "", .SubAddress, .Address)
End With
End Function
[3] Получите URL-адрес с помощью функции GetAdrs.
Сначала щелкните левой кнопкой мыши, чтобы выбрать ячейку [B2], введите пользовательскую функцию [=GetAdrs(A2)] и нажмите Enter для расчета. Переместите указатель мыши в правый нижний угол ячейки [B2], когда указатель мыши превратится в знак [+], нажмите и удерживайте левую кнопку мыши и перетащите вниз, чтобы заполнить формулу.
До сих пор было объяснено быстрое преобразование гиперссылок в Excel в URL-адреса, и заинтересованные студенты могут реализовать изображения самостоятельно.
[ Ограниченный по времени бесплатный доступ к группе ] Группа предоставляет информацию о наборе персонала, связанную с изучением Python, игрой с Python, моделированием контроля рисков, искусственным интеллектом и анализом данных, отличными статьями, обучающими видеороликами, а также может обмениваться соответствующими проблемами, возникающими при обучении и работа. Друзья, которым это нужно, могут добавить идентификатор WeChat 19967879837 и добавить время, чтобы отметить группы, к которым они хотят присоединиться, например, по моделированию контроля рисков.
Ссылки
https://baike.baidu.com/
https://zhuanlan.zhihu.com/ Рейтинг школ «Наука о данных и технологии больших данных» — Чжиху (zhihu.com)
Вас может заинтересовать:
Рисование Пикачу на PythonИспользование
Python для рисования облаков словРаспознавание лиц Python —
в моих глазах вы единственный Коллекция исходников романтического признания (любовь, роза, фотостена, признание под звездами)