ListBox Filter

**rlinares67** · 11-23-2015, 05:03 PM

Hello, I have this code to populate one listbox but I want to put in it the data filter from sheet1 from carros number. Thanks

Chequeado Cambio
Carros Estado Fecha Gasolina Millas Nombre Aceite Pendiente

Private Sub UserForm_Initialize()
With ListBox1
.ColumnCount = 8
.ColumnWidths = "50;50;50;50;50;100;80;100"
.List = DataSource.Value
End With
TextBox1.Tag = 0
TextBox2.Tag = 1
TextBox3.Tag = 2
TextBox4.Tag = 3
TextBox5.Tag = 4
TextBox6.Tag = 5
TextBox7.Tag = 6
TextBox8.Tag = 7
SheetUpdated = True
End Sub

**vichopalacios** · 11-30-2015, 03:39 PM

Hi @rlinares67
I found that you thread has not been answered since a week
For me, your question isn't clear enough, so I'm guessing what you need.
Anyhow, you can find a lot of good ideas in the link bellow.
I've prepared a file with three different userforms that can help you

http://sitestory.dk/excel_vba/listboxes.htm

**rlinares67** · 12-15-2015, 01:22 PM

Thank you so much. Just one more help, how can I do to pick one the records from the 3rd option, edit it and save the changes back to the sheet?.

Thanks again and I'm waiting for your response.

**vichopalacios** · 12-15-2015, 10:09 PM

Hi @rlinares67

Starting from Form3, I added new buttons to your form
If you select a row, and press Edit, it shows you a new Form4
There you can edit the values of the selected row, and aceptar or cancelar
if you accept, the list in Form3 will be updated, and you can edit a new row

After that, you can Grabar and all the changes are pasted to the worksheet

I hope it solves your questions.

**rlinares67** · 12-16-2015, 09:31 AM

No attachment.

**vichopalacios** · 12-16-2015, 07:13 PM

There you have the file
I hope this time it was uploaded succesfully.

Vicho

**rlinares67** · 12-18-2015, 01:39 PM

Thanks for everything, but still I can't make this works for me (saving data to sheet2 ). I let you mi file, please take a look and fix my errors, I'm new with the userforms and VBA programming.