Autres [RÉSOLU] Problème de formule ou de format

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 !

un internaute

XLDnaute Impliqué
Bonjour le forum
Dans le fichier joint je voudrais faire afficher colonne A le mois et colonne C le jour mois année en tapant le montant colonne B
Comme fait actuellement je tape le montant colonne B et je tape la date colonne C
Ça affiche le mois colonne A
Merci pour vos éventuels retours
Cordialement
 

Pièces jointes

Bonjour le forum
Dans le fichier joint je voudrais faire afficher colonne A le mois et colonne C le jour mois année en tapant le montant colonne B
Comme fait actuellement je tape le montant colonne B et je tape la date colonne C
Ça affiche le mois colonne A
Merci pour vos éventuels retours
Cordialement
Bonjour,
A tester, mais cela n'affichera que la date du jour
 

Pièces jointes

Bonjour M12
C'est une façon et je n'y avait pas pensé.
Ça fonctionne et c'est ce que je voulais
Mais en tapant la réponse je viens de me rendre compte que si je veux modifier la date colonne C je ne peux pas.
Peut-être faire une colonne supplémentaire pour pouvoir modifier la date?
Pour l'instant je ne vois pas
Macro?
En tout cas merci à toi M12
Cordialement
 

Pièces jointes

Bonjour Internaute, M12,
Si on utilise des formules avec Aujourdhui alors demain les cellules seront remises à jour avec la date de demain.
Pour figer ces cellules, il n'y a guère que le VBA qui inscrit les dates en "dur".
En PJ un essai avec :
VB:
Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [B4:B10000]) Is Nothing Then
        Application.ScreenUpdating = False
        If Target = "" Then     ' Si le montant a été éffacé, on efface le mois et la date
            Cells(Target.Row, Target.Column - 1) = ""
            Cells(Target.Row, Target.Column + 1) = ""
        Else                    ' Sinon on inscrit mois et date
            Cells(Target.Row, Target.Column - 1) = UCase(Format(Date, "mmmm"))
            Cells(Target.Row, Target.Column + 1) = UCase(Format(Date, "dddd dd mmmm yyyy"))
        End If
    End If
Fin:
End Sub
Les dates se mettent à jour quand on écrit en colonne B, et s'effacent si la valeur en B est éffacée.
 

Pièces jointes

- 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ésolu(e)
Microsoft 365 DATEDIF
Réponses
11
Affichages
199
Réponses
12
Affichages
381
Retour