powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
5 сообщений из 5, страница 1 из 1
В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
    #33090837
ауг
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ребята.

Ответьте мне на вопрос, реализуемо это или нет.

Задание.

В качестве надстройки в эксель создать свою функцию , которая бы суммировала числа в диапазоне ячеек. Т.е она получает в качестве аргумента массив? Или как?

Я выделяю диапазон, эксель считает сумму. Не ржите, это надо решить!

xla шаблон сделал. Осталось только это решить.

Я кроме этого

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Public Function GetSumm(size As Integer, fuck() As Integer) As String
  
  ReDim fuck( 0  To size)
  
  Dim M as long

  For Each i1 In fuck
  M = M + fuck(i1)
  Next
  
  
  GetMin = CStr(M)
    
End Function



В мастере функций вижу свою функцию , но она пишет ошибку в ячейке...
Как мне адресовать диапазон ячеек? Какой аналог задавать в качекстве аргумента функции?
...
Рейтинг: 0 / 0
В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
    #33090894
Фотография funddd
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а почему бы в функцию Range не отправлять?

И еще: тему с таким названием в следующий раз удалю.


Posted via ActualForum NNTP Server 1.2
...
Рейтинг: 0 / 0
В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
    #33090905
ауг
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Извини, но мне надо до сути быстро докопаться!

Range

Где?

основная сложность , чтобы данные эта функция схватила из диапзона ячеек!

Как?
...
Рейтинг: 0 / 0
В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
    #33094088
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
Public Sub X()
    Dim rng As Range
    Dim cel As Range
    Dim arr() As Variant
    Dim sum As Double
    Dim intI As Integer
    
    Set rng = Selection
    
    intI =  0 
    sum =  0 
    
    For Each cel In rng
        ReDim arr(intI)
        arr(intI) = cel.Value
        sum = sum + arr(intI)
        intI = intI +  1 
    Next cel
    MsgBox "Сумма ячеек: " & sum
End Sub
...
Рейтинг: 0 / 0
В надстройке создать функцию , которая бы суммировала числа в диапазоне ячеек
    #33120827
pashulka.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Если Вам нужна действительно пользовательская функция, то :

Public Function GetSumm(iRange As Range) As Double
GetSumm = Application.Sum(iRange)
End Function

Вызвать функцию можно например так : =GetSumm(C7:D9)

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


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