Funcion para obtener el total de una columna listbox

[Hector Barajas]

Necesito crear una funcion que me obtenga el total de una columna en un listbox. Pero que yo le pueda pasar como parametros el formulario, el nombre del listbox y el numero de columna y me devuelva como resultado el total del listbox. No se si los parametros se deben pasar como texto y de que forma.

Mas o menos con esta estructura. Les agradezco de antemano su ayuda.

Public Function totalcol(ByVal columna As Integer, ByVal formulario As TextBox, ByVal control As TextBox)

end function

[Antoni]

Hola:

Te dejo una función para sumar cualquier columna de cualquier ListBox de cualquier formulario.

Saludos

Función sumar columnas ListBox.xls