J'ai cr=E9=E9 un msflexgrid pour lire une base de donn=E9es.
Lorsque je clique sur l'une des lignes, j'aimerais copier=20
le contenu de la colonne 8 concernant cette ligne dans une=20
autre feuille de mon projet.
Je sais r=E9cup=E9rer le contenu de la cellule active ainsi=20
que le n=B0 de ligne (.row) mais je ne parviens pas =E0=20
r=E9cup=E9rer le contenu de la colonne 8 relative =E0 la ligne=20
s=E9lectionn=E9e.
Quelle est la propri=E9t=E9 pour indiquer le n=B0 de ligne et de=20
colonne (ex : cells(i,8) pour la cellule ligne 1, colonne=20
8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ? "lm" a écrit dans le message de news: 656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
a+
Jean-Pol DAVID
mailto:david.sa@skynet.be
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?
"lm" <anonymous@discussions.microsoft.com> a écrit dans le message de news:
656001c482da$b633b560$a501280a@phx.gbl...
Bonjour,
J'ai créé un msflexgrid pour lire une base de données.
Lorsque je clique sur l'une des lignes, j'aimerais copier
le contenu de la colonne 8 concernant cette ligne dans une
autre feuille de mon projet.
Je sais récupérer le contenu de la cellule active ainsi
que le n° de ligne (.row) mais je ne parviens pas à
récupérer le contenu de la colonne 8 relative à la ligne
sélectionnée.
Quelle est la propriété pour indiquer le n° de ligne et de
colonne (ex : cells(i,8) pour la cellule ligne 1, colonne
8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ? "lm" a écrit dans le message de news: 656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
Quelqu'un a-t-il une idée ?
Merci d'avance
lm
Salut,
C'est génial, tu m'a sortie d'un sérieux problème ! Merci beaucoup A+
-----Message d'origine----- Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" a écrit dans
le message de news:
656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
Quelqu'un a-t-il une idée ?
Merci d'avance
lm
.
Salut,
C'est génial, tu m'a sortie d'un sérieux problème !
Merci beaucoup
A+
-----Message d'origine-----
Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+
Jean-Pol DAVID
mailto:david.sa@skynet.be
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" <anonymous@discussions.microsoft.com> a écrit dans
J'ai créé un msflexgrid pour lire une base de données.
Lorsque je clique sur l'une des lignes, j'aimerais copier
le contenu de la colonne 8 concernant cette ligne dans une
autre feuille de mon projet.
Je sais récupérer le contenu de la cellule active ainsi
que le n° de ligne (.row) mais je ne parviens pas à
récupérer le contenu de la colonne 8 relative à la ligne
sélectionnée.
Quelle est la propriété pour indiquer le n° de ligne et de
colonne (ex : cells(i,8) pour la cellule ligne 1, colonne
8)
C'est génial, tu m'a sortie d'un sérieux problème ! Merci beaucoup A+
-----Message d'origine----- Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" a écrit dans
le message de news:
656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
Quelqu'un a-t-il une idée ?
Merci d'avance
lm
.
David
Bonjour,
Et si cela t'intersse, pour écrire directement dans MSFlexGrid :
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer) Select Case KeyAscii
Case vbKeyReturn, vbKeyTab 'vers cel suivante With MSFlexGrid1 If .Col + 1 <= .Cols - 1 Then .Col = .Col + 1 Else If .Row + 1 <= .Rows - 1 Then .Row = .Row + 1 .Col = 0 Else .Row = 1 .Col = 0 End If End If End With
Case vbKeyBack With MSFlexGrid1 'enleve l'éventuel dernier caractère If Len(.Text) Then .Text = Left(.Text, Len(.Text) - 1) End If End With
Case Is < 32 Case Else With MSFlexGrid1 .Text = .Text & Chr(KeyAscii) End With End Select
End Sub
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ? a écrit dans le message de news: 6b2a01c4838c$cb571b00$ Salut,
C'est génial, tu m'a sortie d'un sérieux problème ! Merci beaucoup A+
-----Message d'origine----- Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" a écrit dans
le message de news:
656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
Quelqu'un a-t-il une idée ?
Merci d'avance
lm
.
Bonjour,
Et si cela t'intersse, pour écrire directement dans MSFlexGrid :
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case vbKeyReturn, vbKeyTab
'vers cel suivante
With MSFlexGrid1
If .Col + 1 <= .Cols - 1 Then
.Col = .Col + 1
Else
If .Row + 1 <= .Rows - 1 Then
.Row = .Row + 1
.Col = 0
Else
.Row = 1
.Col = 0
End If
End If
End With
Case vbKeyBack
With MSFlexGrid1
'enleve l'éventuel dernier caractère
If Len(.Text) Then
.Text = Left(.Text, Len(.Text) - 1)
End If
End With
Case Is < 32
Case Else
With MSFlexGrid1
.Text = .Text & Chr(KeyAscii)
End With
End Select
End Sub
a+
Jean-Pol DAVID
mailto:david.sa@skynet.be
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ?
<anonymous@discussions.microsoft.com> a écrit dans le message de news:
6b2a01c4838c$cb571b00$a501280a@phx.gbl...
Salut,
C'est génial, tu m'a sortie d'un sérieux problème !
Merci beaucoup
A+
-----Message d'origine-----
Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+
Jean-Pol DAVID
mailto:david.sa@skynet.be
www.peintures-david.com
ICQ 28394733
--
Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" <anonymous@discussions.microsoft.com> a écrit dans
J'ai créé un msflexgrid pour lire une base de données.
Lorsque je clique sur l'une des lignes, j'aimerais copier
le contenu de la colonne 8 concernant cette ligne dans une
autre feuille de mon projet.
Je sais récupérer le contenu de la cellule active ainsi
que le n° de ligne (.row) mais je ne parviens pas à
récupérer le contenu de la colonne 8 relative à la ligne
sélectionnée.
Quelle est la propriété pour indiquer le n° de ligne et de
colonne (ex : cells(i,8) pour la cellule ligne 1, colonne
8)
Et si cela t'intersse, pour écrire directement dans MSFlexGrid :
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer) Select Case KeyAscii
Case vbKeyReturn, vbKeyTab 'vers cel suivante With MSFlexGrid1 If .Col + 1 <= .Cols - 1 Then .Col = .Col + 1 Else If .Row + 1 <= .Rows - 1 Then .Row = .Row + 1 .Col = 0 Else .Row = 1 .Col = 0 End If End If End With
Case vbKeyBack With MSFlexGrid1 'enleve l'éventuel dernier caractère If Len(.Text) Then .Text = Left(.Text, Len(.Text) - 1) End If End With
Case Is < 32 Case Else With MSFlexGrid1 .Text = .Text & Chr(KeyAscii) End With End Select
End Sub
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ? Quando ? a écrit dans le message de news: 6b2a01c4838c$cb571b00$ Salut,
C'est génial, tu m'a sortie d'un sérieux problème ! Merci beaucoup A+
-----Message d'origine----- Bonjour lm,
textecherche = MSFlexGrid1.TextMatrix
(MSFlexGrid1.MouseRow, 8)
a+ Jean-Pol DAVID mailto: www.peintures-david.com ICQ 28394733 -- Quis ? Quid ? Ubi ? Quibus auxiliis ? Cur ? Quomodo ?
Quando ?
"lm" a écrit dans
le message de news:
656001c482da$b633b560$ Bonjour,
J'ai créé un msflexgrid pour lire une base de données. Lorsque je clique sur l'une des lignes, j'aimerais copier le contenu de la colonne 8 concernant cette ligne dans une autre feuille de mon projet. Je sais récupérer le contenu de la cellule active ainsi que le n° de ligne (.row) mais je ne parviens pas à récupérer le contenu de la colonne 8 relative à la ligne sélectionnée. Quelle est la propriété pour indiquer le n° de ligne et de colonne (ex : cells(i,8) pour la cellule ligne 1, colonne 8)
