Bonjour,
Quelqu'un pourrait-il me donner la commande VBA pour se d=E9placer dans
une table? C'est-=E0-dire comment passer d'une colonne =E0 une autre (pour
le m=EAme enregistrement) dans une boucle FOR. Je n'arrive pas =E0 trouver
la commande pour changer de colonne, donc de champs.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Fabien
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
Salut,
Pour moi : Impossible de coller du VBA 'derriere' une vue en table. C'est possible si tu passes par un formulaire en continu. For I = 0 to NbrControle-1 Me.controls(I).setFocus netx i
Bonjour,
Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans
une table? C'est-à-dire comment passer d'une colonne à une autre (pour
le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver
la commande pour changer de colonne, donc de champs.
Merci d'avance à tous
cordialement
Salut,
Pour moi : Impossible de coller du VBA 'derriere' une vue en table.
C'est possible si tu passes par un formulaire en continu.
For I = 0 to NbrControle-1
Me.controls(I).setFocus
netx i
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
Salut,
Pour moi : Impossible de coller du VBA 'derriere' une vue en table. C'est possible si tu passes par un formulaire en continu. For I = 0 to NbrControle-1 Me.controls(I).setFocus netx i
Gilbert
Bonjour,
Voici un exemple de ce que tu peux faire
Sub test() Dim i As Long Dim Db As DAO.Database Dim rst As DAO.Recordset
Set Db = CurrentDb Set rst = Db.OpenRecordset("Select * from Table1") Do While Not rst.EOF For i = 0 To rst.Fields.Count - 1 Debug.Print rst.Fields(i).Name, rst.Fields(i).Value Next i rst.MoveNext Loop
Set rst = Nothing Set Db = Nothing End Sub
-- Cordialement,
Gilbert
"DAMS" a écrit dans le message de news:
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
Bonjour,
Voici un exemple de ce que tu peux faire
Sub test()
Dim i As Long
Dim Db As DAO.Database
Dim rst As DAO.Recordset
Set Db = CurrentDb
Set rst = Db.OpenRecordset("Select * from Table1")
Do While Not rst.EOF
For i = 0 To rst.Fields.Count - 1
Debug.Print rst.Fields(i).Name, rst.Fields(i).Value
Next i
rst.MoveNext
Loop
Set rst = Nothing
Set Db = Nothing
End Sub
--
Cordialement,
Gilbert
"DAMS" <dams27_56@hotmail.com> a écrit dans le message de news:
1191311529.806970.138020@d55g2000hsg.googlegroups.com...
Bonjour,
Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans
une table? C'est-à-dire comment passer d'une colonne à une autre (pour
le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver
la commande pour changer de colonne, donc de champs.
Sub test() Dim i As Long Dim Db As DAO.Database Dim rst As DAO.Recordset
Set Db = CurrentDb Set rst = Db.OpenRecordset("Select * from Table1") Do While Not rst.EOF For i = 0 To rst.Fields.Count - 1 Debug.Print rst.Fields(i).Name, rst.Fields(i).Value Next i rst.MoveNext Loop
Set rst = Nothing Set Db = Nothing End Sub
-- Cordialement,
Gilbert
"DAMS" a écrit dans le message de news:
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
DAMS
On 2 oct, 12:29, "Gilbert" wrote:
Bonjour,
Voici un exemple de ce que tu peux faire
Sub test() Dim i As Long Dim Db As DAO.Database Dim rst As DAO.Recordset
Set Db = CurrentDb Set rst = Db.OpenRecordset("Select * from Table1") Do While Not rst.EOF For i = 0 To rst.Fields.Count - 1 Debug.Print rst.Fields(i).Name, rst.Fields(i).Value Next i rst.MoveNext Loop
Set rst = Nothing Set Db = Nothing End Sub
-- Cordialement,
Gilbert
"DAMS" a écrit dans le message de news:
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
Merci pour ces infos je vais voir ce que je peux faire.
On 2 oct, 12:29, "Gilbert" <ZZZZgilbert...@tiscali.fr> wrote:
Bonjour,
Voici un exemple de ce que tu peux faire
Sub test()
Dim i As Long
Dim Db As DAO.Database
Dim rst As DAO.Recordset
Set Db = CurrentDb
Set rst = Db.OpenRecordset("Select * from Table1")
Do While Not rst.EOF
For i = 0 To rst.Fields.Count - 1
Debug.Print rst.Fields(i).Name, rst.Fields(i).Value
Next i
rst.MoveNext
Loop
Set rst = Nothing
Set Db = Nothing
End Sub
--
Cordialement,
Gilbert
"DAMS" <dams27...@hotmail.com> a écrit dans le message de news:
1191311529.806970.138...@d55g2000hsg.googlegroups.com...
Bonjour,
Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans
une table? C'est-à-dire comment passer d'une colonne à une autre (pour
le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver
la commande pour changer de colonne, donc de champs.
Merci d'avance à tous
cordialement
Merci pour ces infos je vais voir ce que je peux faire.
Sub test() Dim i As Long Dim Db As DAO.Database Dim rst As DAO.Recordset
Set Db = CurrentDb Set rst = Db.OpenRecordset("Select * from Table1") Do While Not rst.EOF For i = 0 To rst.Fields.Count - 1 Debug.Print rst.Fields(i).Name, rst.Fields(i).Value Next i rst.MoveNext Loop
Set rst = Nothing Set Db = Nothing End Sub
-- Cordialement,
Gilbert
"DAMS" a écrit dans le message de news:
Bonjour, Quelqu'un pourrait-il me donner la commande VBA pour se déplacer dans une table? C'est-à-dire comment passer d'une colonne à une autre (pour le même enregistrement) dans une boucle FOR. Je n'arrive pas à trouver la commande pour changer de colonne, donc de champs.
Merci d'avance à tous cordialement
Merci pour ces infos je vais voir ce que je peux faire.