Проблема с присваиванием в формуле

[motorway]

Странная проблема: при попытке присвоить формуле в какой-то ячейке формулу, содержащую точку с запятой, появляется ошибка "Application-defined or object-defined error".
Пример:

Range("A1").Formula = "=" + "МАКС(A1; B2)"

И так с другими функциями тоже (напр., пользовательскими).
Что за глюк?

p.s. если заменить ; на запятую ,то формула появляется, но пишет "Нераспознанный текст"

[SAS888]

Во-первых, у Вас циклическая ссылка. Т.е. Вы пытаетесь в формулу подставить результат формулы.
Во-вторых, в VBA используется не ";", а ",". Нужно так:

Range("C1").Formula = "=MAX(A1,B2)"

[motorway]

Мне нужно поместить в ячейку пользовательскую функцию, где разделители - точки с запятой: =A(x1; ...; xn). Но запятые там могут тоже встречаться. Как это сделать, чтобы точки с запятой не пропали, там где они были, чтобы и остались?

[SAS888]

Если Вы объявите пользовательскую функцию, например,

Function Test(x As Long, y As Range, z As String)
    '''
End Function

то при использовании ее в ячейках рабочего листа параметры x, y и z, по умолчанию как раз и потребуется разделять точкой с запятой. Т.е. так =Test(x1; x2; x3)

[motorway]

Чтобы было понятнее, посмотрите, пожалуйста, файл. Там ошибка. Нужно, чтобы работало, иначе это для меня катастрофа

[motorway]

М.б., достаточно просто добавить b = Replace(b, ";", ",")?

[IgorGO]

правильно:

Range("A1").Formula = "=A(" + Replace(Range("A1").Comment.Text, ";", ",") + ")"

[SAS888]

Может я Вас не правильно понимаю? Посмотрите вложение.