Problème types de données dans variable

Bonsoir a tous
Etant novice dans la matière, je vous de demande de l'aide :D
J'essaye de faire une base de stock sur l'exemple: gestion-de-stock de claudeleloup
Voici le code que je voudrais modifier

Code:

---

1 2 3 4

Public Function SortiesADate(Article As Long, DateAng As Date) As Single SortiesADate = Nz(DSum("sortieQuant", "tSorties", _ "format(SortieDate,""yyyymmdd"")<=" & Format(DateAng, "yyyymmdd") & " and tArticlesFK=" & Article), 0) End Function

---

Ma question est:
Dans ma table puis je mettre tArticlesFK comme type de donnée en texte court en non en numérique
Car le code marche qu'avec le type de données numerique

J'ai essayer de mettre

Code:

---

Article As String

---

et tArticlesFK de ma table en texte court et j'ai un message d'erreur sur type de donnée

Ma raison est que si je dois insérer une lettre, comment faire?
Une Idée
Merci

bonsoir,
ton explication est un peu confuse.
Actuellement, quel est le type de ton champ tArticlesFK ?
si il est de type texte, il faut en tenir compte dans le code et mettre des apostrophes ou des guillemets dans la partie WhereCondition:

Code:

---

1 2 3 4

Public Function SortiesADate(Article As String, DateAng As Date) As Single SortiesADate = Nz(DSum("sortieQuant", "tSorties", _ "format(SortieDate,""yyyymmdd"")<=" & Format(DateAng, "yyyymmdd") & " and tArticlesFK='" & Article & "'"), 0) End Function

---

Bonjour
Merci ça marche

Pour être plus clair, mon champ tArticlesFK est du texte court et le code ne fonctionnait qu'avec un champ numérique.
je voulais avoir la liberté de mélanger lettres et nombres pour tArticlesFK pour la compréhension a la lecture.


Milles excuses pour mon premier charabia.


merci et bon Week end
:coucou: