Selectionner des lignes d'un DGV et mettre CES lignes 'selectioné' dans un autre DGV

Bonjour tout le monde,

Vu ma question ça montre que je suis débutant dans ce monde, et bin oui :D

Ainsi , je voudrais sélectionnés des données d'un DGV et affichés les lignes sélectionnés dans un autre DGV d'un autre form.

je rempli le premier DGV du form4, ainsi:

Code:

---

1 2 3 4 5 6 7 8 9 10

con.Open() com.Connection = con com.CommandText = ("select * from fournisseur where nom_fournisseur='" & Me.Nom_fournisseurComboBox.SelectedValue & "'") dr = com.ExecuteReader While dr.Read Form45.DataGridView1.Text = dr.GetValue(1)   End While dr.Close() con.Close()

---

Pour la selection des lignes et les affichés dans un autre DGV , je mis ceci :

Code:

---

1 2 3

Me.DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect Me.DataGridView1.Rows(0).Selected = True Form5.DataGridView1.Datasource = Me.DataGridView1.Datasource

---

Mais ca m'affiche Tout les données que le 1er DGV, sans prendre en considération ma sélection , ce qui ne pas le cas souhaité;
je veux juste les données des lignes sélectionnés soient affichés sur le 2em DGV.

Alors qu'est qui cloche, et qu'est ce que je dois ajouter ou modifier pour affiché ma sélection sur le 2em DGV ?

Merci d'avance

Bonjour,

C'est normal que cela t'affiche tout, vu que le Datasource est le même :

Code:

---

Form5.DataGridView1.Datasource = Me.DataGridView1.Datasource

---

Cependant, les données (lignes de ton DGV1) que tu souhaites sélectionner, c'est via la souris pendant l'exécution, ou ceux sont des lignes que tu définis au préalable et qui ne changent pas ?

Parce que à ce moment là, tu fais 2 requêtes, l'une qui rempit ton DGV1, et l'autre qui remplit ton DGV2.

Par contre si c'est sur sélection de la souris, il va falloir récuperer la collection des lignes sélectionées.

merci methylene

Citation:

---

Par contre si c'est sur sélection de la souris, il va falloir récupérer la collection des lignes sélectionnées.

---

C'est effectivement comme ca, je voudrais sélectionnées les lignes avec la souris et la touche Ctrl ( s' il y'a plusieurs sélection )

Donc que dois-je faire ?

Et bien tu fais un bouton "Sélectionner",

Dans l'évènement Click de ce boutton, tu fais une boucle sur les lignes sélectionnées:

Code:

---

1 2 3 4 5

For each DgvR as Datagridviewrow in me.MonDatagridview.selectedRows   Copy(DgvR)   Next

---

Ou copie, copie ta ligne dans l'autre DGV.

PS, il faut écrire la procédure copy. Pour la méthode... tout dépends de ce que tu veux faire, tu peux même y arriver tout seul je pense.

Un truc du genre :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Public Sub Copy(ByVal DgvRow As DataGridViewRow, ByVal i As Integer)   Datagridview2.Rows.Add() Dim j As Integer = 0   For Each DGVCell As DataGridViewCell In DgvRow.Cells   Datagridview2.Rows(i).Cells(j).Value = DGVCell.Value j = j + 1   Next     End Sub

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Private Sub Btsel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btsel.MouseClick   Dim ligne As Integer = 0   For Each DgvR As DataGridViewRow In Me.Datagridview1.SelectedRows   Copy(DgvR, ligne) ligne = ligne + 1   Next   End Sub

---

merci les amis ,
methylene, il me genere une erreur de ce type :

Citation:

---

Impossible d'ajouter par programme des lignes à la collection de lignes DataGridView lorsque le contrôle est lié aux données.

---

dans cette partie :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Sub Copy(ByVal DgvRow As DataGridViewRow, ByVal i As Integer) Form8.DataGridView2.Rows.Add() Dim j As Integer = 0 For Each DGVCell As DataGridViewCell In DgvRow.Cells Form8.DataGridView2.Rows(i).Cells(j).Value = DGVCell.Value j = j + 1 Next

---

Lol, ben peut-être que si tu enlève cette ligne là que tu as mis :

Code:

---

Form5.DataGridView1.Datasource = Me.DataGridView1.Datasource

---

Bien sur que j'ai enlevé cette ligne ;

J'ai vu dans des forum qu'il faut ajouter ces 2 lignes

Code:

---

1 2 3

Dim dr As DataRow = Form5.DataGridView2."NewRow" // mais je ne trouve pas ce newrow dans les propriétés de DGV Form8.DataGridView2.Rows.Add(dr)

---

Et dans un autre forum , je vu :

Citation:

---

La solution est en fait de ne pas ajouter la ligne dans de DataGridView mais dans ta BindingSource de cette façon :
BindingSource.AddNew()

---

Mais quand je fais Form8.FournisseuremployefrsBindingSource.AddNew()

mais j'ai l'erreur suivante encore :

Citation:

---

Impossible d'ajouter par programme des lignes à la collection de lignes DataGridView lorsque le contrôle est lié aux données.

---

Alors je suis bloqué ,:(

Le NewRow concerne la duplication de datarow pour les datatables pas les datagridview.

Donc bien sur, ca ca ne marche pas:

Code:

---

Dim dr As DataRow = Form5.DataGridView2."NewRow"

---

Doublement faux car tu ce que tu ecris reviens a dire:

Code:

---

Datarow = DataGridViewRow

---

Ensuite si il te dis ca:

Citation:

---

mpossible d'ajouter par programme des lignes à la collection de lignes DataGridView lorsque le contrôle est lié aux données.

---

C'est que que quelque part tu as mis:

Code:

---

DatagridView2.Datasource =

---

Fais une recherche dans ton code... Ctrl+F, sans oublier de rechercher dans le texte caché.

Sinon le code de départ devrait marcher

merci ,
mais vous aviez raison y'avai DGV2.datasource dans le Form8 ( parcque je les associés à la BD)
et donc je le supprimé cette ligne

mais j'ai une autre erreur maintenant :

Citation:

---

L'index était hors limites. Il ne doit pas être négatif et doit être inférieur à la taille de la collection. Nom du paramètre : index

---

Je ne dirais rien lol, et encore je t'ai maché le travail :/

On va aller au plus simple, il n'y a pas de raison que ce soit l'index des lignes qui déconne, donc cela doit être l'index des cellules.

Conclusion, as-tu le même nombre de colonnes sur ta DGV1 et sur ta DGV2 ?

Je vais même poussé le vice plus loin, étant donné que le DGV1 est lié à un DataSource tu n'as donc pas créés de colonnes, mais vu que le DGV2 n'est pas lié à un datasource, il faut créer des colonnes et les ajouter à ton DGV2.

Je parierais que l'erreur viens de là.

Donc :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

Dim Column1 As New DataGridViewTextBoxColumn Dim Column2 As New DataGridViewTextBoxColumn ... ....   With Column1 .Name = "Column1" 'à titre d'exemple .Width = 50 'à titre d'exemple .HeaderText = "Tontitre1" 'le titre en haut de ta colonne End With   With Column2 .Name = "Column2" 'à titre d'exemple .Width = 80 'à titre d'exemple .HeaderText = "Tontitre2" 'le titre en haut de ta colonne End With   .... ..... . . ......   DataGridView2.Columns.Add(Column1, Column2, ...)

---

Et cela devrait fonctionné, en supposant que tu n'aies que des colonnes texte.