Сумма столбца ListBox

[R Dmitry]

Как правильнее получить сумму, допустим 5 столбца, отобранных значений в ListBox1?

[ELE-COM]

Вставить в ListBox1 значение
=SUM(E[1])
где Е - название столбца.

[R Dmitry]

Сообщение от ELE-COM

Вставить в ListBox1 значение
=SUM(E[1])
где Е - название столбца.

мне нужно в VBA извиняюсь что сразу не объяснил

[doober]

 Function Summ_ListBox1_5_Column() As Double
Dim s_umm As Double
For n = 0 To ListBox1.ListCount - 1
s_umm = s_umm + ListBox1.List(n, 4)
Next
 Summ_ListBox1_5_Column = s_umm
End Function

[R Dmitry]

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

 Function Summ_ListBox1_5_Column() As Double
Dim s_umm As Double
For n = 0 To ListBox1.ListCount - 1
s_umm = s_umm + ListBox1.List(n, 4)
Next
 Summ_ListBox1_5_Column = s_umm
End Function

да спасибо уже сам разобрался