Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите с созданием собственной функции / 5 сообщений из 5, страница 1 из 1
20.07.2005, 07:54:08
    #33174923
Dimon_uk
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с созданием собственной функции
У меня проблема как сделать так чтобы результаты функции записывались в столбец куда была она вставленна и в соседний так как у меня имется на входе одна переменная а на выходе две
...
Рейтинг: 0 / 0
20.07.2005, 08:29:33
    #33174945
sergeyvg
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с созданием собственной функции
Добрый день!
Самое простое, это добавить еще ячейку, в ней держать функцию, которая в возвращаемом значении через спец разделитель будет возвращать два значения, а в нужных двух ячейках выделять первую и вторую части из добавленной ячейки.
С уважением, Сергей Густокашин. Тольятти, Комсофт. ICQ 75307217
...
Рейтинг: 0 / 0
25.07.2005, 17:27:43
    #33183353
mihmih
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с созданием собственной функции
sergeyvg, можно, но если эта функция что-то толго и трудно считет - то вызывать ее два раза - тяжело будет.
Предлагаю так:
Первая ячейка =СокрЛП(Лев(ТретьяЯчейка,10))
Вторая ячейка = СокрЛП(Прав(ТретьяЯчейка,10))
Третья ячейка = МояФункция()

где:
Function МояФункция()
...
...
МояФункция = Лев(Результат1+" ",10)+Лев(Результат2+" ",10)
End Function

Если результаты имеют тип, отличный от строкового, в ячейках использовать функции преобразования типов.
...
Рейтинг: 0 / 0
25.07.2005, 18:11:50
    #33183473
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с созданием собственной функции
Можно попробовать функцию массива
это которая заключается в фигурные скобки
...
Рейтинг: 0 / 0
12.10.2005, 23:33:29
    #33321323
100g
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с созданием собственной функции
SRC vba]
Function Get2() As Variant

Dim Array2(1) As String

Array2(0) = "qqqq"
Array2(1) = "wwww"

Get2 = Array2

End Function
[/SRC]
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите с созданием собственной функции / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]