Как найти значения ячеек с жирным шрифтом?

Question

[Михаил Болеев]

Нужно выбрать значения ячеек для копирования на другой лист документа, привязавшись к ячейке с жирным шрифтом. На одном сайте нашел такую формулу: =ЕЖИРНЫЙ(А2), но у меня в excel нет такой формулы. Как можно сделать?

Answer 1

[idShura]

Попробуйте почитать информацию на сайте до конца, там ниже будет:

Function ЕЖИРНЫЙ(ЯЧЕЙКА As Range) As Boolean
  ЕЖИРНЫЙ = ЯЧЕЙКА.Font.Bold
End Function

upd

1. Открываете файл Excel
2. Нажимаете Alt+F11
3. Создаете новый модуль

spoiler

4. Вставляете код

spoiler

5. И далее пользуетесь как обычной формулой

spoiler

Comments

[Михаил Болеев]

Да, я читал. Но не умею пока использовать макросы. Хотелось обойтись встроенными функциями.

[idShura]

Михаил Болеев, Там нет ничего сложного, я дополнил ответ.

[Михаил Болеев]

idShura, Спасибо большое. Сейчас попробую.

[Михаил Болеев]

idShura, Спасибо, все получилось. Действительно, просто. А не подскажите, почему не работает формула для ссылок: ЕССЫЛКА(А2)? У меня для всех ячеек - ИСТИНА, хотя в двух из них - гиперссылки. Или я не правильно понимаю формулу?

[idShura]

Михаил Болеев, Покажите как выглядит ячейка со ссылкой

[Михаил Болеев]

idShura, Они есть на картинке с вопросом (одна с жирным шрифтом, другая - явно заданная: http://...)

[idShura]

Михаил Болеев, Сам файл можете прислать?

[Михаил Болеев]

idShura, Могу. Куда?

[Михаил Болеев]

idShura, https://yadi.sk/d/HPFK7gMGbR2TgA

[idShura]

Михаил Болеев, Да вроде нормально все работает

[Михаил Болеев]

idShura, У меня так.

[idShura]

Михаил Болеев, Что-то вы не то делаете.

Пример
Посмотрите вкладку "Таблица", вы это хотели сделать?

[Михаил Болеев]

idShura, Где посмотреть? У меня на скриншоте видна формула, которую я применяю.

[idShura]

https://drive.google.com/file/d/1zqr5qedkQo9YU4ymC...

[Михаил Болеев]

idShura, Почти. Только нужно раскидать телефоны по колонкам и сайты есть по два. Но речь не об этом сейчас. Я говорил про другую формулу, а не про ЕЖИРНЫЙ.

[idShura]

Михаил Болеев, Написал примеры формул для поиска ссылок

https://drive.google.com/file/d/1zqr5qedkQo9YU4ymC...

[Михаил Болеев]

Ну, это не трудно, когда ссылка явная. А когда скрытая (как в заголовках)?

[idShura]

Михаил Болеев, Позже напишу как сделать, мне домой пора ехать

[idShura]

Михаил Болеев, Вот так

Function ССЫЛКА2(ЯЧЕЙКА As Range) As String
 On Error Resume Next
 ССЫЛКА2 = ЯЧЕЙКА.Hyperlinks(1).Address
End Function

https://drive.google.com/file/d/1zqr5qedkQo9YU4ymC...

[Михаил Болеев]

idShura, Что то не хочет работать.

[idShura]

Михаил Болеев, все работает, скачайте файл из комментов выше

[Михаил Болеев]

idShura, Теперь работает. Но я ничего не делал. Раньше это формула не находилась, теперь есть. Только можно, чтобы она работала как булево значение? Нужно по аналогии с жирной сделать? И почему встроенная формула не хочет работать?

[idShura]

Чтобы возвращалось значение Истина или ложь, можно сделать так:
=ЕСЛИ(ССЫЛКА2(A2)<>"";ИСТИНА;ЛОЖЬ)

И почему встроенная формула не хочет работать?

ЕССЫЛКА работает, просто не так как вы думаете.

[Михаил Болеев]

idShura, Так я и хочу понять как она работает?

[idShura]

Михаил Болеев, Чтобы понять, нужно внимательно прочитать справку к этой формуле
Е (функции Е)

spoiler

Например формула ЕССЫЛКА(A2) возвращает истину так как значение A2 передаваемое в формулу является адресом ячейки т.е. ссылкой.

[Михаил Болеев]

idShura, Не понятно. В каком случае будет ложь? Если ссылаюсь на пустую ячейку, то тоже истина.

[Михаил Болеев]

Михаил Болеев, А-а-а, понял, кажется. Если сделать ячейку копией другой ячейки.

[idShura]

Михаил Болеев, Ложь будет в случае если значением будет например число, текст и т.д.

[Михаил Болеев]

idShura, Нет. Будет истина.

[idShura]

Михаил Болеев,

Нет. Будет истина.

Вы неправы

[Михаил Болеев]

idShura, А-а-а, вот где собака порылась. ))) Теперь понятно.

[idShura]

Михаил Болеев, Добрый день! Создайте новый вопрос и киньте мне приглашение, там я вам отвечу.

[Михаил Болеев]

idShura, Спасибо. Я уже разобрался и удалил вопрос.