Erreur 3163 dans formulaire access

Version imprimable

09/03/2018, 15h30
sdouai

Erreur 3163 dans formulaire access
Bonjour,

N'étant un professionnel d'Access, j'ai un petit soucis lors de la saisie d'un formulaire saisissant un bon de commande: l'erreur est la suivante:

erreur 3163 "le champ est trop petit pour accepter la quantité de données que vous voulez ajoute. Essayez d'insérer ou de coller moins de données."

Ma base contient 4 tables: Produits, Fournisseurs, commandes et ligne de commande.

J'ai par ailleurs créé en VBA
Code:

1 2 3 4 Private Sub N_produit_AfterUpdate() Me![Nom_produit] = Me![N_produit].Column(1) Me![Prix_unitaire_HT] = Me![N_produit].Column(2) End Sub
Afin de pouvoir en saisissant le code produit, avoir le nom et le prix

Ma base n'est pas très grosse, je ne comprends pas ce message d'erreur.

Auriez vous une idée? Par avance merci
09/03/2018, 15h37
marot_r
Bonjour.

Le message semble pointer sur un problème avec tes champs de données :
Code:

1 2 Me![Nom_produit] Me![Prix_unitaire_HT]
Quels sont la taille et le type de chacun des champs ?

Par exemple ton champ Nom_Produit pourrait être dimensionné à 5 caractères et que tu essayes d'y mettre 6 ou plus.
Pour le champ Prix_unitaire, peut-être que Access ne voit pas Me![N_produit].Column(2) comme un nombre mais comme du texte.

A+
09/03/2018, 16h04
sdouai
Citation:
Envoyé par marot_r

Bonjour.

Le message semble pointer sur un problème avec tes champs de données :

Code:

1 2 Me![Nom_produit] Me![Prix_unitaire_HT]

Quels sont la taille et le type de chacun des champs ?

Par exemple ton champ Nom_Produit pourrait être dimensionné à 5 caractères et que tu essayes d'y mettre 6 ou plus.
Pour le champ Prix_unitaire, peut-être que Access ne voit pas Me![N_produit].Column(2) comme un nombre mais comme du texte.

A+
Nom_produit: format texte, taille du champ 255
Prix_unitaire_HT: Format monétaire euro
N_produit: Format numauto
09/03/2018, 16h38
sdouai

[QUOTE=sdouai;10072314]Nom_produit: format texte, taille du champ 255
Prix_unitaire_HT: Format monétaire euro
N_produit: Format numauto

En fait je pense qu'il faut dimensionner les champs dans VBA mais je ne sais pas comment faire.

Le problème se situe dans le sous formulaire: j'ai crée une requête simple de type sélection sur la table produit (3 champs) puis ai créé un code Vba pour avoir le nom et le prix du produit en saisissant le numéro du produit. Ma base est toute petite, j'ai 18 bons de commande;

A+
Sdouai
09/03/2018, 16h41
titi95

Bonjour

N_Produit représente quoi exactement : formulaire, zone de texte, champ de table... ?

Titi95
09/03/2018, 16h43
sdouai

Citation:

Envoyé par titi95

Bonjour

N_Produit représente quoi exactement : formulaire, zone de texte, champ de table... ?

Titi95

N_produit représente un champ de la table COMMANDE lié à la table PRODUIT

A+
09/03/2018, 16h57
sdouai

1 pièce(s) jointe(s)

Citation:

Envoyé par sdouai

N_produit représente un champ de la table COMMANDE lié à la table PRODUIT

A+
09/03/2018, 17h10
titi95

Pourquoi l'utilises-tu avec Column si c'est un NumAuto de la table ?

Titi95
09/03/2018, 17h12
marot_r
Bonjour.

Les contrôles textes dans un formulaire ont une limite d'environ 32000 caractères donc pas de soucis de ce côté là.
- Nom_produit: format texte, taille du champ 255
- Prix_unitaire_HT: Format monétaire euro
- N_produit: Format numauto
Il ne semble pas y avoir de problème de taille du récepteur donc c'est probablement la source le problème.

Pour faire un test, modifie ton code comme suit :
Code:

1 2 3 4 5 Me![Nom_produit] = "Test" msgbox len(Me.[N_produit].Column(1)) Me![Prix_unitaire_HT] = 1.1234 msgbox len(Me.[N_produit].Column(2))
Cela va valider 2 choses :
1. Est-ce que tu peux bien mettre une valeur dans le champ ?
2. Quelle est la longueur que voit Access ?
Quel est le résultat du test ?

A+
09/03/2018, 19h24
sdouai
Citation:
Envoyé par marot_r

Bonjour.

Les contrôles textes dans un formulaire ont une limite d'environ 32000 caractères donc pas de soucis de ce côté là.

Nom_produit: format texte, taille du champ 255
Prix_unitaire_HT: Format monétaire euro
N_produit: Format numauto

Il ne semble pas y avoir de problème de taille du récepteur donc c'est probablement la source le problème.

Pour faire un test, modifie ton code comme suit :

Code:

1 2 3 4 5 Me![Nom_produit] = "Test" msgbox len(Me.[N_produit].Column(1)) Me![Prix_unitaire_HT] = 1.1234 msgbox len(Me.[N_produit].Column(2))

Cela va valider 2 choses :

Est-ce que tu peux bien mettre une valeur dans le champ ?
Quelle est la longueur que voit Access ?

Quel est le résultat du test ?

A+
Désolé j’etais Pris, je n’ai pas eu le temps de faire le test.
Je vais le faire et je te tiendrais au courant.
A+