Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/75: Рейтинг темы: голосов - 75, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 22.05.2016
Сообщений: 28
1

Выделение текста жирным шрифтом

10.10.2017, 20:13. Показов 13739. Ответов 1
Метки нет (Все метки)

Добрый день!
Есть диапазон ячеек. В некоторых из них записан текст через точку.
Необходимо выделить жирным шрифтом весь текст до первой точки.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.10.2017, 20:13
Ответы с готовыми решениями:

Выделение в тексте жирным шрифтом прописными буквами 16 с мигающим фоном каждого четного символа в фигурных скобках
нужно написать этот макрос на выделение в тексте жирным шрифтом прописными буквами 16 с мигающим...

Выделение жирным части текста, возвращаетмого функцией
Сабж! Есть функция, которая указана как функция ячейки =a() и которая возвращает текст. Необходимо,...

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

Задание: выделить первое предложение каждого абзаца жирным шрифтом
Здравствуйте! Помогите пожалуйста. Задание: выделить первое предложение каждого абзаца жирным...

1
4115 / 2221 / 939
Регистрация: 01.12.2010
Сообщений: 4,625
10.10.2017, 20:39 2
Лучший ответ Сообщение было отмечено styana как решение

Решение

Один из возможных вариантов, где Вам нужно указать свой диапазон ячеек :

Visual Basic
1
2
3
4
5
6
7
8
9
Private Sub Test()
    Application.ScreenUpdating = False
    Dim iCell As Range, iPos&
    For Each iCell In [A1:C10].SpecialCells(xlConstants, xlTextValues)
        iPos = InStr(iCell.Value, ".")
        If iPos > 1 Then iCell.Characters(1, iPos - 1).Font.Bold = True
    Next
    Application.ScreenUpdating = True
End Sub

Если диапазон насчитывает большое количество ячеек, а точка среди них встречается редко, то можно использовать обычный поиск, т.е. методы Find+FindNext и искать "*?.*"
2
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.10.2017, 20:39

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Программа, которая форматирует жирным шрифтом первое предложение каждого абзаца
Напишите программу, которая форматирует жирным шрифтом первое предложение каждого абзаца.

Макрос. Добавление текста к жирным словам
Пытаюсь сделать макрос, но не понимаю в чем ошибка. Если слово написано жирным (Bold = True), то...

Каждое второе слово выделенного текста напечатать полужирным шрифтом, а остальные слова подчеркнуть
Помогите,пожалуйста!не понимаю макросы :( Написать макрос (допустим, MyMacros), который...

Выделение несвязного текста цветом
столкнулся с проблемой: если в тексте ФЫВАПРОЛДЖЭЯ ФЫВАПРОЛДЖЭЯ ФЫВАПРОЛДЖЭЯ ФЫВАПРОЛДЖЭЯ выделить...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.