Извлечение текста примечания в ячейку Excel
Здравствуйте. Сегодня мы рассмотрим возможность извлечения текста из заметки в ячейку Excel. Может возникнуть ситуация, когда вам предоставили файл, в котором нужная информация содержится не в самих ячейках, а в примечаниях к ним. Например, ваш менеджер оставил свои комментарии к прогнозу продаж в виде заметок, и вам нужно сравнить прогноз, сделанный вами и вашим менеджером. Конечно, вы можете вручную разбить все значения из примечаний в ячейках, но если таких случаев много, на помощь придут наши инструкции.
К сожалению, в Excel для этого нет встроенной формулы, но Visual Basic for Application нам поможет. В пошаговом руководстве я покажу вам, как создать пользовательскую функцию и как ее использовать. Итак, пункт первый:
1.Создание пользовательской функции
Его создание аналогично созданию макроса в VBA, поэтому следуйте знакомым шагам:
- Нажмите Alt + F11. Должен открыться редактор Microsoft Visual Basic для приложений
- Создайте новую модель. Для этого перейдите в меню «Вставка» и выберите пункт «Модуль.
- В открытой модели вставьте код пользовательской функции:
Get_Text_from_Comment Функция (rCell как диапазон) как строка
Dim sTxt As String
Application.Volatile True
В случае ошибки Продолжить Далее
sTxt = rCell.Comment.Text
Get_Text_from_Comment = Mid (sTxt, InStr (sTxt, «:») + 2)
Конец функции
2.Использование пользовательской функции
- Вернитесь к книге Excel.
- Выберите свободную ячейку и вызовите мастер функции вставки
- Перейдите в категорию User Defined, выберите функцию Get_Text_from_Comment и нажмите OK.
- Затем укажите ячейку, содержащую комментарий, и нажмите ОК.
Готовый. Мы получили текст из заметки в ячейке.
Важное примечание: если вы редактировали текст примечания, затем нажмите F9, чтобы обновить содержимое ячейки в соответствии с исправлением примечания.