Problème de formule

coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention   -  
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention   -
https://www.cjoint.com/c/ECwcGg0IXOU

Bonjour,
J'ai un problème avec une formule
Détails
J'ai une feuille "811"
J'ai une feuille "Dépôt"

Dans ma feuille "811"
A1 Date du jour
F9 $800.00
B18 (Dû) =E19
C18 (Loyer) Formule Si(jour($A$1)=1 ; $F$( ; "0.00$)
E18 (Solde) Somme(B18+C18-D18)
A18 etD18 j'ai copier et coller des valeurs de ma feuille de dépôt

Feuille"Dépôt"
E5 Date du jour
F17 (Montant du dépôt) $800.00

Le s'enregistre avec une macro dans ma feuille "811"

Mon problème c'est qu'en C18 lorsque c'est le premier de chaque mois le montant s'affiche dans toute mes lignes en C
Je ne sais pas quoi faire pour remédier a ce problème
Merci pour votre aide
Coudonc
A voir également:

6 réponses

Mytå Messages postés 2973 Date d'inscription   Statut Contributeur Dernière intervention   953
 
Salut le Forum

Merci de joindre un fichier en utilisant https://www.cjoint.com/
et recopie le lien fourni dans ton prochain message.

Mytå
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Bonsoir
Désolé je suis nouvelle mais ça n'excuse pas donc voici le lien je l'ai ajouté a mon message
Merci pour cette mise au point
Coudonc
0
Raymond PENTIER Messages postés 58989 Date d'inscription   Statut Contributeur Dernière intervention   17 353
 
Bonjour Coudonc.

En C18 tu fais afficher le texte "0,00 $" à la place de la valeur numérique 0 ; c'est pourquoi le message #VALEUR! apparait en E18 ; et c'est aussi pour-quoi tu as remplacé cette formule par 0 dans les cellules suivantes de C !

Accessoirement, en E18 il est superflu d'ajouter la fonction SOMME ; il te suffit d'écrire =B18+C18-D18

Salutations à tous deux.
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Merci pour ton aide, mais mon problème majeur c'est lorsque le premier de chaque mois arrive mon montant qui est en F9 dvrait s'incirire en C18 Mais la il n'inscrit dans toute mes collonnes C et le 2 du mois il s'efface.
J'ai fait la correction de ma formule de somme Merci pour tes conseilles.
Coudonc
0
Raymond PENTIER Messages postés 58989 Date d'inscription   Statut Contributeur Dernière intervention   17 353 > coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
As-tu remplacé "0,00 $" par 0 ?
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour, Raymond
J'ai fait la correction que tu m'as demandé, Mais mon problème est toujours là.
Mon montant ce répéte sur toutes les lignes.

Merci, un peu en retard pour ma réponse mais j'apprécie beaucoup votre aide

Coupdonc
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Bonjour,

déjà commence par apporter la modif proposée par Raymond que je salue mais d'après ce que je comprends ne résoudra pas ton problème qui ne pourra être solutionné que par VBA si tu as quelques notions
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour Mike-31

j'ai apporté la correction proposée par Raymnond et en effet mon problème n'est pas résolue.
Et non je n'ai pas beaucoup de notions de VBA.
Merci de t'attarder a mon problème.

Coupdonc
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

met à notre disposition en nouveau lien de ton fichier mais cette fois avec tes macros contrairement au lien de ton fichier de ta demande initiale que l'on voit ce que l'on peut faire
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
https://www.cjoint.com/c/ECAbK6bZ0YJ

Bonsoir Mike
Voici le lien espérant le tout correct je suis novice avec ton ça ne sois pas trop décu de mon travail

Merci beaucoup pour ton travail
Coupdonc
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Raymond PENTIER Messages postés 58989 Date d'inscription   Statut Contributeur Dernière intervention   17 353
 
Bonjour Coupdonc.

Nous n'arriverons jamais à rien si tu t'amuses à faire des fantaisies, sans appliquer les solutions qu'on te donne !

Je t'ai expliqué au post #3 "En C18 tu fais afficher le texte "0,00 $" à la place de la valeur numérique 0 ; c'est pourquoi le message #VALEUR! appa-rait en E18".
Je t'en ai demandé confirmation en écrivant au post #5 "As-tu remplacé "0,00 $" par 0 ?" et tu as répondu au post #7"J'ai fait la correction que tu m'as demandé" ; tu l'as re-confirmé au post #8 ...
Or je constate que as remplacé le texte "0,00 $" par le texte "0" au lieu du chiffre 0 : Les guillemets transforment en effet une valeur numérique en un texte alphabétique ! Personne ne te l'avait encore dit ?
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour Raymond
Désolé pour l'envoie non corrigé mais j'ai bien fait la correctio que tu m'as demandé Je n'ai pas envoyé le fichier sur le quel je travail seulement la version avant et j'avais omis de faire la correction avant de vous l'envoyer
Je peux comprendre ta frustration mais j'avais suivi tes recomendations et je suis en train de faire ceux envoyé par Mike-31

Merci et triste de t'avoir déçu
Coupdonc
0
Mike-31 Messages postés 18405 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

effectivement si tu ne mets pas en pratique ce que l'on te dit il sera impossible de continuer.

en ce qui me concerne remplace ton code de la macro Sauvegarde par ce code allégé

Sub Sauvegarder()
Application.CutCopyMode = False
Sheets("811").Rows("18:18").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Sheets("811").Range("B19:C19").Copy
Sheets("811").Range("B18").PasteSpecial Paste:=xlPasteFormulas
Sheets("811").Range("E19").Copy
Sheets("811").Range("E18").PasteSpecial Paste:=xlPasteFormulas
Application.CutCopyMode = False
Sheets("811").Range("A18") = Sheets("Dépôt").Range("E5")
Sheets("811").Range("D18") = Sheets("Dépôt").Range("F17")
End Sub

si j'interprète tes tableaux, tu veux saisir plusieurs données sur la feuille "Dépôt" et en un clic les copier sur la feuille "811", si c'est cela, le code Sauvegarder n'est pas complet

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.
0
coupdonc Messages postés 26 Date d'inscription   Statut Membre Dernière intervention  
 
Merci Mike
Je vais je vais faire ce que tu me dis .
Je travail sur ça la semaine prochaine

Merci encore et je te dit plus tard comment tout va aller

Coupdonc
0