Выделение полужирным в формуле

[konstsu]

Всех с Новым годом!
Вопрос в следующем, например:
="Привет," & b2 & "!"
b2 = "Вася"
Надо чтобы получилось: Привет, Вася!
помогите с функцией?

[kuklp]

Нет такой формулы. И не может быть по определению. Формула возвращает значение. Можете только разделить строку на две ячейки и в последней сделать шрифт полужирным.

[MCH]

Сообщение от konstsu

Надо чтобы получилось: Привет, Вася!
помогите с функцией?

Функцией это сделать невозможно

[konstsu]

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

    ActiveCell.FormulaR1C1 = "wswswswsw swswswsww swswswsw"
    With ActiveCell.Characters(Start:=1, Length:=10).Font
        .FontStyle = "обычный"
    End With
    With ActiveCell.Characters(Start:=11, Length:=10).Font
        .FontStyle = "полужирный"
    End With
    With ActiveCell.Characters(Start:=21, Length:=8).Font
        .FontStyle = "обычный"
    End With

[konstsu]

Сообщение от MCH

Функцией это сделать невозможно

Ну этот вариант возможен. На данном этапе я так и сделал. но проблема в том что Привет не имеет определенной длинны

[tae1980]

Сообщение от konstsu

Ну этот вариант возможен. На данном этапе я так и сделал. но проблема в том что Привет не имеет определенной длинны

Если грубо то так: разбивай строку на части, сохраняй части в отдельные переменные, определяй длины переменных, и уже на основе этих данных формируй итоговую строку.
Например вот так я вывожу формулу

            str1 = "DP=3.5*Mt*"
            .Cells(x_tab, шаблон.Cells(x_sh, Вектор + 4)).Value = str1 & Chr(214) & "P"
            .Cells(x_tab, шаблон.Cells(x_sh, Вектор + 4)).Characters(1, 1).Font.name = "Symbol"
            .Cells(x_tab, шаблон.Cells(x_sh, Вектор + 4)).Characters(Len(str1) + 1, 1).Font.name = "Symbol"