Bonjour,

Je voudrais ajouter une colonne avec une checkbox dans mon datagridview en 4 ème position.

Donc pour ajouter une colonne avec checkbox

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 
        Dim colToCheck As New DataGridViewCheckBoxColumn
        DataGridPoste.Columns.Add(colToCheck)
Pour le moment j'ai :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
 Me.DataGridPoste.ColumnCount = 7
        Me.DataGridPoste.Font = New Font("Microsoft Sans Serif", 8, FontStyle.Bold)
        Me.DataGridPoste.Columns(0).Name = "Poste vacant"
        Me.DataGridPoste.Columns(0).Width = 300
        Me.DataGridPoste.Columns(1).Name = "CV"
        Me.DataGridPoste.Columns(1).Width = 80
        Me.DataGridPoste.Columns(2).Name = "Lettre"
        Me.DataGridPoste.Columns(2).Width = 80
        Me.DataGridPoste.Columns(3).Name = "Divers"
        Me.DataGridPoste.Columns(3).Width = 80
         Me.DataGridPoste.Columns(4).Name = "Interne"
        Me.DataGridPoste.Columns(4).Width = 70
        Me.DataGridPoste.Columns(5).Name = "Politique"
        Me.DataGridPoste.Columns(5).Width = 70
        Me.DataGridPoste.Columns(6).Name = "Spontanée"
        Me.DataGridPoste.Columns(6).Width = 70
Comment faire pour transformer ma colonne 4 en colonne checkbox par programmation ???

Bon j'ai fait ainsi:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
        Me.DataGridPoste.ColumnCount = 4
        Me.DataGridPoste.Font = New Font("Microsoft Sans Serif", 8, FontStyle.Bold)
        Me.DataGridPoste.Columns(0).Name = "Poste vacant"
        Me.DataGridPoste.Columns(0).Width = 300
        Me.DataGridPoste.Columns(1).Name = "CV"
        Me.DataGridPoste.Columns(1).Width = 80
        Me.DataGridPoste.Columns(2).Name = "Lettre"
        Me.DataGridPoste.Columns(2).Width = 80
        Me.DataGridPoste.Columns(3).Name = "Divers"
        Me.DataGridPoste.Columns(3).Width = 80
        Dim col4ToCheck As New DataGridViewCheckBoxColumn
        Dim col5ToCheck As New DataGridViewCheckBoxColumn
        Dim col6ToCheck As New DataGridViewCheckBoxColumn
        col4ToCheck.Width = 70
        col4ToCheck.HeaderText = "Interne"
        col5ToCheck.Width = 70
        col5ToCheck.HeaderText = "Politique"
        col6ToCheck.Width = 70
        col6ToCheck.HeaderText = "Spontanée"
        DataGridPoste.Columns.Insert(4, col4ToCheck)
        DataGridPoste.Columns.Insert(5, col5ToCheck)
        DataGridPoste.Columns.Insert(6, col6ToCheck)
Mais quand je clic dedans rien ne se passe(pas de petit v ==> vert(peut etre faut il convertir en boolean ??))

D'avance merci