Часть формулы в полужирном шрифте
temnoo
Дата: Четверг, 17.09.2015, 15:48 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
Добрый день, как сделать что бы часть формулы была в полужирном шрифте? Файл прикрепил.
Добрый день, как сделать что бы часть формулы была в полужирном шрифте? Файл прикрепил. temnoo
Ответить
Сообщение Добрый день, как сделать что бы часть формулы была в полужирном шрифте? Файл прикрепил. Автор - temnoo Дата добавления - 17.09.2015 в 15:48
Revengencer
Дата: Четверг, 17.09.2015, 20:50 |
Сообщение № 2
Группа: Проверенные
Ранг: Новичок
Сообщений: 34
Репутация:
13
±
Замечаний:
0% ±
Excel 2016
Нехитрый вариант:
Ответить
Сообщение Нехитрый вариант: Автор - Revengencer Дата добавления - 17.09.2015 в 20:50
temnoo
Дата: Пятница, 18.09.2015, 09:22 |
Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация:
0
±
Замечаний:
20% ±
Excel 2007
Нехитрый вариант: К сообщению приложен файл: 50661051.xlsx(10Kb)
Спасибо за ответ, но у меня сверху идет еще таблица, и ширина первых двух столбцов ограничена и туда не влезают первые два слова
Нехитрый вариант: К сообщению приложен файл: 50661051.xlsx(10Kb)
Спасибо за ответ, но у меня сверху идет еще таблица, и ширина первых двух столбцов ограничена и туда не влезают первые два слова temnoo
Ответить
Сообщение Нехитрый вариант: К сообщению приложен файл: 50661051.xlsx(10Kb)
Спасибо за ответ, но у меня сверху идет еще таблица, и ширина первых двух столбцов ограничена и туда не влезают первые два слова Автор - temnoo Дата добавления - 18.09.2015 в 09:22
китин
Дата: Пятница, 18.09.2015, 10:09 |
Сообщение № 4
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация:
1079
±
Замечаний:
0% ±
Excel 2007;2010;2016
может така?
Не судите очень строго:я пытаюсь научиться ЯД 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
Ответить
Сообщение может така? К сообщению приложен файл: temnoo.xlsx(9Kb)
Ничего не поменялось, открыл файл, там все в обычном шрифте.Автор - temnoo Дата добавления - 18.09.2015 в 10:13
китин
Дата: Пятница, 18.09.2015, 11:26 |
Сообщение № 6
Группа: Модераторы
Ранг: Экселист
Сообщений: 7034
Репутация:
1079
±
Замечаний:
0% ±
Excel 2007;2010;2016
так вот где собака порылась!!! формулы формат переносить не умеют.ИМХО(может гуру что подскажут) Вам к макрописцам тогда
так вот где собака порылась!!! формулы формат переносить не умеют.ИМХО(может гуру что подскажут) Вам к макрописцам тогда китин
Не судите очень строго:я пытаюсь научиться ЯД 41001877306852
Ответить
Сообщение так вот где собака порылась!!! формулы формат переносить не умеют.ИМХО(может гуру что подскажут) Вам к макрописцам тогда Автор - китин Дата добавления - 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] Выделяете ячейку, запускаете макрос (можно назначить сочетание клавиш).
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
Сообщение отредактировал 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