gérer la répétition mensuelle de tâches simples

Question

Bonjour,
Je cherche à soustraire automatiquement le 1er de chaque mois le chiffre d'une cellule du chiffre d'une autre cellule.
Concrètement, j'ai un prêt avec des mensualités de X, et un capital restant dû de Y.
X va rester constant, et Y va bien sûr diminuer de X le 1er de chaque mois jusqu'à zéro, moment où j'aurai remboursé le prêt.
ça doit pas être sorcier mais impossible de trouver la solution
Merci de votre aide à tous

Pierre

yg_be · Answer

bonjour Pierre, comment voudrais-tu déclencher cette opération?  par un bouton, automatiquement à l'ouverture du fichier, ?

Krystkpi · Answer

automatiquement à l'ouverture du fichier
merci !

yg_be · Answer

je propose ceci:
si ta feuille se nomme "pierre", et que tu as ton capital en A1 et ta mensualité en B1, ajoutons la date du dernier paiement en C1, et ajoutons ce code dans la feuille:
Option Explicit
Private Sub Workbook_Open()
Call pierre
End Sub
Private Sub pierre()
Dim p As Worksheet, avant As Date, cejour As Date
Set p = Sheets("pierre")
avant = p.[c1]
cejour = Date
If DateSerial(Year(avant), Month(avant), 1) < DateSerial(Year(cejour), Month(cejour), 1) Then
    p.[A1] = p.[A1] - p.[B1]
    p.[c1] = cejour
End If
End SubJe pense que cela fonctionnera, sauf si tu n'ouvres pas ta feuille pendant un mois.

Krystkpi · Answer

ok pour capital en A1 et mensualité en B1 mais que veut dire "dernier piment" en C1 ??
merci beaucoup en tout cas

Krystkpi · Answer

ok compris
j'essaye ASAP et reviens vers toi si pb
merci infiniment

Krystkpi · Answer

euh
j'ai oublié le principal: comment et où rentrer les 14 lignes de code (je sais, je suis pas doué...)

Gérer la répétition mensuelle de tâches simples

6 réponses

Newsletters