Microsoft 365 Problème lors réinitialisation

  • Initiateur de la discussion Initiateur de la discussion AIXELS
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

AIXELS

XLDnaute Occasionnel
Bonjour à tous les Amis du Forum.
Je reviens vers vous une fois de plus.
Mon problèmes est le suivant :
J'ai développé une application en m'inspirant de programmes que j'ai trouvés.
Le but de cette application est le suivi de la vente et le rendu de monnaie lors
d'un tournoi de football organisé par une association à but non lucratif.

Les saisies et rendus de monnaie fonctionnent bien.
Mais si je veux réinitialiser les données : effacer les anciennes données
la saisie n'est plus prise en compte.

Je vous joints le fichier.
Merci pour votre aide.
bien cordialement.
 

Pièces jointes

Bonjour,

Proposition :
VB:
Sub RENDRE_MONNAIE()
' Réinitialisation du rendu monnaie et achats
Dim Lastline As Integer

    Range("DEBIT").ClearContents
    Range("H1").ClearContents

    With Range("t_Ventes").ListObject
        If Not .DataBodyRange Is Nothing Then .DataBodyRange.Delete
    End With

    Application.Goto Range("t_Ventes").Resize(1, 1)

End Sub
Merci pour ta réponse @TooFatBoy
COPIER_ACHATS ne fonctionne pas.
il ne recopie pas les achats effectués.
Merci pour ton aide.
Bien cordialement.

VB:
Sub COPIER_ACHATS()
    Dim ZoneToCopy As Range
    With Sheets("Ventes").ListObjects("t_Ventes")
        Set ZoneToCopy = .DataBodyRange(.ListRows.Count, 1).Resize(, 7)
    End With

    With Sheets("Caisse")
        .Activate
        .Range("C6").Resize(7, 1) = Application.WorksheetFunction.Transpose(ZoneToCopy)

    End With


    Usf_RENDRE_MONNAIE.Show 0

End Sub
 
Bonsoir à tous.
Merci pour votre aide et vos réponses.
Il ne faut pas supprimer les saisies au fur et à mesure des achats.
Il faut garder l'historique, cela nous donnera les ventes effectuées.
Le rendu de monnaie fonctionne ainsi que la copie des ventes par ligne.

Mais il faut garder l'historique des saisies.
Par avance, merci pour votre aide.
Bien cordialement.
 
Ce que tu as fait jusqu'à présent est parfait.
Le seul problème, désolé, je me suis mal expliqué :
Il faut garder les saisies successives, ne pas les effacer.
Et la nouvelle saisie sous la ligne saisie précédemment

C'est ce qui permet d'afficher la recette au fur et à mesure des saisies.
Le cumul s'affiche de H3 à N3.
J'espère que j'ai été clair.
Je t'ai joint ton fichier avec le visu du résultat escompté.
Le reste, copie de la ligne saisie pour rendre la monnaie
et la monnaie fonctionnent très bien.
Merci pour ton aide.
Bien cordialement.
 

Pièces jointes

Ce que tu as fait jusqu'à présent est parfait.
Le seul problème, désolé, je me suis mal expliqué :
Il faut garder les saisies successives, ne pas les effacer.
Et la nouvelle saisie sous la ligne saisie précédemment

C'est ce qui permet d'afficher la recette au fur et à mesure des saisies.
Le cumul s'affiche de H3 à N3.
J'espère que j'ai été clair.
Je t'ai joint ton fichier avec le visu du résultat escompté.
Le reste, copie de la ligne saisie pour rendre la monnaie
et la monnaie fonctionnent très bien.
Merci pour ton aide.
Bien cordialement.
 

Pièces jointes

Aixels à dit:
C'est la dernière ligne saisie qu'il faut recopier dans
le tableau de la feuille tableau . Pour une nouvelle
saisie, passer à laligne en-dessous.
Moi je veux bien, mais il n'y a aucune feuille "tableau" !


Je ne vais pas m'user pendant des heures pour essayer de comprendre ce que tu ne veux toujours pas expliquer, donc je supprime mes messages et j'abandonne.
Bonne chance tout de même pour la suite.


Tschüss
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
724
Retour