Discussion :

[dede_bo]

Bonjour,

J'ai crée une petite base de donnée sur l'astronomie. Très simple.



Cette base contient 3 tables:
Catalog : Contient toutes les données
Catalog_Type: Type d'objet (planètes, galaxies, nébuleuses, etc.)
Catalog_Name: Certains objets font partie d'un catalogue. Comme le catalogue Messier, NGC ou IC.

Rien de compliqué.

La table "Catalog":



La table "Catalog" contient un champ (de type "memo") qui reçoit la description de mon objet.
Le texte est en 2 langues (Anglais / Français) séparé par des traits d'union.

Le formulaire:



Comme vous le voyez, j'autorise le formulaire à pouvoir ajouter, éditer et supprimer des enregistrements



Le text box "Catalog_Description" est directement lié au champ "memo" de la table. Je ne passe pas par une requête.
Je vous montre toutes les propriétés du champ. De plus, aucune macro n'est écrite sur ce champ.



Voilà pour la description.


Maintenant passons au problème.


La mise à jour du champ mémo me génère une erreur.



Qu'est-ce que j'essaie de faire :



Lorsque j'utilise google traduction pour traduire le texte Anglais et que je copie le résultat, je reçois une chaine de caractère numérique (je pense à de l'hexa) à la place de l'apostrophe ( ' )
Donc, j'utilise "CTRL + H" pour remplacer cette chaîne par le bon caractère. Cela fonctionne



Mais quand je veux enregistrer les modifications, je reçois cette erreur





Je ne sais pas quoi faire !
Quelqu'un aurais t'il des idées ?
Merci d'avance
André

[marot_r]

Bonjour.

De mon expérience, le [Ctrl][H] de Access est un peu capricieux.

Je te suggère de faire une requête de mise à jour pour et d'utiliser la fonction Replace().
Elle est facile à utiliser, fiable et cela va te permettre d'automatiser tes changements pour ne pas avoir à les faires à la main à chaque fois.

Le SQL est quelque chose comme :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

UPDATE TaTable SET TaTable.TonChamp = Replace(TaTable.TonChamp,"UnAncienTexte","UnNouveauTexte");

Cela va faire le remplacement sur tous les enregistrements de ta table.

Si tu as peu de code tu peux faire une requête pour chacune des substitutions.
Si tu as plus de 4 ou 5, envisage d'utiliser une table de substitution et du code VBA qui appelle une requête paramétrée car je ne crois pas qu'on puisse le faire avec une seule requête et une jointure.

Si mes propos te paraissent absconds, n'hésite pas à demander des précisions ou explications plus détaillées.

A+

[dede_bo]

Bonjour,

Merci d'avance de votre aide. J'ai utilisé votre idée mais un peu différemment.
J'ai ajouté un bouton sur le formulaire



Et derrière, j'ai ajouté le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub bt_replace_Click()
    If Me.Catalog_description <> "" Then
        Me.Catalog_description = Replace(Me.Catalog_description, "\u0027", "'")
    End If
End Sub

Et cela fonctionne bien.
Encore merci

André

[marot_r]

Bonjour et bonne idée plus simple que ma requête.

Si tu considères le sujet clos, merci d'appuyer sur le bouton en bas de discussion.

A+

[dede_bo]

Bonjour

Avis au modérateur,
J'ai pour habitude d'attendre un jour ou deux (max 1 semaine) avant de clôturer la discussion.
La raison en est très simple. Il est possible que la personne qui donne la solution aimerais donner quelques éventuel commentaires.
Si je clôture directement, il ne le sait pas.

Ce n'est pas un oubli de ma part.

André

[marot_r]

Bonjour.

Ce n'est pas un oubli de ma part.

On était donc dans la catégorie de "tu ne considérai pas le sujet clos."

Belle journée.

A+

[dede_bo]

Bonjour,

Oui la discussion était finie. Mais j'ai pensé que vous vouliez encore mettre un petit commentaire !
Donc, j'ai attendu un peu avant de vouloir mettre la discussion en "résolu".

Mais .. bon ...
Si cela doit se faire immédiatement !

Je trouve cela domage

André

[marot_r]

Pas du tout, tu peux fermer la discussion quand tu veux.

Là tu attendais des réponses supplémentaires il était donc logique de le laisser ouvert.

Mon commentaire n'était qu'un simple rappel car il arrive que des discussions restent ouvertes, notement avec les nouveaux membres, alors que tout est dit.

A+

[dede_bo]

Bonjour,
Vous avez raison ...
Mais depuis quelques années, il n'y a pas que les nouveaux qui oublient ...

Les plus anciens aussi (je suis ici depuis 2015), cela m'arrive aussi d'oublier. Aussi par fainéantise.

Voilà. je pense en rester là.
Nous avons passer un bon moment agréable à parler, et de bonnes idées constructive.

Aux plaisir
André