Discussion :

[moussaouiassur]

Bonjour,

je souhaiterais dans les cellules de la colonne M "date d'encaissement" insérer une formule qui renvoie la date du jour au moment de laquelle le reste à la charge de mon client est devenu = 0 (au lieu de la saisir manuellement).

sachant que mes clients règlent leurs dettes en plusieurs versements (jusqu'à 5 versements mensuels) , je vous prie donc de me proposer une solution automatique qui me permet à chaque consultation de mon fichier de savoir à quel jour exactement mon client a solder sa situation comptable.

N.B :
- Je suis nul en vba
- J'ai déjà poster le problème sur un autre forum mais j'ai pas encore résolu mon problème
- La formule =si(L2=0;aujourdhui;"") ne m'est pas utile du moment qu'elle renvoie la date du jour de chaque consultation de mon fichier (donc variable) ENCAISSEMENTS CLIENTS 2014.xlsx

[QuestVba]

Bonjour,

Effectiment c'est un problème. Donc manuellement, tu bloques ta date avec "CTRL ;".

Sinon, tu mets un module vba dans ta feuille. Le code suivant va agir quand tu indiques dans la plage A1:A5 une valeur égale à 0 > ajout de la date dans la colonne B même ligne.

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A5")) Is Nothing Then
If Target = 0 Then
Target.Offset(0, 1) = Date
Else
Target.Offset(0, 1) = ""
End If
End If
End Sub

[Menhir]

Je suis nul en VBA

Etant donné les tutoriels de qualité qu'on trouve sur ce site, c'est un handicap qui peut être corrigé en quelques heures.