Добрый день. Selection.ClearFormats очищает формат ячейки. Но, если внутри ячейки текст разного цвета/жирности/... он не действует (см.скрин)
Сейчас я делаю так:
Код
Sub очистка_формата()
Selection.ClearFormats
With Selection.Characters.Font
.Bold = False
.Italic = False
.Underline = False
End With
Selection.Font.ColorIndex = xlAutomatic
End Sub
Как бы, нету ли команды типа Selection.Characters.Font.ClearFormats или Selection.Characters.Font.Reset ? Нельзя ли формат текста внутри ячейки очистить одной командой?
Одной командой (для всех выделенных ячеек)-цвет шрифта:
Код
Selection.Font.ColorIndex = xlAutomatic
Хм.. посмотрел что нужен не только цвет. Что в вашем понимании "формат текста внутри ячейки"? цвет, размер шрифта, жирность, выравнивание и т.д.? Если сбрасывать, то к примеру, на какой размер шрифта? на тот который задается при создании новой книги?
bedvit, мне хватит того, чтобы убрал жирность, курсив, подчеркивание и чтобы цвет разных частей текста стал "АВТО" (черный) А насчет размера шрифта не совсем важно, потому что на практике очень редко встречаются ячейки внутри которых разные размеры шрифта.