Fichier DBF ACCESS

Bonjour,

Pour modifier les valeurs dans un fichier DBF, je n'ai trouvé la solution que de l'ouvrir avec ACCESS.

J'ai beaucoup de valeur a modifier dans ce fichier mais je ne connais pas le language vba sur access. Autant sur EXCEL, j'ai la macro de prete, autant sur ACCESS cela ne marche pas :roll:

Mon problème est le suivant : dans mon champs "id_stat" de ma table "ass_cana_brt", j'aimerais changer les cellules qui ont la valeur "EN SERVICE" par "1".

J'ai beaucoup d'autres valeurs a modifier mais je ne sais pas comment le traduire en vba access.

Voici mon code en vba excel

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub convEUshapeDepart() Dim myRange As Range Dim Cell As Range Set myRange = Range("B2:B2000") For Each Cell In myRange If Cell.Value = "EN SERVICE" Then Cell.Value = 1 End If Next Cell   End Sub

---

Je vous remercie par avance.

Julien

Citation:

---

Pour modifier les valeurs dans un fichier DBF, je n'ai trouvé la solution que de l'ouvrir avec ACCESS

---

Déjà tu as trouvé un outil très puissant pour modifier tes données.
Maintenant il faut apprendre à s'en servir !

Pour modifier le champs "id_stat" de la table "ass_cana_brt", il faut utiliser le requeteur (QBE), pour cela tu fais Insérer /requete, puis tu sélectionnes la table à modifier ... etc
Tu peux faire une requête de sélection au départ, puis quand tu maitrises un peu tu fais la requete UPDATE.
SURTOUT, avant de faire des modif, il faut faire une sauvegarde de tes données initiales. Car dans Access, toute modif faite sur une table est irréversible.

Bonne suite

Bonjour,
il est effectivement possible de gérer un DBF avec Excel; mais je te rappel que DBASE est l'inventeur du SGBD alors un peut de respect!

Code:

---

1 2 3

Sub convEUshapeDepart() CurrentDb.Execute "UPDATE [ass_cana_brt] IN 'C:\Myrep'[dBASE IV;] SET [id_stat] = '1' WHERE [id_stat]='EN SERVICE';" End Sub

---

Merci beaucoup cela marche tres bien !!