Как в excel сделать всплывающее окно с картинкой

9

Добавить всплывающее изображение в ячейку в Excel

Несколько шоу назад, когда я показывал, как отслеживать предметы коллекционирования в Excel, я показал рабочий лист, на котором некоторые ячейки имели всплывающее изображение. В сегодняшнем шоу я научу вас добавлять всплывающие изображения в вашу электронную таблицу.

Чтобы делать всплывающие картинки, вам нужно использовать Комментарии к ячейкам. В Excel 2000 и ранее они назывались заметками ячеек. Комментарий к ячейке — это всплывающее окно, которое появляется при наведении курсора на ячейку с красным треугольником. Microsoft предполагала, что кто-то может объяснить ввод данных на листе комментарием к ячейке. На изображении ниже кто-то объясняет, почему они использовали определенное число в своем прогнозе.

Чтобы добавить комментарий к любой ячейке, выберите в меню Вставить — Комментарий. Введите текст вашего комментария.

По умолчанию комментарий желтый. Если щелкнуть ячейку правой кнопкой мыши и выбрать «Показать комментарий», можно легко изменить формат комментария. Ctrl + Щелкните комментарий, затем щелкните правой кнопкой мыши и выберите Формат комментария. Вы можете выбрать другой цвет заливки для комментария.

Я видел несколько отличных таблиц, в которых люди выделяли комментарии разными цветами, и они всегда показывались. Это обеспечивает постоянный набор инструкций для людей, заполняющих вашу электронную таблицу.

Вот трюк с созданием всплывающего изображения. Сначала создайте совершенно пустой комментарий. Используйте Insert — Comment, а затем backspace, чтобы избавиться от имени, которое там есть.

Затем щелкните ячейку правой кнопкой мыши и выберите Показать комментарий. Ctrl + Щелкните комментарий. Щелкните комментарий правой кнопкой мыши и выберите «Форматировать комментарий». На вкладке «Цвета и линии» перейдите к раскрывающемуся списку цветов и выберите «Эффекты заливки» в нижней части диалогового окна.

В диалоговом окне «Эффекты заливки» выберите вкладку «Изображение». Выберите «Вставить изображение» и найдите свое изображение.

Дважды нажмите OK, чтобы закрыть диалоговые окна. Чтобы изменить размер комментария, возьмите маркер заполнения.

Бонус: есть возможность изменить форму комментария. Выделив комментарий, используйте раскрывающийся список «Рисование» в левой части панели инструментов рисования. Выберите Draw — Change AutoShape — и выберите любую форму.

Наконец, щелкните правой кнопкой мыши исходную ячейку и выберите «Скрыть комментарий». В ячейке будет красный треугольник. Наведите указатель мыши на эту ячейку, и изображение появится.

У вас могут возникнуть проблемы при попытке отсортировать ячейки с комментариями к изображениям.

Как в excel сделать всплывающее окно

​ параметры, и список​2​ цвета)​ показывать в выпадающем​. Из выпадающего списка​Sergei A​ Private Sub Workbook_Activate()​: Апострофф, дата следующего​If Len(oldval) <>​ диапазоном (с помощью​ это сделать, уже​ ячейке нескольких значений.​Как видим, список создан.​ «Файл» программы Excel,​ Microsoft Excel в​

​: да смотрел, и​: Как Вы думаете​ готов к использованию.​Как сделать выпадающий​ForeColor​ списке. По умолчанию​Тип данных (Allow)​

​:​rinat_n​ пересмотра. Данный файл​ 0 And oldval​ «Диспетчера имен»). Помним,​ известно. Источник –​ Когда пользователь щелкает​Теперь, чтобы и нижние​ а затем кликаем​ таблицах с повторяющимися​ там он выдает​ поступать с выходными?​

​В Ворде​ список в экселе​и​ — 8, но​выберите вариант​AchilleS​: Апострофф, при проверки​ ответственный немножко неправильно​

​ <> newVal Then​ что имя не​ имя диапазона: =деревья.​ по стрелочке справа,​ ячейки приобрели те​ по надписи «Параметры».​ данными, очень удобно​ только которые родяться,​ Предупреждать заранее, или​Открываешь панель «Элементы​В нужном месте​BackColor​

​ можно больше, чего​Список (List)​: Спасибо! И сорри,​ скрипта выходит ошибка:​ сделал, я вот​Target = Target​ может содержать пробелов​Снимаем галочки на вкладках​ появляется определенный перечень.​

Создание выпадающего списка с помощью инструментов разработчика

​ же свойства, как​В открывшемся окне переходим​ использовать выпадающий список.​ а ели например​ потом, с прошедшим​ управления» (правой кнопкой​ листа выберите ячейку​- цвет текста​ не позволяет предыдущий​и введите в​ что так) По​ Compile error: Expected​ хотел заняться пересмотром.​ & «,» &​

​ и знаков препинания.​ «Сообщение для ввода»,​ Можно выбрать конкретное.​ и в предыдущий​ в подраздел «Настройка​ С его помощью​

​ день рождение 25.09.1990​ поздравлять будете?​ мыши на панели​ для задания выпадающего​ и фона, соответственно​ способ.​ строчку​ форуму поискал -​ End Sub​ Вообще возможно сделать​ newVal​Создадим первый выпадающий список,​ «Сообщение об ошибке».​Очень удобный инструмент Excel​

​ раз, выделяем верхние​ ленты», и ставим​ можно просто выбирать​ он не выдает​А пример всёж​

​ инструментов) выбираешь ComboBox,​ списка. В меню​Большим и жирным плюсом​После нажатия на​

​Источник (Source)​ не нашел. А​StoTisteg​ всплывающее окошко об​Else​ куда войдут названия​ Если этого не​

​ для проверки введенных​ ячейки, и при​ флажок напротив значения​ нужные параметры из​Юрий М​

​ сообразите. ​ вставляешь в ячейку​

​ откройте пункты «Данные»​ этого способа является​ОК​знак равенства и​ помнил, что что-то​: Ну так добавьте​ окончании действия инструкций?​

Связанные списки

​Target = newVal​ диапазонов.​ сделать, Excel не​ данных. Повысить комфорт​ нажатой клавише мышки​ «Разработчик». Жмем на​ сформированного меню. Давайте​: С чего Вы​Юрий М​ таблицы. В режиме​ — «Проверка». После​ возможность быстрого перехода​списком можно пользоваться.​ имя диапазона (т.е.​ подобное видел.​ последнюю строку End​Апострофф​

​End If​Когда поставили курсор в​ позволит нам вводить​ работы с данными​ «протаскиваем» вниз.​ кнопку «OK».​

​ выясним, как сделать​ взяли? У Сотрудника​: Не создавайте дубликатов​ конструктора (кнопка с​ чего перейдите в​

​ к нужному элементу​Чтобы вместо порядкового номера​=Товары​Кос​ Sub. И вообще​

​: Код в модуль​If Len(newVal) =​ поле «Источник», переходим​ новые значения.​ позволяют возможности выпадающих​Всё, таблица создана.​После этого, на ленте​

​ раскрывающийся список различными​

​ 17 поставил дату​ тем!​ треугольником и карандашом)​ новом окне во​ в списке при​ элемента выводилось его​).​: Здравствуйте! Я так​

​ скопируйте код полностью,​

​ ЭтаКнига, и будете​ 0 Then Target.ClearContents​ на лист и​Вызываем редактор Visual Basic.​ списков: подстановка данных,​Мы разобрались, как сделать​ появляется вкладка с​ способами.​ 22.11.1990 — работает.​Ваших данных нет,​ тебе также доступны​ вкладку «Параметры» и​ вводе первых букв​

​ название можно дополнительно​

Отображение и скрытие всплывающих подсказок

​Нажмите​ сделал. Всё работает.​ а не только​ получать «всплывающие предупреждения»​Application.EnableEvents = True​ выделяем попеременно нужные​ Для этого щелкаем​

​ отображение данных другого​ выпадающий список в​ названием «Разработчик», куда​Скачать последнюю версию​KuklP​ так что смотрите​ свойства и исходный​

В этой статье

​ в открывшемся поле​ с клавиатуры(!), чего​

Отображение и скрытие всплывающих подсказок

​ОК​​ Единственный минус(лично для​​ то, что видите,​

​ при каждом открытии.​​End If​​ ячейки.​

​ правой кнопкой мыши​​ листа или файла,​​ Экселе. В программе​

​ мы и перемещаемся.​​ Excel​​: Гляньте и мой.​​ на моих и​​ текст (двойной клик​

​ «Тип данных» установите​​ нет у всех​ИНДЕКС (INDEX)​.​ меня),это то .что​ End Sub там​Private Sub Workbook_Open()​End Sub​Теперь создадим второй раскрывающийся​ по названию листа​ наличие функции поиска​ можно создавать, как​

​ Чертим в Microsoft​Самым удобным, и одновременно​​ На работе как-то​ дорабатывайте сами.​ левой клавишей мыши​ строку «Список». При​ остальных способов. Приятным​, которая умеет выводить​

​Все! Наслаждайтесь!​​ сначала частично открывется​ есть.​Dim ws As​Не забываем менять диапазоны​ список. В нем​ и переходим по​

Видео о всплывающих подсказках

​ простые выпадающие списки,​​ Excel список, который​ наиболее функциональным способом​ маялся.​хз​ на ComboBox сразу​ этом в том​

​ моментом, также, является​

Выпадающий список в Excel с помощью инструментов или макросов

​ содержимое нужной по​Важный нюанс. В качестве​ страница Эксель ,а​Апострофф​ Worksheet, rn As​ на «свои». Списки​ должны отражаться те​

​ вкладке «Исходный текст».​Путь: меню «Данные» -​ так и зависимые.​ должен стать выпадающим​ создания выпадающего списка,​Юрий М​: спасибо юрий м​ создает процедурку ComboBox1_Change()​ же окне появится​ возможность настройки визуального​

Создание раскрывающегося списка

​ счету ячейки из​ источника данных для​ после всплывающее окно.​:​ Range, r As​

​ создаем классическим способом.​ слова, которые соответствуют​ Либо одновременно нажимаем​ инструмент «Проверка данных»​

1. ​ При этом, можно​ меню. Затем, кликаем​
2. ​ является метод, основанный​: Что-то Вы путаете:​ это практически что​ — действия при​
3. ​ поле «Источник». Введите​ представления (цветов, шрифтов​ диапазона:​ списка может выступать​

​ А можно сделать,чтоб​rinat_n​

Выпадающий список в Excel с подстановкой данных

​ А всю остальную​ выбранному в первом​ клавиши Alt +​ — вкладка «Параметры».​ использовать различные методы​ на Ленте на​ на построении отдельного​ в списке нет​

1. ​ надо​ изменении содержимого). Соответственно​ в него символ​ и т.д.)​
2. ​Этот способ частично напоминает​ и динамический именованный​ наоборот? При запуске​, так Вы или​Dim NG As​ работу будут делать​ списке названию. Если​ F11. Копируем код​ Тип данных –​ создания. Выбор зависит​ значок «Вставить», и​ списка данных.​ НИ ОДНОГО дня​
3. ​Hugo​ перед использованием, ComboBox​ «=» и имя​При использовании этого способа,​ предыдущий. Основное отличие​ диапазон, например прайс-лист.​ *.xlsx ,чтобы сначала​ код полностью скопируйте,​

​ Long, NR As​ макросы.​ «Деревья», то «граб»,​

​ (только вставьте свои​ «Список».​

​ от конкретного предназначения​

​ среди появившихся элементов​Прежде всего, делаем таблицу-заготовку,​ рождения в 2010​

​: Т.е. это будут​ необходимо заполнить значениями,​ выделенного диапазона, которое​ также возможно указывать​ в том, что​ Тогда при дописывании​ всплывало окно, а​

1. ​ или допишите этот​ Long​На вкладке «Разработчик» находим​ «дуб» и т.д.​ параметры).Private Sub Worksheet_Change(ByVal​
2. ​Ввести значения, из которых​ списка, целей его​ в группе «Элемент​ где собираемся использовать​ году. О каких​
3. ​ извещения о ещё​ грубо говоря опиши​ было задано ячейкам​ в качестве​ на лист добавляется​ новых товаров к​ потом уже открывалась​
4. ​ END SUB, раз​Dim D As​ инструмент «Вставить» –​ Вводим в поле​ Target As Range)​ будет складываться выпадающий​ создания, области применения,​ ActiveX» выбираем «Поле​ выпадающее меню, а​ «родяться» Вы говорите?​ не родившихся клиентах?​ процедуру заполнения (макрос)​ с данными. Для​ListFillRange​ не элемент управления,​ прайсу, они будут​ книга?!​ Бэйсику это нужно.​ Date​ «ActiveX». Здесь нам​ «Источник» функцию вида​ Dim lReply As​ список, можно разными​ и т.д.​ со списком».​ также делаем отдельным​openid.mail.ru/mail/vlad3622340​ :)​ например:​ применения параметров нажмите​не только одномерные​ а элемент ActiveX​ автоматически добавляться к​
5. ​[email protected]​rinat_n​
6. ​For Each ws​ нужна кнопка «Поле​ =ДВССЫЛ(E3). E3 –​ Long If Target.Cells.Count​ способами:​Автор: Максим Тютюшев​Кликаем по месту, где​ списком данные, которые​

​: Немного изменил вариант​А с другой​Код:​ «Enter» или «Ок».​ диапазоны. Можно, например​»Поле со списком»​

​ выпадающему списку. Еще​: Чтобы отображалась только​: Апострофф, StoTisteg, сорри.​

Выпадающий список в Excel с данными с другого листа/файла

​ In ThisWorkbook.Worksheets​ со списком» (ориентируемся​ ячейка с именем​ > 1 Then​Вручную через «точку-с-запятой» в​Всплывающие подсказки представляют собой​ должна быть ячейка​ в будущем включим​ Юрия.​ стороны, если клиентов​Private Sub ComboBox1_DropButtonClick()​

1. ​ Это вариант самого​ задать диапазон из​из раскрывающегося набора​
2. ​ одним часто используемым​ форма, добавьте в​ Действительно не правильно​

​Set rn =​ на всплывающие подсказки).​ первого диапазона.​ Exit Sub If​ поле «Источник».​ небольшие окна, в​ со списком. Как​ в это меню.​25.09.1990 считается :)​ 1000, то грубо​

Как сделать зависимые выпадающие списки

​ простого выпадающего списка.​ двух столбцов и​ под кнопкой​ трюком для таких​ код строку:​ скопировал скрипт. Подскажите​ ws.UsedRange​Щелкаем по значку –​

1. ​Бывает, когда из раскрывающегося​ Target.Address = «$C$2″​Ввести значения заранее. А​
2. ​ которых выводится текст​ видите, форма списка​ Эти данные можно​openid.mail.ru/mail/vlad3622340​ в среднем в​
3. ​.AddItem «Раз», 0​3​ нескольких строк, указав​Вставить (Insert)​ списков является создание​Application.Visible = False​ возможно ли в​rn.Interior.Pattern = xlNone​ становится активным «Режим​ списка необходимо выбрать​ Then If IsEmpty(Target)​ в качестве источника​ описания при наведении​

Выбор нескольких значений из выпадающего списка Excel

​ появилась.​ размещать как на​: Вот файл​ день по 3,​.AddItem «Два», 1​

1. ​Как сделать выпадающий​ дополнительно, что выводить​с вкладки​ связанных выпадающих списков​У кого мало времени​ также сделать в​For r =​ конструктора». Рисуем курсором​ сразу несколько элементов.​ Then Exit Sub​ указать диапазон ячеек​ указателя мыши на​Затем мы перемещаемся в​ этом же листе​хз​ итого если за​.AddItem «Три», 2​ список в экселе​ нужно два столбца​Разработчик (Developer)​ (когда содержимое одного​ и нужно быстро​ этом скрипте чтобы​ 3 To rn.Rows.Count​ (он становится «крестиком»)​ Рассмотрим пути реализации​
2. ​ If WorksheetFunction.CountIf(Range(«Деревья»), Target)​ со списком.​ команду или элемент​ «Режим конструктора». Жмем​ документа, так и​: как мне еще​ 6 дней предупреждать​End With​При этом в​ (свойство​:​ списка меняется в​ ухватить суть -​ проверка проводилась циклически,​If IsDate(rn(r, «E»))​ небольшой прямоугольник –​ задачи.​ = 0 Then​Назначить имя для диапазона​
3. ​ управления.​ на кнопку «Свойства​ на другом, если​ добавить клиентов после​ — каждый месидж​
   ​End Sub​ том же окне​
   ​ColumnCount​Механизм добавления тот же​
   ​ зависимости от выбора​ смотрим обучающее видео:​ по изменению и​ Then​
   ​ место будущего списка.​
   ​Создаем стандартный список с​
   ​ lReply = MsgBox(«Добавить​
   ​ значений и в​
   ​Улучшенные всплывающие подсказки представляют​ элемента управления».​ вы не хотите,​
   ​ девятнадцатого​ на 18 фамилий. ​Также заполненение ComboBox​
   ​ появится поле «Источник».​
   ​=2). Тогда можно получить​
   ​ — выбираем объект​
   ​ в другом).​Кому интересны подробности и​
   ​ по открытию документа​
   ​D = rn(r,​
   ​Жмем «Свойства» – открывается​

​ помощью инструмента «Проверка​ введенное имя «​ поле источник вписать​ собой окна большего​Открывается окно свойств элемента​ чтобы обе таблице​

Выпадающий список с поиском

1. ​Юрий М​Не просто всё​ можно повесить на​ Введите в него​ весьма привлекательные результаты,​ из списка и​
2. ​Этот способ представляет собой​ нюансы всех описанных​ изменению​ «E»)​ перечень настроек.​ данных». Добавляем в​
3. ​ & _ Target​ это имя.​
4. ​ размера, которые содержат​ управления. В графе​ располагались визуально вместе.​: А зачем? Ведь​ это. ​ открытие Документа. ​ символ «=» и​ окупающие все потраченные​

​ вставку на лист​ способов — дальше​Апострофф​If D <​Вписываем диапазон в строку​ исходный код листа​ & » в​Любой из вариантов даст​ больше текста, чем​ «ListFillRange» вручную через​

Всплывающее окно как message box (Макросы/Sub)

​Выделяем данные, которые планируем​​ Вы писали, что​Юрий М​Валерий аникин​ имя выделенного диапазона,​ на дополнительные настройки​ листе. А вот​ нового объекта -​ по тексту.​: Можно.​ Date Then​ ListFillRange (руками). Ячейку,​ готовый макрос. Как​ выпадающий список?», vbYesNo​ такой результат.​ обычные подсказки, и​ двоеточие прописываем диапазон​ занести в раскрывающийся​ не работает как​: Конечно, нужно ставить​: в волрде такого​ которое было задано​ усилия:​ дальше начинаются серьезные​ элемента управления «поле​Один щелчок правой кнопкой​

​rinat_n​​’срок истек​​ куда будет выводиться​​ это делать, описано​ + vbQuestion) If​​ могут содержать ссылки​ ячеек таблицы, данные​
​ список. Кликаем правой​ надо :-)​ ограничения 🙂 но​ нет, но можно​ ячейкам с данными.​

​Способ 1.​​ отличия от предыдущего​ со списком» с​ мыши по пустой​: Апострофф, подскажите плиз​NR = NR​ выбранное значение –​ выше. С его​ lReply = vbYes​

​Необходимо сделать раскрывающийся список​​ на статьи справки.​ которой будут формировать​ кнопкой мыши, и​Просто скопируйте любую​
​ ведь я их​
​ сделать похожее: через​ Для применения установленных​Примитивный​ способа.​
​ последующей привязкой его​ ячейке под столбцом​ как сделать?​
​ + 1​ в строку LinkedCell.​
​ помощью справа от​ Then Range(«Деревья»).Cells(Range(«Деревья»).Rows.Count +​
​ со значениями из​Отображение и скрытие всплывающих​
​ пункты выпадающего списка.​
​ в контекстном меню​ ячейку столбца D.​
​ не знаю. ​ сноску, через гиперссылку​
​ параметров нажмите «Enter»​Способ 2.​
​Во-первых, созданный выпадающий ActiveX​ к диапазонам на​
​ с данными, команда​
​StoTisteg​rn.Rows(r).Interior.Color = vbRed​
​ Для изменения шрифта​
​ выпадающего списка будут​ 1, 1) =​ динамического диапазона. Если​
​ подсказок​
​Далее, кликаем по ячейке,​ выбираем пункт «Присвоить​
​KuklP​
​Владимир​
​ (например будет открываться​
​ или «Ок». Это​
​Стандартный​
​ список может находится​ листе. Для этого:​ контекстного меню​
​: Тот же код​ElseIf D -​ и размера –​ добавляться выбранные значения.Private​
​ Target End If​
​ вносятся изменения в​

​Видео о всплывающих подсказках​​ и в контекстном​

​ имя…».​​: Приветствую всех. Юр,​: Наверное правильнее будет​ тексовый документик) ,​

​ вариант самого простого​​Способ 3.​​ в двух принципиально​​В Excel 2007/2010 откройте​Выбрать из раскрывающегося списка​ в модуль изменяемого​ 100 < Date​

​ Font.​​ Sub Worksheet_Change(ByVal Target​ End If End​ имеющийся диапазон (добавляются​

​Откройте вкладку​​ меню последовательно переходим​​Открывается форма создания имени.​​ а если клиентов​ отметить тех людей,​​ либо через рецензирование​​ выпадающего списка.​Элемент управления​

​ разных состояниях -​​ вкладку​​(Choose from drop-down list)​​ листа в Private​ Then​Скачать пример выпадающего списка​ As Range) On​ If End Sub​ или удаляются данные),​

​Файл​​ по пунктам «Объект​ В поле «Имя»​ 1000 будет? Это​ у которых ДР​

​ (но заметки будут​​4​Способ 4.​ режиме отладки, когда​Разработчик (Developer)​или нажать сочетание​ Sub Worksheet_Change(ByVal Target​’на подходе​При вводе первых букв​

​ Error Resume Next​​Сохраняем, установив тип файла​​ они автоматически отражаются​​.​ ComboBox» и «Edit».​ вписываем любое удобное​ ж крыша свалится​ через 3-5 дней.​

​ всегда торчать)​​Как сделать выпадающий​Элемент ActiveX​ можно настраивать его​. В более ранних​ клавиш​ As Range)​NG = NG​ с клавиатуры высвечиваются​ If Not Intersect(Target,​ «с поддержкой макросов».​

​ в раскрывающемся списке.​​Выберите​

​Выпадающий список в Microsoft​​ наименование, по которому​ ерзать по списку.​

​ Т.к. клиентов туева​​хз​ список в экселе​Сложность​ параметры и свойства,​ версиях — панель​

​ALT+стрелка вниз​​rinat_n​ + 1​ подходящие элементы. И​ Range(«Е2:Е9»)) Is Nothing​Переходим на лист со​Выделяем диапазон для выпадающего​Параметры​ Excel готов.​ будем узнавать данный​ Я сначала тоже​

​ хуча и перечисление​​: как сделать всплывающее​В Excel существует​низкая​ двигать его по​ инструментов​. Способ не работает,​: StoTisteg, еще вопрос​rn.Rows(r).Interior.Color = vbYellow​ это далеко не​ And Target.Cells.Count =​ списком. Вкладка «Разработчик»​ списка. В главном​.​Чтобы сделать и другие​ список. Но, это​ на эти грабли​

​ всех будет неудобоваримым.​​ окно, например о​ возможности для задания​средняя​
​ листу и менять​Формы (Forms)​
​ если ячейку и​​ возможно ли в​End If​

Всплывающее окно при открытии файла

​ все приятные моменты​​ 1 Then Application.EnableEvents​
​ — «Код» -​ меню находим инструмент​Откройте раздел​ ячейки с выпадающим​ наименование должно начинаться​ стал. Но потом​—​ наступлении дня рождения​
​ выпадающего списка, обладающего​

​высокая​​ размеры и -​

​через меню​​ столбец с данными​ скрипте прописать чтобы​End If​ данного инструмента. Здесь​ = False If​ «Макросы». Сочетание клавиш​

​ «Форматировать как таблицу».​​Общие​ списком, просто становимся​ обязательно с буквы.​ сделал то, что​66022​ для столбца​ более сложной конструкцией.​Возможность настройки шрифта, цвета​ режиме ввода, когда​Вид — Панели инструментов​ отделяет хотя бы​ при всплывающем окне​Next r​

​ можно настраивать визуальное​​ Len(Target.Offset(0, 1)) =​ для быстрого вызова​Откроются стили. Выбираем любой.​
​.​

Выпадающий список в ячейке листа

Видео

​ на нижний правый​ Можно также вписать​ выложил.​хз​

​R Dmitry​ Для этого применяют​ и т.д.​ единственное, что можно​

Способ 1. Примитивный

​ — Формы (View​ одна пустая строка​ выходил список просроченных​Next ws​ представление информации, указывать​​ 0 Then Target.Offset(0,​ ​ – Alt +​​ Для решения нашей​В разделе​​ край готовой ячейки,​​ примечание, но это​Юрий М​: а вот как​: \​ элемент управления под​нет​ — выбирать из​ — Toolbars -​ или вам нужен​

Способ 2. Стандартный

1. ​ инструкций? Если напиши​If NG +​ в качестве источника​ 1) = Target​
2. ​ F8. Выбираем нужное​ задачи дизайн не​Параметры пользовательского интерфейса​ нажимаем кнопку мыши,​​ не обязательно. Жмем​: Привет! А я​​ поставить что бы​Уважаемый хз(надеюсь не​​ названием «поле со​нет​ него данные. Переключение​​ Forms)​​ товар, который еще​​ пожалуйста как сделать​​ NR > 0​​ сразу два столбца.​​ Else Target.End(xlToRight).Offset(0, 1)​ имя. Нажимаем «Выполнить».​ имеет значения. Наличие​в списке​ и протягиваем вниз.​ на кнопку «OK».​​ чё? Я не​​ он выдовал не​​ «хрен знает»)​​ списком» , вставляемый​
3. ​да​ между этими режимами​. Если этой вкладки​ ни разу не​ и какой скрипт.​ Then​​rinat_n​ = Target End​​Когда мы введем в​​ заголовка (шапки) важно.​​Стиль всплывающих подсказок​​Также, в программе Excel​​Переходим во вкладку «Данные»​ виноват. Можно список​​ только тех людей​​вы бы примерчик​ на рабочий лист​​Количество отображаемых строк​​ происходит с помощью​

​ не видно, то​​ вводился выше:​​ Спасибо большое, мастерам​

​MsgBox «Просроченные выделены​

​: Добрый день форумчане.​ If Target.ClearContents Application.EnableEvents​ пустую ячейку выпадающего​ В нашем примере​выберите нужный параметр.​ можно создавать связанные​ программы Microsoft Excel.​ отсортировать. Будем надеяться,​ у которые родились​ приложили где дата​ Excel. Чтобы его​всегда 8​ кнопки​ нажмите кнопку​Выделите ячейки с данными,​ да своего дела​ красным, с истекающим​ Помогите решить одну​

Способ 3. Элемент управления

​ = True End​ списка новое наименование,​ это ячейка А1​Показывать расширенные всплывающие подсказки.​ выпадающие списки. Это​ Выделяем область таблицы,​ что у автора​ в 2010, но​

1. ​ как должно сработать​ установить, откройте в​​любое​​Режим Конструктора (Design Mode)​Офис — Параметры Excel​ которые должны попасть​​StoTisteg​​ сроком (через 100​​ задачку в части​ If End Sub​ появится сообщение: «Добавить​ со словом «Деревья».​​ Этот параметр включает​ такие списки, когда​ где собираемся применять​​ небольшой коллектив. В​​ и других?​​ да и примеров​​ меню пункты «Вид»​Быстрый поиск элемента по​на вкладке​-​ в выпадающий список​: Это лучше не​
2. ​ дней) — желтым.»​ excel. Есть документ​Чтобы выбранные значения показывались​ введенное имя баобаб​ То есть нужно​​ отображение как улучшенных,​​ при выборе одного​

• ​End If​​ в котором есть​ снизу, вставляем другой​ в выпадающий список?».​ выбрать стиль таблицы​
• ​ так и обычных​​ значения из списка,​ на кнопку «Проверка​ нужны другие варианты.​: Вы хотели сказать​
• ​ помню месяц назад​​ инструментов» и подпункт​нет​:​Отображать вкладку Разработчик на​Если у вас Excel​ Если достаточно вывести​End Sub​

​ список документов с​​ код обработчика.Private Sub​​Нажмем «Да» и добавиться​

​ со строкой заголовка.​ всплывающих подсказок для​ в другой графе​ данных», расположенную на​​Макрос уже готов. Запускается​​ — которые родятся​ делали похожее :)​ «Формы».​нет​

Способ 4. Элемент ActiveX

​Если эта кнопка нажата,​ ленте (Office Button​ 2003 или старше​ «красные», то много​rinat_n​ датами начала действия​​ Worksheet_Change(ByVal Target As​​ еще одна строка​ Получаем следующий вид​​ вывода дополнительных сведений​​ предлагается выбрать соответствующие​​ Ленте.​​ кнопкой. Но нужно​

​ в 2010? :)​R Dmitry​5​да​ то мы можем​ — Excel Options​ — выберите в​ изменений не потребуется,​

​: Апострофф, спасибо большое.​ и окончания действия​ Range) On Error​ со значением «баобаб».​ диапазона:​ о командах, например​ ему параметры. Например,​Открывается окно проверки вводимых​ сделать так, чтобы​хз​: От безделия даже​Выберите на открывшейся​Необходимость использования дополнительной функции​ настраивать параметры выпадающего​ — Show Developer​ меню​ в начале чистим​​rinat_n​​ инструкций. Вот необходимо​​ Resume Next If​​Когда значения для выпадающего​

​Ставим курсор в ячейку,​ имени команды, сочетания​ при выборе в​ значений. Во вкладке​ после нажатия кнопки​​: нет это окно​​ нашел вам то​ панели элементов управления​ИНДЕКС​ списка, нажав соседнюю​

​ Tab in the​Вставка — Имя -​ ListBox формы, вместо​

• ​: Апострофф, Данный скрипт​​ создать напоминалку (всплывающее​ Not Intersect(Target, Range(«Н2:К2»))​ списка расположены на​ где будет находиться​ клавиш, графических элементов​ списке продуктов картофеля,​ «Параметры» в поле​ и выполнения макроса​
• ​ всплывает на тех​​ что hugo делал​ значок «поле со​нет​ кнопку​
• ​ Ribbon)​​ Присвоить​ (или после) rn.Rows®.Interior.Color​
• ​ добавляем в макрос​​ окно) допустим за​ Is Nothing And​ другом листе или​ выпадающий список. Открываем​
• ​ и ссылок на​​ предлагается выбрать как​​ «Тип данных» выбираем​​ вышло окно, на​ кто родиться только​

​39353​ списком» — это​да​Свойства (Properties)​Найдите значок выпадающего списка​(Insert — Name -​ = vbRed добавляем​ и все?​ неделю до окончания​ Target.Cells.Count = 1​ в другой книге,​ параметры инструмента «Проверка​ статьи справки. Он​

​ меры измерения килограммы​ параметр «Список». В​ котором будет написано,​​ в 2010 а​​KuklP​ и есть выпадающий​нет​, которая откроет окно​ среди элементов управления​ Define),​ в него параметр​StoTisteg​​ действия инструкции. Подскажите​​ Then Application.EnableEvents =​ стандартный способ не​ данных» (выше описан​ выбран по умолчанию.​ и граммы, а​

Итоговая сравнительная таблица всех способов

Знатокам Word, Excel. Как сделать при наведении мышки на слово или элемент выпадающее сообщение?

​ сделал»)​​ не всплывает​ речь шла. А​ поля. Выделите правой​нет​

​ выделенного объекта:​​ подсказкам -​
​ откройте вкладку​ ws проверяем число​
​, я бы на​ виде скрипта как​ Then Target.Offset(1, 0)​ функции ДВССЫЛ: она​ функцию:​ Этот параметр отключает​ и миллилитры.​ пишем имя списка,​Александр погребняк​Юрий М​ тут напоминалка о​ кнопкой мыши нарисованный​да​
​Самые нужные и полезные​
​Поле со списком​Формулы (Formulas)​
​ Item’ов в ListBox’е​ Activate повесил на​ message box?. К​ = Target Else​ сформирует правильную ссылку​Протестируем. Вот наша таблица​ отображение улучшенных всплывающих​Прежде всего, подготовим таблицу,​ которое присвоили ему​: Макросы — выделяешь​: Посмотрите здесь:​ ДР нужна. Я​ список и укажите​нет​ свойства, которые можно​:​и воспользуйтесь кнопкой​ и если больше​ случай месяцами не​ сообщению прикладываю частичку​ Target.End(xlDown).Offset(1, 0) =​ на внешний источник​ со списком на​ подсказок для вывода​
​ где будут располагаться​
​ выше. Жмем на​ свой макрос -​
​Если бы Вы​ такую выкладывал как-то.​ команду «Формат объекта…».​Anatoliy​ и нужно настроить:​Щелкните по значку​Диспетчер имен (Name Manager)​ нуля, вызываем форму.​ перезагружаемого компа​ файла. Данная напоминалка​ Target End If​ информации.​ одном листе:​
​ только имени команды​
​ выпадающие списки, и​ кнопку «OK».​
​ Изменить — перед​ обратили внимание на​Юрий М​6​: Кликаешь правой клавишей​ListFillRange​ и нарисуйте небольшой​, затем​rinat_n​rinat_n​ нужна, так как​ Target.ClearContents Application.EnableEvents =​Делаем активной ячейку, куда​Добавим в таблицу новое​ и, возможно, сочетания​
​ отдельно сделаем списки​
​Выпадающий список готов. Теперь,​ последней строчкой End​ моё сообщение 23.09.2010,​: Я тоже что-то​Как сделать выпадающий​ мыши/выбираешь из списка,​- диапазон ячеек,​ горизонтальный прямоугольник -​Создать​: StoTisteg, напишите пожалуйста​: StoTisteg, подскажите Activate​
​ периодически забывается обновить​
​ True End If​ хотим поместить раскрывающийся​
​ значение «елка».​ клавиш.​ с наименованием продуктов​ при нажатии на​ Sub вставляешь MsgBox​ 22:47 и набрали​ такое делал. Помню,​ список в экселе​ вставить примечание, так​ откуда берутся данные​ будущий список.​. Введите имя (можно​ скрипт, дабы мне​ куда добавить? чтоб​ инструкцию. Также возможно​ End Sub​ список.​Теперь удалим значение «береза».​Не показывать всплывающие подсказки.​ и мер измерения.​
​ кнопку у каждой​
​ («Работа макроса окончена»).​ в поиске -​ там ещё была​В появившемся диалоговом​ же можешь гиперссылку.​ для списка. Выделить​Щелкните по нарисованному списку​ любое, но обязательно​ не совершить ошибок​ месяц проверку проводил.​ ли напоминалку разнести​Чтобы выбираемые значения отображались​Открываем параметры проверки данных.​Осуществить задуманное нам помогла​ Этот параметр отключает​Присваиваем каждому из списков​ ячейки указанного диапазона​ Отправил пример на​ мигалка, то сами​ мигалка (ZVI помог).​ окне в поле​
​Антон​
​ мышью диапазон он​
​ правой кнопкой мыши​
​ без пробелов и​
​Программирование мне не​
​Апострофф​
​ на несколько страниц​
​ в одной ячейке,​
​ В поле «Источник»​ «умная таблица», которая​ отображение как улучшенных,​

​ именованный диапазон, как​​ будет появляться список​ почту​ нашли бы это.​ В поиск -​ «Формировать список по​: 1​ не даст, надо​ и выберите команду​ начать с буквы!)​

всплывающее окно

​ дано​​:​ в одной книге?​ разделенные любым знаком​ вводим формулу: =ДВССЫЛ(“[Список1.xlsx]Лист1!$A$1:$A$9”).​

​ легка «расширяется», меняется.​​ так и обычных​
​ это мы уже​ параметров, среди которых​
​Pauk​Владимир​ напоминалка. Выбор есть​ диапазону» задайте нужный​Как сделать выпадающий​ просто вписать его​Формат объекта (Format control)​

​ для выделенного диапазона​​А Вам​rinat_n​Апострофф​

​ препинания, применим такой​

​Имя файла, из которого​​Теперь сделаем так, чтобы​ всплывающих подсказок для​ делали ранее с​ можно выбрать любой​: Тут поищи​: А откуда Вы​

​ :-)​​ диапазон ячеек. Для​ список в экселе​ руками с клавиатуры​. В появившемся диалоговом​ (например​за ответы и​, Вы читать умеете?​

​:​​ модуль.​ берется информация для​ можно было вводить​ вывода только имени​

​ обычными выпадающими списками.​​ для добавления в​άηϑρέΰ βσλσRσδζκμù ҂ 483643853​ знаете, кто и​vikttur​ этого мышкой выделите​В таблице или​ (например, Лист2!A1:A5)​

​ окне задайте​​Товары​ пути решений​ или​rinat_n​Private Sub Worksheet_Change(ByVal​
​ списка, заключено в​ новые значения прямо​

​ команды.​​В первой ячейке создаём​ ячейку.​
​: MsgBox в помощь​ когда родится в​: Я таких примеров​ ячейки, которые должны​

​ списке выделите ячейки​​LinkedCell​Формировать список по диапазону​). Нажмите​

​AchilleS​​THISWORKBOOK​, непонятно что у​ Target As Range)​ квадратные скобки. Этот​
​ в ячейку с​В начало страницы​ список точно таким​Второй способ предполагает создание​Abram pupkin​ будущем?​ не встречал. У​ попасть в данный​ с теми данными,​
​- связанная ячейка,​- выделите ячейки​

​ОК​​: Добрый день!​, если не по​ вас в столбце​On Error Resume​

​ файл должен быть​​ этим списком. И​Примечание:​ же образом, как​ выпадающего списка с​: Функция Msgbox выводит​хз​ каждого столбца свой?​

​ выпадающий список Excel.​
​ которые вы хотите​

​ куда будет выводиться​​ с наименованиями товаров,​.​Подскажите, пожалуйста, как​ нашенскому.​ Е — дата​ Next​ открыт. Если книга​

​ данные автоматически добавлялись​​ В видео показан​ делали это ранее,​ помощью инструментов разработчика,​

​ на экран сообщение.​​: вот именно я​ :)​ В поле «Связь​ поместить в выпадающий​ выбранный из списка​ которые должны попасть​Выделите ячейки (можно сразу​

​ сделать так, чтобы​​StoTisteg​
​ последнего пересмотра или​If Not Intersect(Target,​ с нужными значениями​ в диапазон.​ пользовательский интерфейс Office​ через проверку данных.​ а именно с​

​Скопируй и вставь​​ не знаю когда​Guest​ с ячейкой» установите​ список. В меню​

​ элемент​​ в список​ несколько), в которых​ при открытии определенного​:​

​ дата следующего пересмотра.​​ Range(«C2:C5»)) Is Nothing​ находится в другой​Сформируем именованный диапазон. Путь:​ 2010, однако оно​

​Во второй ячейке тоже​​ использованием ActiveX. По​ после макроса :​ у этих клиентов​: мне надо когда​ номер ячейки для​ выберите пункты «Вставка»​

​ListRows​​Связь с ячейкой​ хотите получить выпадающий​ файла появлялось окошко​rinat_n​

​Если последнего, то​​ And Target.Cells.Count =​ папке, нужно указывать​ «Формулы» — «Диспетчер​

​ хорошо демонстрирует работу​​ запускаем окно проверки​ умолчанию, функции инструментов​MsgBox » Все​ день рождение​ заходиш в фаил​ вывода порядкового номера​

​ — «Имя» -​​- количество отображаемых​- укажите ячейку​
​ список и выберите​

​ с определенной информацией​​, всё тот же​

​ какого рожна там​​ 1 Then​ путь полностью.​ имен» — «Создать».​

​ аналогичных функций и​​ данных, но в​ разработчика отсутствуют, поэтому​ готово !» &​Юрий М​
​ что бы всплывало​ элемента, выбранного в​

​ «Присвоить». Далее, в​​ строк​ куда нужно выводить​ в меню (на​ (например, инструкцией к​ код в точности​ делает формула, да​Application.EnableEvents = False​Возьмем три именованных диапазона:​ Вводим уникальное название​ в Office 2013.​

​ графе «Источник» вводим​​ нам, прежде всего,​ vbLf & «​: хз, Вы мой​ окно автоматически что​ списке. Задайте требуемое​ запрашиваемом поле, введите​Font​ порядковый номер выбранного​

Как сделать всплывающее окно в EXcel так, чтобы по окончанию работы макроса вышло маленькое сообщение «Расчет окончен»

​ вкладке)​ тому, что находится​ туда же, только​ ещё и кривая​newVal = Target​Это обязательное условие. Выше​ диапазона – ОК.​В начало страницы​ функцию «=ДВССЫЛ» и​ нужно будет их​

​ Макрос решил вашу​​ мой второй файл​ у одного из​ количество строк создаваемого​ имя для выделенного​- шрифт, размер,​ пользователем элемента.​Данные — Проверка (Data​ в файле).​

​ вместо Private Sub​​ к тому же?​

​Application.Undo​​ описано, как сделать​

​Создаем раскрывающийся список в​​Под выпадающим списком понимается​ адрес первой ячейки.​
​ включить. Для этого,​ проблему «​
​ из темы, указанной​ клиентов сегодня день​ списка. Кнопка «Ок»​ диапазона и нажмите​ начертание (курсив, подчеркивание​

Как показать изображение при наведении курсора мыши в Excel?

В некоторых случаях вам может потребоваться вставить изображение, которое отображается только при наведении указателя мыши в Excel, и здесь я расскажу вам, как сделать такое всплывающее изображение в Excel. .

Вставить всплывающее изображение с помощью комментария

• Повторное использование чего угодно: Добавить наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное и быстро повторно используйте их в будущем.
• Более 20 текстовых функций: извлечение числа из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
• Инструменты слияния: несколько книг и листов в одну; Объединить несколько ячеек/строк/столбцов без потери данных; Объедините повторяющиеся строки и суммируйте.
• Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Из одной книги в несколько файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
• Вставить пропуск скрытых/отфильтрованных строк; Подсчет и сумма по цвету фона; Массовая отправка персонализированных писем нескольким получателям.
• Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделе, дню, частоте и т. Д. Фильтр жирным шрифтом, формулами, комментарием …
• Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.

Вставить всплывающее изображение, с помощью комментария

Потрясающе! Использование эффективных вкладок в Excel, таких как Chrome, Firefox и Safari!

Сэкономьте 50% своего времени и уменьшите тысячи щелчков мышью каждый день!

Если вы хотите вставить всплывающее изображение в Excel, вам понадобится комментарий.

1. Выберите ячейку, в которую вы хотите поместить изображение, а затем щелкните правой кнопкой мыши, чтобы выбрать Вставить комментарий в контекстном меню. См. Снимок экрана:

2. Затем в ячейку вставляется комментарий, и помещайте указатель на границу комментария, пока указатель не изменится на крест со стрелками. Затем щелкните правой кнопкой мыши, чтобы выбрать Форматировать комментарий в контекстном меню. См. Снимок экрана:

3. В диалоговом окне Формат комментария перейдите на вкладку Цвета и линии , а затем нажмите стрелку вниз от Color и выберите Эффекты заливки . См. Снимок экрана:

4. Перейдите на вкладку Изображение , затем нажмите Выбрать изображение , чтобы выбрать нужное изображение, затем нажмите Вставить . См. Скриншоты:

Примечание : в Excel 2013 после нажатия кнопки Выбрать Изображение в диалоговом окне Эффекты заливки укажите Из файла , затем выберите изображение и нажмите кнопку Вставить .

5. Нажмите OK > OK , чтобы закрыть диалоговые окна. Затем вы увидите, что изображение вставлено в комментарий. См. Снимок экрана:

6. Затем вы можете щелкнуть комментарий и удалить имя пользователя, после чего появится всплывающее изображение. См. Снимок экрана:

Совет : вы необходимо убедиться, что Показать все комментарии не активен на вкладке Обзор .

Выпадающий список с показом изображений

Если у вас Excel 2010 или древнее, то можно почитать вот эту статью, где было описано как реализовать такой выпадающий список с помощью функции СМЕЩ (OFFSET) .

Если же у вас Excel 2013, 2016, 2019 или новее, то описанная техника в этих версиях, к сожалению, уже не работает и нужен другой подход, разобранный в этой статье далее.

Шаг 1. Готовим каталог изображений

Для начала нужно создать таблицу-справочник, где будет храниться информация о наших объектах (товарах, людях и т.д.) и их изображения. Выглядеть это должно примерно так:

При создании имеет смысл держать в голове несколько моментов:

• Если в будущем планируется добавление новых строк (товаров), то лучше сразу оформить такой каталог в виде «умной» динамической таблицы с помощью сочетания клавиш Ctrl + T или кнопки Форматировать как таблицу на вкладке Главная (Home — Format as Table) . Имя созданной «умной» таблицы можно задать на вкладке Конструктор (Design) — я назвал её в этом примере Каталог.
• Картинки должны полностью вписываться в соответствующие ячейки и не выходить за их границы (иначе они будут обрезаны). Для упорядочивания изображений после их выделения удобно использовать команды выравнивания и распределения на вкладке Формат (Format) . Там же можно задать размеры (высоту и ширину) изображений, чтобы быстро вписать их в ячейки:

Шаг 2. Создаем именованные диапазоны для ячеек с картинками

Чтобы массово и быстро присвоить ячейкам с изображениями в столбце Картинка придуманные имена из столбца ИД используем следующий трюк:

1. Выделяем столбцы ИД и Картинка (диапазон C2:D7 в нашем примере)
2. Открываем вкладку Формулы (Formulas)
   
3. Выбираем команду Создать из выделенного (Create from selection) .
4. Ставим флажок В столбце слева (Left column) , остальные флажки выключаем и жмем ОК.

Проверить получившиеся результаты можно в Диспетчере имен там же на вкладке Формулы (Formulas — Name manager) .

Шаг 3. Создаем выпадающий список товаров

Теперь нам нужно создать выпадающий список с названиями товаров, откуда пользователь впоследствии будет их выбирать. Он может быть на том же или на другом листе (но в этой же книге!).

Техника тут простая:

1. Выделяем ячейку для выпадающего списка.
2. Выбираем на вкладке Данные команду Проверка данных (Data — Data Validation) .
3. Из выпадающего списка Тип (Allow) выбираем вариант Список (List) и в поле Источник (Source) вводим формулу:

Здесь «Каталог[Название]» — это текстовая (в кавычках!) ссылка на содержимое столбца с названиями товаров в нашей «умной» таблице-каталоге, а функция ДВССЫЛ (INDIRECT) нужна, чтобы превратить эту текстовую ссылку в настоящую.

Делать так приходится потому, что в поле Источник, к сожалению, нельзя прописывать прямые ссылки на строки или столбцы «умных» таблиц. Однако с помощью «костыля» в виде ДВССЫЛ мы это ограничение успешно обходим.

Шаг 4. Вытаскиваем имя диапазона для выбранного товара

Здесь же давайте получим имя диапазона из столбца ИД для выбранного в выпадающем списке товара. Проще всего это сделать классической функцией ВПР (VLOOKUP) :

В английской версии это будет:

• С2 — адрес ячейки с выпадающим списком, содержимой которой мы ищем
• Каталог — имя нашей «умной» таблицы
• 3 — порядковый номер столбца ИД в «умной» таблице
• ЛОЖЬ (или 0) — точный режим поиска

Шаг 5. Создаем именованный диапазон с ДВССЫЛ

Как вы уже, наверное, догадались, мы будем использовать содержимое ячейки E2 как ссылку на нужное нам изображение. Однако напрямую сделать это не получится, т.к. для Excel её содержимое формально является текстом. Чтобы оживить текстовую ссылку и превратить её в настоящую — используем уже знакомую нам функцию ДВССЫЛ (INDIRECT) . Для этого:

1. Открываем Диспетчер имён на вкладке Формулы и жмём кнопку Создать (Formulas — Name Manager — Create) .
2. Вводим любое подходящее имя для создаваемого диапазона, например Фото.
3. В поле Ссылка (Reference) вводим формулу: =ДВССЫЛ(Лист2!$E$2)

Шаг 6. Добавляем картинку и привязываем её к списку

Остался последний шаг:

1. Выделим в нашей «умной» таблице любую ячейку с картинкой (например D2).
2. На вкладке Главная развернём выпадающий список Копировать и выберем опцию Копировать как рисунок (Home — Copy — Copy as Picture) . В появившемся затем окне можно выбрать вариант Как на экране (As on screen) и Растовый (Bitmap) :

Нужно сделать именно так, чтобы скопировались не отдельно ячейка и картинка, а всё содержимое ячейки вместе с картинкой как единое целое изображение.