Если шрифт жирный excel vba

Шрифт ячейки VBA — изменение цвета, размера, стиля и т. Д.

Шрифт ячейки VBA

В VBA вы можете изменить свойства шрифта с помощью свойства шрифта VBA объекта Range. Введите следующий код в редактор VBA, и вы увидите список всех доступных вариантов:

Ниже мы обсудим несколько наиболее распространенных свойств.

Изменить цвет шрифта

Есть несколько способов установить цвета шрифта.

vbColor

Самый простой способ установить цвета — использовать vbColors:

1	Диапазон («a1»). Font.Color = vbRed

Однако количество доступных цветов очень ограничено. Это единственные доступные варианты:

Цвет — RGB

Вы также можете установить цвета на основе RGB (красный, зеленый, синий). Здесь вы вводите значения цвета от 0 до 255 для красного, зеленого и синего. Используя эти три цвета, вы можете сделать любой цвет:

1	Диапазон («a1»). Font.Color = RGB (255,255,0)

ColorIndex

VBA / Excel также имеет свойство ColorIndex. Это делает вам доступными предварительно созданные цвета. Однако они хранятся в виде порядковых номеров, что затрудняет определение того, что это за цвет:

1	Диапазон («a1»). Font.ColorIndex =…

Мы написали статью о цветовых кодах VBA, включая список кодов VBA ColorIndex. Там вы можете узнать больше о цветах.

Размер шрифта

Это установит размер шрифта на 12:

1	Диапазон («a1»). Размер шрифта = 12

1	Диапазон («a1»). Размер шрифта = 16

Жирный шрифт

Установить полужирный шрифт ячейки легко:

1	Диапазон («A1»). Font.Bold = True

или очистить форматирование полужирным шрифтом:

1	Диапазон («A1»). Font.Bold = False

Название шрифта

Чтобы изменить название шрифта, используйте Имя имущество:

1	Диапазон («A1»). Font.Name = «Calibri»

1	Диапазон («A1»). Font.Name = «Arial»

1	Диапазон («A1»). Font.Name = «Times New Roman»

Стиль ячейки

Excel предлагает возможность создавать «стили» ячеек. Стили можно найти в Главная Лента> Стили:

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

Лично для многих моделей, над которыми я работаю, я обычно создаю стиль ячейки «Вход»:

1	Диапазон («a1»). Style = «Input»

Используя стили, вы также можете легко определять типы ячеек на вашем листе. В приведенном ниже примере выполняется цикл по всем ячейкам на листе и изменяется любая ячейка со Style = «Input» на «InputLocked»:

Источник

Полужирный, Курсив, Размер, Зачеркивное, Подчеркивание, Вес

Задаются визуальные атрибуты текста на отображаемой или печатаемой форме.

Синтаксис

object. Полужирный [ = логический ]
object. Курсив [= логическое ]
object. Размер [= валюта ]
object. StrikeThrough [= Boolean ]
object. Подчеркивание [= логическое значение ]
object. Weight [= Integer ]

Синтаксис свойств Bold, Italic, Size, StrikeThrough, Underline и Weight состоит из следующих частей:

Part	Описание
object	Обязательно. Допустимое имя объекта.
Boolean	Необязательный параметр. Задает начертание шрифта.
Currency	Необязательный параметр. Число, показывающее размер шрифта.
Integer	Необязательный параметр. Задает начертание шрифта.

Settings

Значениями для Boolean являются:

Значение	Описание
True	Текст имеет заданный атрибут (т. е. жирный, курсив, размер, метки зачеркивания или подчеркивания либо плотность).
False	Текст не имеет заданного атрибута (по умолчанию).

Свойство Weight принимает значения от 0 до 1000. Значение, равное нулю, позволяет системе подбирать наиболее подходящую плотность. Значение от 1 до 1000 показывает какую-нибудь конкретную плотность, где 1 представляет самый светлый тип и 1000 представляет самый темный тип.

Замечания

Эти свойства определяют визуальные характеристики текста:

• Свойством Bold определяется, будет ли текст стандартным или жирным.
• Свойством Italic определяется, будет ли текст стандартным или наклонным.
• Свойством Size определяется высота отображаемого текста в пунктах.
• Свойством Underline определяется, будет ли текст подчеркнутым.
• Свойством StrikeThrough определяется, отображается ли текст с метками перечеркивания.
• Свойством Weight определяется степень насыщенности шрифта.

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

Изменение значения Bold также изменяет значение Weight. При задании полужирным шрифтом значение True для параметра Вес равно 700; Для параметра Полужирным шрифтом значение False для параметра Вес равно 400. И наоборот, при установке значения «Вес » больше 550 значение «Полужирный» имеет значение True; Для параметра Weight (Вес) значение 550 или меньше , для параметра Полужирное значение равно False.

Выраженный в пунктах размер по умолчанию определяется операционной системой.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Источник

VBA Excel. Форматирование текста в ячейке (объект Font)

Форматирование текста в ячейке при помощи кода VBA Excel. Объект Font и его основные свойства. Примеры изменения начертания строк в заданном диапазоне.

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

Формат отображаемого значения

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

• рабочего листа по умолчанию;
• установленный для диапазона пользователем;
• примененный к диапазону из кода VBA Excel.

Если ячейка содержит текстовое значение, его начертание можно форматировать по отдельным частям (подстрокам). Такое форматирование доступно как в ручном режиме на рабочем листе, так и из кода VBA Excel.

У объекта Range есть свойство Font (шрифт), которое отвечает за форматирование (начертание) визуально отображаемого текста в ячейках рабочего листа. Его применение вызывает объект Font, который в свою очередь обладает собственным набором свойств, отвечающих за конкретный стиль начертания отображаемого значения.

Основные свойства объекта Font

Свойство	Описание	Значения
Name	наименование шрифта	«Arial», «Calibri», «Courier New», «Times New Roman» и т.д.
Size	размер шрифта	от 1 до 409 пунктов
Bold	полужирное начертание	True, False
Italic	курсивное начертание	True, False
FontStyle	заменяет Bold и Italic	«обычный», «полужирный», «курсив», «полужирный курсив»
Superscript	надстрочный текст	True, False
Subscript	подстрочный текст	True, False
Underline	подчеркнутый текст	True, False
Color*	цвет текста	от 0 до 16777215

*Color — это не единственное свойство, отвечающее за цвет отображаемого текста в ячейке. Оно также может принимать и другие значения, кроме указанных в таблице. Смотрите подробности в статьях Цвет текста (шрифта) в ячейке и Цвет ячейки (заливка, фон).

Примеры форматирования текста

Пример 1
В этом примере ячейкам диапазона «A1:A3» присвоим шрифты разных наименований:

Пример 2
В этом примере рассмотрим применение одного свойства объекта Font к одной ячейке:

Пример 3
Форматирование диапазона из нескольких ячеек:

Пример 4
Пример форматирования шрифта в разных ячейках по одному свойству:

5 комментариев для “VBA Excel. Форматирование текста в ячейке (объект Font)”

Пример 2 не к одной ячейке, а к трём. Где пример к одной.

Добрый день, Алексей Леонидович!
Во втором примере показано применение одного свойства объекта Font к одной ячейке.
К ячейке «A5»:
Range(«A5»).Font.Bold = True
К ячейке «A6»:
Range(«A6»).Font.FontStyle = «полужирный курсив»
К ячейке «A7»:
Range(«A7»).Font.Superscript = True

Применение нескольких свойств объекта Font к одной ячейке может выглядеть следующим образом:

Скажите пожалуйста, а есть ли способ подставлять вместо свойства ячейки (Bold, Underline, Italic) переменную чтобы в цикле последовательно менять свойства ячейки одной командой? Это упрощенный пример, так сказать в принципе, есть ли способ записи типа .Cells(1,1).Font.Переменная=True где Переменная это одно из Bold, Italic, Underline?
With Worksheets(«Конфигурация»)
For i = 1 To 3
Select Case i
Case 1
s = «Bold»
Case 2
s = «Italic»
Case 3
s = «Underline»
End Select
.Cells(15, 1).Font.?s? = True
Next i
End With

Здравствуйте, Сергей!
Если заменить «Underline» на «Bold Italic» или «обычный» , тогда можно так:

С «Underline» такой фокус не проходит, но возвращает к обычному стилю.

нет, увы. Спасибо конечно, что мимо не прошли, но я дал лишь упрощенную формулировку задачи. На самом деле я хочу работать с объектами WMI, коих, как известно огромное количество и у каждого куча свойств. Я не хочу писать многокилометровый код и все время добавлять строки. Я хочу вынести на лист excel список объектов и слева от каждого в колонках список свойств. И в цикле пробегать по объектам и по внутреннему циклу по свойствам, подставлять все по очереди и получать значения. И для добавления еще одного мне нужно будет только добавить на лист объект или свойство. В код при этом лазить не нужно будет.
Но я уперся в это вот, нужно как-то подставлять в объект вместо свойства переменную. Для этого я и сделал этот крошечный пример. Здесь никто конечно не будет перебирать свойства в таком дурацком цикле, тем более, что свойства разные по формату, кому-то нужны цифры, кому-то булево значение. Так что этот пример смысла не имеет, но дает понять задачу.

Источник

Excel VBA Font (Color, Size, Type, and Bold)

Written by Puneet for Excel 2007, Excel 2010, Excel 2013, Excel 2016, Excel 2019, Excel for Mac

Key Notes

• To make changes in a font, you need to use the VBA Font object.
• There is a total of 18 properties with the font object that you can access and make changes.

VBA Font Object

In VBA, there is a font object which you can use to change properties of the font from a cell, like, font color, font size, font type, and you can also apply bold and italic to the font.

Syntax

To use it, first, you need to define the cell address, which you can specify in the following ways.

VBA Font Color

To change the color of the font, you have two different ways:

1. Using Color Constants

Excel has a few color constants that you can use to apply color to the font. For example, if you want to apply the red color to the font in cell A1, the code would be like the below:

In the above code, after the font object, color is the property and you have used the vbRed constant that tells VBA to apply the red color to the cell A1. There is a total of eight constants that you can use:

1. vbBlack: Black
2. vbRed: Red
3. vbGreen: Green
4. vbYellow: Yellow
5. vbBlue: Blue
6. vbMagenta: Magenta
7. vbCyan: Cyan
8. vbWhite: White

2. Using RGB

You can also use the RGB color code to apply color to the font. RGB is the combination of red, green, and blue colors, where you can create a custom color using the code. Let’s say if you want to apply a combination of green and blue color to cell A1 the code would be:

VBA Font Size

Font object also gives you access to the size property of the font. Let’s say you want to apply the font size of 16 to the font in the cell A1, the code would be:

If you want to apply font size to all cells in a worksheet you can use the following code:

And if only want to apply font size to cells where you have data, the code would be:

Or to the selected cell.

VBA Font Name

In the same way, you can also change the font name using the name property of the font object. Let’s say you want to apply the “Consolas” font the cell A1. The code would be:

While using this property, you need to type the correct name of the font that you want to apply, and if somehow the name is incorrect, it won’t show you an error.

VBA Font Bold, Italic, and Underline

There are also properties that you can use to make the font bold, italic, and underline. Below are the codes that you need to write for this.

With these properties, you need to define TRUE or FALSE. So if the font is already bold or italic and you want to remove it, then you need to use FALSE to remove them.

Other Useful Font Properties

Here add a few more properties that can be useful for you (Strikethrough, Subscript, and Superscript).

Источник