Discussion :

[Udutronik]

Bonjour, Je débute en VBA et n'arrive pas a voir comment faire l'action suivante:

J'ai une table : Ventes
Qui contient les champs : AnneeID, MoisID, ClientID, VentesCumul, VentesMois

Chaque mois, je recois du comptable les résultats cumulés, que j'entre dans le systeme. Seulement voila, ce sont les ventes cumulées depuis le début de l'année et je n'ai pas le montant de ventes du mois courant.

Ce que je veux : Mettre a jour le champs VentesMois

Conceptuellement, voici comment je vois ce que je devrais faire:

1) Selectionner tout dans la table Ventes

2) pour chaque "Record" (ligne), déterminer le cumul du mois passe

Donc en SQL ca donne:

Code SQL :

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

1
2
3
4
5
select VentesCumul as VentesMoisDernier
from ventes
WHERE AnneeID=AnneeID 
ClientIDClientID
MoisID=(MoisID-1);

3) Puis, si il existait une entrée, mettre a jour mon champ VentesMois=VentesCumul-VentesMoisDernier

sinon VentesMois=VentesCumul

*****
Est-ce que c'est clair? Comment vous feriez ca en VBA? A moins qu'il n'y ait
des solutions plus simples...

Merci beaucoup!

[seb92400]

Hi,

Bienvenue à toi...

Si j'ai bien compris : VentesMois = MontantDonnéParComptable - VenteCumul

Il s'agit donc d'une simple soustraction... En simplifié : Un formulaire avec trois champs : Le cumul général (celui qui est dans ta table), le cumul donné par le comptable, et la différence (le mois)...

Déjà, dis-moi si c'est bien ça...

[Udutronik]

Bonjour, et merci pour prendre le temps de m'aider!

Oui, c'est une -simple- soustraction :

VentesMois=MontantDonneParComptable - VentesCumul_MoisDernier

J'ai beaucoup d'écritures (500 pas mois) et j'arrive pas à avoir de résultats corrects, dans les cas ou :

1) Le client en est a son premier achat (donc VentesCumul_MoisDernier n'existe pas)
2) Je suis en début d'année fiscale (meme situation qu'en 1) )

des idées?

[subnox]

1) Le client en est a son premier achat (donc VentesCumul_MoisDernier n'existe pas)

Tu peux mettre un simple

Code :

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

If ventesCumul_MoisDernier = "" then

car le champ doit exister quand même dans ta table non!?

2) Je suis en début d'année fiscale (meme situation qu'en 1) )
des idées?

Tu fais une variable qui vaut l'année en cours et tu gère non seulement plus le mois, mais le mois et l'année

[seb92400]

Hi,

1) Le client en est a son premier achat (donc VentesCumul_MoisDernier n'existe pas)
2) Je suis en début d'année fiscale (meme situation qu'en 1) )

Regarde l'aide d'Access avec la fonction Nz (Nul To Zero)... Ca pourra t'aider...