Discussion :

[thierry007]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Columns(1).DefaultCellStyle.Format = DataGridViewComboBoxDisplayStyle.ComboBox

devrait je pense me donner une combobox dans ma colonne , mais il n'en est rien

Et comment remplir des valeurs dans le combobox

Quelqu'un peut m'aider

Merci

[Shadam]

voici un exemple d'une colonne en comboBox que j'ai définie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Dim colonneLot As New DataGridViewComboBoxColumn
        colonneLot.DropDownWidth = AutoSizeMode.GrowOnly
        DGVPertes.Columns.Insert(3, colonneLot)
        colonneLot.HeaderText = "Lot de Production"
        colonneLot.Name = "colonneLot"
        colonneLot.ToolTipText = "Numéro du lot pour cette panne"
        colonneLot.DataSource = Me.BindingSourceCBLotDGV
        colonneLot.AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill
        colonneLot.SortMode = DataGridViewColumnSortMode.NotSortable

Et pour le comportement en comboBox "classique" :
sur l'évènement EditingControlShowing

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If CType(sender, DataGridView).CurrentCellAddress.X = DGVLigneLot.Columns("colonneLot").DisplayIndex Then
                    Dim cb = getcb(e.Control)
                End If

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Private Function getcb(ByVal e As Control) As ComboBox
        Dim cb As ComboBox = CType(e, ComboBox)
        If Not cb Is Nothing Then
            cb.DropDownStyle = ComboBoxStyle.DropDownList
            cb.AutoCompleteSource = AutoCompleteSource.ListItems
            cb.AutoCompleteMode = AutoCompleteMode.SuggestAppend
        End If
        Return cb
    End Function

En espérant que ça puisse t'aider

[thierry007]

Bien grand merci, cela m'a aidé beaucoup, et pour d'autres parties aussi