Sumar Una Columna Especifica De Un ListBox

Estimados amigos mi pregunta es la siguiente: ¿Cómo puedo mediante una macro sumar los valores de una columna en particular de un ListBox que tiene 7 columnas?
De acuerdo a la imagen seria lo siguiente: Si no selecciono ningún proveedor que me de el total de la columna "saldo" de todos los proveedores que muestra la lista, si elijo uno y aplico la selección de los días, que me de el total que corresponda a la columna "saldo" en el textbox2. Gracias por anticipado

1 respuesta

Respuesta
8
La siguiente rutina se ejecuta al clic en algún botón (podes cambiar esto y asignarla en otro evento)
Private Sub CommandButton1_Click()
For i = 0 To ListBox1.ListCount - 1     'ajustar nbre del control ListBox
tot = tot + Val(ListBox1. List(i, 2)) 'ajustar nbre y nro de col, aquí el 2 representa la 3er col
Next i
TextBox2 = tot   
End Sub
Sdos y si todo quedó resuelto no olvides finalizar la consulta.
Elsa
PD) Te recomiendo mi manual de Formularios, allí encontrarás todo lo que necesitas conocer de cada control...
Gracias por su oportuna y precisa respuesta. Ha funcionado muy bien;sin embargo, me ha quedado un cabo suelto:
He puesto la macro dentro de "Private Sub ComboBox1_Change()" y hace su trabajo, lo que no hace es actualizar el total cuando selecciono cualquiera de los botones de opción.
Mi pregunta es: tendría que agregar la macro en cada una de las macros de los botones de opción o se puede hacer todo de una vez, ¿osea actualizar el proveedor las opciones de los días y que de el total de acuerdo a esos parámetros?
Gracias de antemano
Cuando seleccionas el proveedor todavía no seleccionaste el optionbutton, por lo que yo no colocaría las instrucciones allí sino en cada option o en un botón de Aceptar, que iría luego de seleccionar el proveedor y algún option.
Si no querés colocar otro botón +, deberá ser en cada option button o solo en algún evento del ListBox, como puede ser Change o Enter.
Sdos
Elsa
PD) Te recomiendo mi manual de Formularios, allí encontrarás todo lo que necesitas conocer de cada control...

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Qué tal chicos! , Cómo sumar ¿Valores de un listbox en un textbox automáticamente?

Tengo un listbox con 18 columnas, el cual lleno con datos según el código elegido en un combobox, mi intención es que al llenarse el listbox, también se haga automáticamente la suma total de los valores de la columna 18 en un textbox.
1 respuesta

Adicionar Datos a listbox de varias columnas

Y de antemano muchas gracia por el tiempo que dedican a mi pregunta. Mi problemas es el siguiente estoy trabajando con listbox para cargar datos de excel en vba y no soy programador. Mejor dicho si muy inquieto pero tengo este inconveniente. Me pasa...
1 respuesta

Items de un listbox con varias columnas a otro

Agradecería si me pueden ayudar en pasar los datos de un listbox1 con 6 columnas a otro listbox2, pero que pase los datos de las 6 columnas y a su vez borrar el item del texbox1 seleccionado/s. He encontrado este código por la red, pero me parece que...
1 respuesta

Crear ListBox en forma Horizontal

Todo expertos Tengo el siguiente código Private Sub Workbook_Open() ActiveSheet.ListBox1.Clear For Each h In Sheets If h.Name >= "Saldos dia actual" Then ActiveSheet.ListBox1.AddItem h.Name End If Next End Sub Este me arroja los nombres de las hojas...
1 respuesta

Seleccionar elemento especifico de un listbox de excel

Ok, tengo un formulario con un listbox, el cual se carga automáticamente desde "x" rango de una hoja al abrir o cargar el formulario. Este listbox es de varias columnas. También tengo un textbox. Ahora si: necesito que, al escribir un dato en el...
2 respuestas

Cargar datos a un listBox desde una hoja de Excel

Tengo un userform con un listBox de cuatro columnas la cual abro estando en la hoja 1 y quisiera que me cargue los datos que se encuentran en la hoja 2 comprendida en un rango de B18 a E47 (son un total de 30 filas y 4 columnas) trabajo en excel...
1 respuesta

Filtrar por fecha y mostrar varias columnas en listbox de excel

Me han ayudado mucho con sus ejemplos pero me tope con uno que no encuentro tengo un formulario con dos calendarios uno de inicio y otro para darle fin a la busqueda, lo que queiro es que me cargue las demas columnas de la hoja en el listbox pero no...
1 respuesta

Mensaje tipo MsgBox("XXXXX") si después de dar click en Botón Cmd el ListBox está vacío.

Tengo este código y con el busco información de una tabla, esa información se carga en un ListBox y lo que deseo es que me muestre primero, todos los datos que coincidan con el criterio de búsqueda y segundo, dado el caso en que no haya una...
1 respuesta

Como conseguir el ancho automáticos de columnas cuando insertas datos de otras fuentes como puedan ser: otras excel, bancos

Se trata de crear una macro de tal forma que al insertar en una excel columnas de distintas anchura, mediante una macro, los anchos se correspondan con la longitud de los datos insertados. Por ejemplo: casa / melocotón/ bicicleta /...
1 respuesta

Exportar listbox a Excel

El día de ayer formulé una pregunta, respecto de una aplicación en la que estoy intentando trabajar, un experto me respondió de inmediato (Elsa Matilde), de acuerdo a la respuesta entregada, pude desarrollar todas las sugerencias entregadas excepto...
1 respuesta