Foros aprenderaprogramar.com
Didáctica y divulgación de la programación

Hola,
he estado buscando información de como filtrar en un datagridview mediante un combobox. Pero no consigo encontrar lo que busco. Mi problema es el siguiente:
los datos del datagridview los importo desde un hoja Excel.
en el Form tengo un datagridview con mis datos , un combobox y un BindingSource1.
Mi idea es que según lo que escriba dentro del combobox, se filtre por los datos que hay en la columna 2 del datagridview. He estado buscando que en las propiedades del dataviewgrid, en el datasource debo seleccionar BindigSource1. Pero cuando hago esto me aparece el error:

el índice estaba fuera del intervalo. Debe ser un valor no negativo e inferior al tamaño de la colección. Nombre del parámetro:index

y entonces no se carga el datagridview con los datos de la hoja Excel.

Adjunto mi base de datos por si alguien pudiera darme algún consejo. Gracias.

Hola,
el proyecto lo he hecho con Visual Basic 2010 Express.
Lo que intento es que al seleccionar una opción del combobox (Mate/Opaca/Transparente) me filtre los datos en el datagridview y únicamente me aparezcan las filas que contiene la palabra seleccionada en el combobox.
El error me lo marca en la línea
Dim dv as Dataview=dt.Default.view
y el mensaje de error que aparece es "No se controló NullReferenceException",

Tengo una hoja Excel con muchos datos y lo que estoy intentado  es poder conseguir es que desde dos ordenadores distintos conectados en red, se puedan ver los datos de la hoja Excel mediante un programa hecho con Visual Basic. Mi duda es si ¿para hacer esto puedo seguir almacenando mis datos en la hoja Excel, o quizás sería mejor almacenarlos en Acces or SQL? O quizás lo estoy haciendo todo mal?
Saludos y gracias por la ayuda.
Vuelvo a adjuntar los datos. He puesto la hoja Excel que estoy utilizando para hacer las pruebas.

Hola,
me sigue saliendo error en la misma línea, pero esta vez aparece:
"No sé controló SystemErrorException"

¿Qué quiere decir esto?
Saludos,

Hola,
cuando elimino el código private sub combobox1,  no me sale ningún error.

Hola,
he copiado el código, pero ahora aparece el siguiente mensaje de error:
'Referencia a objeto no establecida como instancia de un objeto'
Aparece el formulario, pero el datagridview, no se carga con los datos de la hoja Excel.

Hola,
he eliminado uno de los dv. Ahora no sale aparece ningún error. Cuando ejecuto el formulario, aparece el dataviewgrid con la tabla Excel y cuando selecciono un valor del combobox, ya no indica ningún error en el código, pero lo que sucede es que no filtra la tabla. Es decir, selecciono los valores del combobox pero la tabla sigue exactamente igual.
¿Podría ser un problema de las propiedades del dataviewgrid? ¿Hay que relacionar el dataviewgried con el bindersource de algún modo? Porque estoy probando a seleccionar en la propiedad DataSource del dataviewgrid, el nombre de Bindersource1, pero así tampoco consigo nada.

No, lo siento. Se queda igual.
¿el problema podría ser que estoy utilizando Excel en vez de una base de datos?

Hola Ogramar,
¡ya filtra bien!. He probado el último código que me has enviado pero volvía a salir error en bs.Filter = "CLASE = ComboBox1.SelectedValue". Pero al final lo he dejado igual que antes, sólo que he cambiado el código que hay dentro del
Private sub commadbuton1_selectedIndexChanged. Abajo pongo como ha quedado el código finalmente.

Muchas gracias por todo. A mí sola no me abría salido.
Sólo me gustaría hacerte una pregunta antes de dar el tema por cerrado.
¿Sería mejor tener todos los datos en una base de datos de Access o MySql en vez de en un Libro Excel? Lo digo por si a la hora de programar en vb 2010 sería más fácil.
Saludos,

Imports System.Data
Imports System.Data.OleDb

Public Class Form1

    Private Property stConexion As String

    Dim dv As New DataView
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Try
            Dim stConexion As String = ("Provider=Microsoft.ACE.OLEDB.12.0; Data Source= 'C:\Users\rmontañes\Desktop\Prueba.xlsx';  Extended Properties=""Excel 12.0;Xml;HDR=YES;IMEX=2"";") 'este es el codigo que funciona para office 2007 y 2010
            Dim cnConex As New OleDbConnection(stConexion)
            Dim Cmd As New OleDbCommand("Select * From [Hoja1$]", cnConex)
            Dim Ds As New DataSet
            Dim Da As New OleDbDataAdapter

            Dim dt As New DataTable


            Dim bs As BindingSource = BindingSource1

            cnConex.Open()
            Cmd.Connection = cnConex
            Da.SelectCommand = Cmd
            Da.Fill(Ds)
            dv.Table = Ds.Tables(0)
            Me.DataGridView1.Columns.Clear()
            Me.DataGridView1.DataSource = dv
            Me.DataGridView1.Columns(1).HeaderText = "CLASE"
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")


        End Try
    End Sub


    Private dt As DataTable
    Dim SQL As String
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

        Try

            SQL = "CLASE like '%" + ComboBox1.Text.Trim + "%'"

            dv.RowFilter = SQL

            DataGridView1.DataSource = dv

            DataGridView1.Update()

        Catch EX As Exception

            MsgBox(EX.Message, 48)

        End Try
    End Sub
End Class


Mi idea es que lo puedan utilizar más personas, así que pasaré los datos del libro Excel a una base de datos.
Saludos,