Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Создаю функцию в Excel. Что делаю не так? / 12 сообщений из 12, страница 1 из 1
18.06.2012, 14:19
    #37842691
REBUS
REBUS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Создаю функцию в Excel. Что делаю не так?

В пустом файле Excel

создаю в Редакторе Visual Basic

Function SUMSUM() As Integer
SUMSUM = 100
End Function

Потом хочу вызвать в ячейке таблицы SUMSUM()

вызывает ошибку "Недопустимое имя"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.06.2012, 14:21
    #37842696
Serge 007
Serge 007
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
REBUSсоздаю в Редакторе Visual Basic
В каком модуле?
ЮДФ-ки работают только в стандартном модуле
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.06.2012, 14:29
    #37842708
REBUS
REBUS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Стандартный модуль - это

модуль в "Эта Книга" или "Лист1"?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.06.2012, 14:42
    #37842732
REBUS
REBUS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Нашел здесь ответ

http://www.excel-vba.ru/chto-umeet-excel/chto-takoe-modul-kakie-byvayut-moduli/
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 16:22
    #37844731
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Function SUMSUM( авторГДЕ ЗНАЧЕНИЕ (ЧТО ВЫЧИСЛЯЕМ???)) As Integer
SUMSUM = 100
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 16:25
    #37844740
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Function имя функции( значение(-я)) As Integer
SUMSUM = вычисление с значением(ями)
End Function

Например

Function SUM(x,y) As Integer
if x=0 and y>0 then
SUMSUM = "Деление на ноль"
Elseif x=> then
SUMSUM = y/x
End if
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 16:27
    #37844742
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
> Автор: Ser Artur
> Function SUM(x,y) As Integer
> SUMSUM = "Деление на ноль"

Это не будет работать

Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 16:33
    #37844755
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Ups

Function SUMA(x, y) As Integer
If x = 0 And y > 0 Then
SUMA = "?"
ElseIf x >= 0 Then
SUMA = y / x
End If
End Function


Код: vbnet
1.
Это не будет работать


Я не понимаю смысла этой функции
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 16:34
    #37844757
Ser Artur
Ser Artur
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
то есть этой
Код: vbnet
1.
2.
3.
Function SUMSUM() As Integer
SUMSUM = 100
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 17:41
    #37844955
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
> Автор: Ser Artur

Еще раз

> Это не будет работать

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Function SUMA(x, y) As Integer
On Error GoTo labErr
If x = 0 And y > 0 Then
SUMA = "?"
ElseIf x >= 0 Then
SUMA = y / x
End If
Exit Function
labErr:
MsgBox Err.Description
Err.Raise Err.Number
End Function


Попробуй эту функцию и посмотри на ошибку при x = 0 и y > 0
А так-же посмотри на ошибку при параметрах: x = 0 и y = 0

Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 17:43
    #37844957
Игорь Горбонос
Игорь Горбонос
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
> Автор: Ser Artur
> то есть этой

Смысл этой функции только в заготовке, для последующего наполнения нужным кодом. Или для иллюстрации как делать
пользовательские функции

Posted via ActualForum NNTP Server 1.5
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.06.2012, 23:12
    #37845342
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Создаю функцию в Excel. Что делаю не так?
Ser ArturFunction SUM(x,y) As Integer
Код: vbnet
1.
Public Function SUM(x,y) As Integer
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Создаю функцию в Excel. Что делаю не так? / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 492ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2175614]:
 0ms
get settings:
 9ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 194ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 2ms
others: 208ms
total:  492ms
x
x
Закрыть


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