Как сделать конкретный текст в ячейке жирным шрифтом и подчеркнутым

strProject = Trim(ThisWorkbook.Sheets("Proposed").Cells(i, 2).Value) 
     On Error Resume Next 
     Set objWorkSheet = objWorkbook.Sheets("" & strProject & "") 
     If Not objWorkSheet Is Nothing Then 
      ThisWorkbook.Sheets("Proposed").Cells(i, 5).Value = Trim(objWorkSheet.Cells(12, 6).Value) 
      ThisWorkbook.Sheets("Proposed").Cells(i, 6).Value = "Highlights for current week:" + Chr(10) + Trim(objWorkSheet.Cells(22, 2).Value) + Chr(10) + Chr(10) + "Action Plan for next Week:" + Chr(10) + Trim(objWorkSheet.Cells(27, 2).Value)

Как сделать «Основные моменты текущей недели:» полужирным и подчеркнутым?Как сделать конкретный текст в ячейке жирным шрифтом и подчеркнутым

источник

2016-02-10 Suganthan Srinivasan

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

Мне нужен только конкретный текст «Основные моменты» для текущей недели: «в ячейке, чтобы быть жирным шрифтом и подчеркивать Не могли бы вы скорректировать вышеуказанное свойство и ответить, пожалуйста? –

Да, вы можете. Жирные и курсивные свойства относятся к Font object, к которым можно получить доступ через range object.

Пример

ActiveCell.Font.Bold = True 
ActiveCell.Font.Italic = True

Этот пример обновляет текущую активную ячейку.

Обновлено

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

Частичное форматирование Пример управления

ActiveCell.Characters(Start:=1 Length:=10).Font.Bold = True

начала и длины параметров, какие символы показаны жирным шрифтом.

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

источник

2016-02-10 13:38:04

Мне нужен только конкретный текст «Основные моменты текущей недели:» в ячейке, чтобы быть полужирным и подчеркнутым. Не могли бы вы скорректировать вышеуказанное свойство и ответить, пожалуйста? –

Я отредактировал свой ответ. –

Как сделать конкретный текст в ячейке жирным шрифтом и подчеркнутым

ответ

Смежные вопросы