Modifier Eléments d'une table

Bonjour j'utilise un code VBA pour modifier ma table access, et j'utilise le codes suivant, seulement il modifie toujours la première ligne, comment lui faire dire de modifier que la ligne qui contien tel "N° de séquence" Merci.

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim Matable Set MaTable = CurrentDb.OpenRecordset("DataTech", dbOpenDynaset) With Matable   .Edit !Produit = txtproduit.value !blablabla = blablabla.value .Update .Requery End With

---

Je pense qu'il fait rajouter quelque part un critère de sélection mais ou ?
Merci de m'aider
Adrien

bonjour adrien.gendre

tu peux modifier ta proc comme suit:

Code:

---

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

Dim Matable as DAO.Recordset Dim strSqlMaTable as String Dim NumSequence   NumSequence = inputbox("N° de Sequence à modifier")   strSqlMaTable = "SELECT * FROM DataTech WHERE Numero de Sequence= " & NumSequence   Set MaTable = CurrentDb.OpenRecordset(strSqlMaTable)   With Matable .Edit .Fields("Produit") = txtproduit.value .Fields("blablabla") = blablabla.value .Update End With

---

Remarque : si le numéro de sequence est alpha il faut les '

exemple

Code:

---

WHERE Numero de Sequence= '" & NumSequence & "'"

---

A+

Jeannot

Ok Merci Beaucoup Jeannot45

Bonjour Jeannot45 il me dit trop peu de paramètre sur la ligne, 1 Attendu.

sur cette ligne la :

Code:

---

Set MaTable = (CurrentDb.OpenRecordset(strSQLMaTable)

---

re,

Peux tu me dire de quel type est le N° de Sequence (alpha ou numérique)

Jeannot

Les séquences sont de type 070101 (Année 2007 Mois Janvier 1ère séquence de l'année) mais dans un format Text pour garder le zéro au début. Mais ce n'est pas là le problème je pense car j'ai adapté ton code a une autre fonction et ici c'est un mois en String que je vais chercher et j'ai une erreur sur Set maTable

Remarque que dans ta syntaxe il y aurait un problème de parenthèses

Soit tu écris :

Code:

---

Set MaTable = (CurrentDb.OpenRecordset(strSQLMaTable))

---

Soit tu écris :

Code:

---

Set MaTable = CurrentDb.OpenRecordset(strSQLMaTable)

---

A+

Jeannot

oui c'est une erreur de frape dans le forum dsl j'ai bien la syntaxe :

Code:

---

Set MaTable = CurrentDb.OpenRecorset(strSQLMaTable)

---

En fait plus simplement mais plus barbare je fait sa avec des requêtes SQL :

Code:

---

DoCmd.RunSQL ("UPDATE Mensuelle SET [Relevé D'EAU] = " & txtComptEau.Value & " WHERE [Mois] = modlistMois.Value & ";")

---

...Etc Avec les différents champs
Seulement il me demande un paramètre je rentre septembre il modifie la valeur dans la ligne septembre je met avril il modifie la bonne valeur mais dans la ligne avril. Je lui rentre bien un paramètre jcomprend pas

re,

Il te faudrait peut-être modifier ta syntaxe :

Code:

---

DoCmd.RunSQL ("UPDATE Mensuelle SET [Relevé D'EAU] = " & txtComptEau.Value & " WHERE [Mois] = '" & modlistMois.Value & "'")

---

A+

Jean

C'était une erreur de recopie encore ... sauf que il fallait bien enlever les ";" à la fin. Merci de ta patience ^^
A+
Adrien

re,

Pas de problème on est là pour s'entr'aider

Jeannot