Respecter règle d'orthographe: de ou d' suivant mois
Bonsoir,
N'étant pas très fort en vba, je sollicite votre aide. Voilà, je voudrai mettre par exemple en D2 une phrase concaténer avec C1 contenant une date au format MOIS-ANNEE, toute en respectant les règles orthographiques.
Range("D2") = "Rapport mois de " & Range("C1") .Value Comment puis-je faire pour avoir au lieu de "de", "d" avec l'apostrophe (d'), pour les mois: Avril, Août et Octobre et avoir le première lettre majuscule?
par exemple pour janvier (fév,mars, mai, juin, juill, sept, nov, déc): Rapport mois de Janvier
et pour Avril (Août,Octobre): Rapport mois d'Avril
En vous remerciant par avance.
Cordialement,
Bonsoir
Essaye
Range("D2") = "Rapport mois " & IIf(Month(Range("C1")) = 4 Or Month(Range("C1")) = 8 _
Or Month(Range("C1")) = 10, "d' ", "de ") & Application.Proper(Format(Range("C1"), "mmmm"))Amicalement
Nad
Bonsoir nad,
Je te remercie beaucoup pour ta célérité. Ton code fonctionne bien et ce par rapport à ce que j'avais demandé dans mon premier post. mais j'avais oublié de mentionner que l'année doit aussi apparaitre. j'ai rajouté "yyyy" et ça fonctionne très bien.
Encore merci.
Bonne soirée.
Cordialement,