devrait je pense me donner une combobox dans ma colonne , mais il n'en est rienCode:.Columns(1).DefaultCellStyle.Format = DataGridViewComboBoxDisplayStyle.ComboBox
Et comment remplir des valeurs dans le combobox
Quelqu'un peut m'aider
Merci
Version imprimable
devrait je pense me donner une combobox dans ma colonne , mais il n'en est rienCode:.Columns(1).DefaultCellStyle.Format = DataGridViewComboBoxDisplayStyle.ComboBox
Et comment remplir des valeurs dans le combobox
Quelqu'un peut m'aider
Merci
voici un exemple d'une colonne en comboBox que j'ai définie :
Et pour le comportement en comboBox "classique" :Code:
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
sur l'évènement EditingControlShowing
Code:
1
2
3 If CType(sender, DataGridView).CurrentCellAddress.X = DGVLigneLot.Columns("colonneLot").DisplayIndex Then Dim cb = getcb(e.Control) End If
En espérant que ça puisse t'aider ;)Code:
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
Bien grand merci, cela m'a aidé beaucoup, et pour d'autres parties aussi :ccool: