Reformulation de fonction sql sous access

Le
Spiritspy
Bonjour,
Dans une base Access, je créé des dossiers et je désire les référencer via
un le format suivant Bureau2008-35 où le dernier numéro est compté depuis le
début de l'année en cours, enregistrer ce résultat dans mon champs
Num_Affaire et l'année du jour en même temps dans le champs Annee, ensuite
ouvrir une MsgBox en affichant le num de dossier
J'ai du rater quelque chose dans ce qui suis, je demande votre aide, je suis
certain d'y être presque.

Private Sub Creation_Dossier_Click()

Me.Requery

Dim sql As String
Dim dossier As String

'Comptage depuis le début de l'année
sql = "SELECT YEAR(Date_Ouverture) as Annee from T_SYD_Affaire, COUNT(N°) as
NbEnr From T_SYD_Affaire WHERE YEAR(Date_Ouverture)=YEAR(Date()) GROUP BY
YEAR(Date_Ouverture)"

' Définition du code dossier
dossier = "SELECT ('Bureau') & FORMAT(Date(Date_Ouverture),'yyyy')& sql FROM
T_SYD_Affaire"

Num_Affaire = dossier

MsgBox "([Num_Affaire].value) essai ", vbInformation, "Dossier Créé"

End Sub


Merci d'avance à tous.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Spiritspy
Le #17546791
Je rajoute tout de même des explications sur mes termes utilisés ...

T_SYD_Affaire --> la table avec laquelle je travaille
Date_Ouverture --> date de création du dossier Date() auto
Annee --> l'année en cours à la création qui doit être créé par la sql ou
autre si je trouve l'idée
Num_Affaire --> Champs devenant le numéro de dossier.

J'espère que c'est plus clair.
Publicité
Poster une réponse
Anonyme