Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2010 Mettre en CAP du texte dans une macro

JeanM

XLDnaute Nouveau
Bonjour,

toujours et suite à ma demande d'hier qui a été résolue grâce à vous
je voudrais aussi mettre en capitale le mois qui s'affiche ensuite dans le corps du mail
en pièce jointe le code avec en surlignage ce qui doit s'afficher en capitale
J'ai vu la fonction Ucase mais trop débutant pour l'intégrer au code....
Merci d'avance a vous

JeanM
 

Pièces jointes

  • Macro Mois.pdf
    40.8 KB · Affichages: 6

JBARBE

XLDnaute Barbatruc
Bonjour sylvanu, Jean, tous,
peut-être un oubli de sylvanu ( espace )
VB:
text1 = "Bonjour %0A %0A Veuillez trouver la facture du mois de : " & " " & UCase(Format(Date, "mmmm")) & " " & " %0A"
 

Staple1600

XLDnaute Barbatruc
Bonjour le fil

Les deux solutions précédentes n'en sont pas si on en croit les Immortels

Faut donc faire dans le propre!
Application.Proper
VB:
Sub Test()
Dim strG$, Mois$
Mois = Format(Date, "mmmm")
strG = Application.WorksheetFunction.EncodeURL("Bonjour, Veuillez trouver la facture du mois de : " & Application.Proper(Mois))
MsgBox strG
'text1 =strG
End Sub
PS: J'ai utilisé EncodeURL par ce que j'ai lu des %0A
Si pas besoin alors adapter en conséquence
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…