Bonsoir,
Voici une façonparmi d' autreq.
*Coté conception
1°-Poses ta liste de choix sur tonDataGrid.
Propriété Visible=False
2°-Dans la page des propriétés du Datagrid,Onglet Disposition,
coches la propriété Button pour la colonne(champ)
de ton choix
*Coté code
Dans la
Sub DataGrid_ButtonClick(ByVal ColIndex As Integer)
Select Case ColIndex
Case :0 ' première colonne
Combo.Visible=True
Dim CCol As Column
Set CCol = DataGrid.Columns(ColIndex)
With Combo
.Top = DataGrid.RowTop(DataGrid.Row)
.Left = CCol.Left
.Width = CCol.Width
End With
Set CCol = Nothing
Combo.SetFocus
End Select
End Sub
Private Sub Combo_Click()
DataGrid.Col = 0 'toujours l' exemple 1° colonne
DataGrid.Text = Combo.Text
Combo.Visible=False
End Sub
Il faudra aussi penser à rendre tn Combo non visible
quand ton DataGrid reprend le focus sans avoir sélectionner
dans ton combo.
... Y'en a même qui disent qu'ils l'ont vu voler.