Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Часть формулы в полужирном шрифте - Мир MS Excel

  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Часть формулы в полужирном шрифте
temnoo Дата: Четверг, 17.09.2015, 15:48 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Добрый день, как сделать что бы часть формулы была в полужирном шрифте?
Файл прикрепил.
К сообщению приложен файл: 5066105.xlsx (9.6 Kb)
 
Ответить
СообщениеДобрый день, как сделать что бы часть формулы была в полужирном шрифте?
Файл прикрепил.

Автор - temnoo
Дата добавления - 17.09.2015 в 15:48
Revengencer Дата: Четверг, 17.09.2015, 20:50 | Сообщение № 2
Группа: Проверенные
Ранг: Новичок
Сообщений: 34
Репутация: 13 ±
Замечаний: 0% ±

Excel 2016
Нехитрый вариант:
К сообщению приложен файл: 50661051.xlsx (9.8 Kb)
 
Ответить
СообщениеНехитрый вариант:

Автор - Revengencer
Дата добавления - 17.09.2015 в 20:50
temnoo Дата: Пятница, 18.09.2015, 09:22 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
Нехитрый вариант:
К сообщению приложен файл: 50661051.xlsx(10Kb)

Спасибо за ответ, но у меня сверху идет еще таблица, и ширина первых двух столбцов ограничена и туда не влезают первые два слова :(
К сообщению приложен файл: 6952712.xlsx (9.9 Kb)
 
Ответить
Сообщение
Нехитрый вариант:
К сообщению приложен файл: 50661051.xlsx(10Kb)

Спасибо за ответ, но у меня сверху идет еще таблица, и ширина первых двух столбцов ограничена и туда не влезают первые два слова :(

Автор - temnoo
Дата добавления - 18.09.2015 в 09:22
китин Дата: Пятница, 18.09.2015, 10:09 | Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
может така?
К сообщению приложен файл: temnoo.xlsx (9.2 Kb)


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщениеможет така?

Автор - китин
Дата добавления - 18.09.2015 в 10:09
temnoo Дата: Пятница, 18.09.2015, 10:13 | Сообщение № 5
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
может така?
К сообщению приложен файл: temnoo.xlsx(9Kb)

Ничего не поменялось, открыл файл, там все в обычном шрифте.
 
Ответить
Сообщение
может така?
К сообщению приложен файл: temnoo.xlsx(9Kb)

Ничего не поменялось, открыл файл, там все в обычном шрифте.

Автор - temnoo
Дата добавления - 18.09.2015 в 10:13
китин Дата: Пятница, 18.09.2015, 11:26 | Сообщение № 6
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация: 1079 ±
Замечаний: 0% ±

Excel 2007;2010;2016
там все в обычном шрифте
так вот где собака порылась!!! :D
формулы формат переносить не умеют.ИМХО(может гуру что подскажут)
Вам к макрописцам тогда


Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852
 
Ответить
Сообщение
там все в обычном шрифте
так вот где собака порылась!!! :D
формулы формат переносить не умеют.ИМХО(может гуру что подскажут)
Вам к макрописцам тогда

Автор - китин
Дата добавления - 18.09.2015 в 11:26
Revengencer Дата: Пятница, 18.09.2015, 16:00 | Сообщение № 7
Группа: Проверенные
Ранг: Новичок
Сообщений: 34
Репутация: 13 ±
Замечаний: 0% ±

Excel 2016
temnoo, с макросом будет такой вариант:
макрос выделяет полужирным текст после двоеточия,
но(!) формула в ячейке пропадает - вместо нее остается простая строка.
С сохранением формулы не получается.

[vba]
Код
Sub TextBold()
       Dim lngPos As Long, lngLen As Long, sText As String
          
       sText = CStr(ActiveCell.Value)
       ActiveCell = sText
          
       lngPos = InStr(ActiveCell, ":")
       lngLen = Len(ActiveCell)
       ActiveCell.Characters(lngPos + 1, lngLen - lngPos).Font.Bold = True
End Sub
[/vba]

Выделяете ячейку, запускаете макрос (можно назначить сочетание клавиш).


Сообщение отредактировал Revengencer - Пятница, 18.09.2015, 16:02
 
Ответить
Сообщениеtemnoo, с макросом будет такой вариант:
макрос выделяет полужирным текст после двоеточия,
но(!) формула в ячейке пропадает - вместо нее остается простая строка.
С сохранением формулы не получается.

[vba]
Код
Sub TextBold()
       Dim lngPos As Long, lngLen As Long, sText As String
          
       sText = CStr(ActiveCell.Value)
       ActiveCell = sText
          
       lngPos = InStr(ActiveCell, ":")
       lngLen = Len(ActiveCell)
       ActiveCell.Characters(lngPos + 1, lngLen - lngPos).Font.Bold = True
End Sub
[/vba]

Выделяете ячейку, запускаете макрос (можно назначить сочетание клавиш).

Автор - Revengencer
Дата добавления - 18.09.2015 в 16:00
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!