Member 12829540 Ответов: 1

У меня есть 2 ячейки-имя и фамилия. Как соединить их вместе, разделив запятой, но имея только фамилию, выделенную жирным шрифтом?

Используя Excel, у меня есть 2 ячейки-имя и фамилия. Как соединить их вместе, разделив запятой, но имея только фамилию, выделенную жирным шрифтом?

Что я уже пробовал:

Я попробовал следующее (col Aa-это фамилия и имя, соединенные вместе и разделенные запятой), но это, кажется, делает все это жирным шрифтом.
Sub boldtext()
Dim ce As Range
For Each ce In Range("Aa2:Aa305")
    ce.Characters(1, InStr(1, ce.Value, " ") - 1).Font.Bold = True
Next ce
End Sub

1 Ответов

Рейтинг:
2

Wendelius

Вместо Font. Bold попробуйте установить FontStyle. Иначе говоря

ce.Characters(1, InStr(1, ce.Value, " ") - 1).FontStyle = "Bold"

Member 12829540

Я попробовал это сделать, и мне также пришлось вставить "шрифт" перед FontStyle, иначе он не будет работать, но это все равно превращает всю строку в Жирный шрифт

Wendelius

Я попробовал это на примере Excel, и это сработало отлично. Вы уверены, что разделитель-это пустое место? Попробуйте отладить и посмотреть, возвращает ли InStr правильное значение для каждой ячейки.

Member 12829540

Большое спасибо за вашу помощь. Казалось, у меня были проблемы с вставкой FontStyle, но по какой-то причине мой исходный код теперь, кажется, работает.
Еще раз большое спасибо

Wendelius

Рад, что у тебя все получилось!