A voir également:
- Gérer la répétition mensuelle de tâches simples
- Windows 11 barre des taches a gauche - Guide
- Comment remettre la barre des tâches à la normale ? - Guide
- Changer la couleur de la barre des taches - Guide
- Gerer stockage google - Guide
- Fiche de pointage mensuelle excel - Télécharger - Tableur
6 réponses
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
bonjour Pierre, comment voudrais-tu déclencher cette opération? par un bouton, automatiquement à l'ouverture du fichier, ?
yg_be
Messages postés
23541
Date d'inscription
Statut
Contributeur
Dernière intervention
Ambassadeur
1 584
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:
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.
ok pour capital en A1 et mensualité en B1 mais que veut dire "dernier piment" en C1 ??
merci beaucoup en tout cas
merci beaucoup en tout cas
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question