Mettre en gras en vba

  • Initiateur de la discussion Initiateur de la discussion Sophie11
  • Date de début Date de début

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 !

Sophie11

XLDnaute Occasionnel
Re bonjour 😛
Je ne sais pas comment mettre en gras la valeur de ma cellule A1
oDoc.Body = Range("A1").Value
Si quelqu'un a une idée? Merci par avance 🙂🙂🙂
 
Re : Mettre en gras en vba

Bonsoir Sophie11, re Jean-Marie 🙂,
Même si d'après son avatar, Sophie parait avoir un corps de rêve 😱, son Odoc.Body est plutôt un objet email (oDoc) dont on remplit le corps de message (.Body). Que veux-tu, mon bon Jean-Marie, on remplit le corps qu'on peux 😛...
Le problème, comme déjà vu sur nos Posts pas si lointain, est que le Body est en brut, donc pas d'enrichissement possible. Il faut donc passer par un HTMLBody pour mettre du gras.
Code:
oDoc.BodyFormat = olFormatHTML
oDoc.HTMLBody = "<HTML><body><b>" & Range("A1").Value & </b></body><HTML>"
devrait fonctionner.
Bonne soirée 😎
 
Re : Mettre en gras en vba

Re 🙂,
Jean-Marie, tu me connais trop bien, mais devant une jolie demoiselle comme ça, on aurait plus envie de jouer du String sur le Body, alors qu'à nos âge, tout ce qu'elle nous laisse, c'est du Range 😀...
A défaut le la faire réagir, je la ferai peut-être rougir 😛
Malheureusement, j'ai jeté un œil à ces précédents mail, et c'est du Lotus, je ne garanti pas l'HTMLBody que nous avions utilisés sur de l'OutLook 😱.
Bonne soirée 😎
 
Re : Mettre en gras en vba

Re


Monsieur JNP

Je tiens à préciser que contrairement à vous ma seule maitresse est la Cellule.

Et que les seules charmes qui émoustillent encore mes sens
sont la vision de lignes chaloupées de code VBA, avec des Déclarations osées.

La Femme en tant que telle ne contient pas assez de cellules
et n'est pas indentable ni commentable et ne peut en aucun cas
alimenter ma libibo depuis que je suis entré dans la Cellule.


D'ailleurs j'ai désactivé mes macros génitales à chaque ouverture de mon classeur intime.

Sophie11
JNP a résolu ton problème non ?
 
Re : Mettre en gras en vba

Effectivement c'est pour le corps d'un mail pour Lotus🙂 Et si je pourrais mettre du HTML dans ma macro ca serait vraiment le top (je maitre le langage html)
Donc en exécutant le code, j'ai un message d'erreur : Variable not defined 🙁 🙁

oDoc.BodyFormat = olFormatHTML
oDoc.HTMLBody = "<HTML><body><b>" & Range("A1").Value & "</b></body></HTML>"


Si vous avez une idée 😛 😛

ps: vous êtes trop drôle 😉
 
Re : Mettre en gras en vba

Re 🙂,
olFormatHTML est une variable définie par la référence OutLook (ol). Je ne connais pas la référence Lotus 😱.
Avec la saisie "intelligente" de VBA, quand tu tapes oDoc. VBA doit te proposer la liste des propriétés disponibles. Tu peux donc voir s'il existe BodyFormat ou quelque chose d'approchant. Après le " = ", il devrait te proposer les valeurs (loFormatHTML peut-être pour Lotus...).
De même pour HTMLBody qui pourrait être BodyHTML pour Lotus, et il se peux aussi que .BodyFormat ne soit pas obligatoire, vu que .BodyHTML suffit peut-être à le renseigner...
Désolé de ne pouvoir t'en dire plus, mais je n'utilise pas Lotus (très rare sur le forum aussi).
Bon courage 😎
 
Re : Mettre en gras en vba

Re 🙂,
Object est générique, non attaché à des classes... Pour OutLook, je déclare au début
Code:
Dim OLApplication As Outlook.Application, OLMail As Outlook.MailItem
Set OLApplication = CreateObject("Outlook.Application")
Set OLMail = OLApplication.CreateItem(OLMailItem)
donc mon OLMail. me donne toutes les propriétés...
Il faudrait peut-être essayer
Code:
Dim OLApplication As [B]Lotus[/B].Application, OLMail As [B]Lotus[/B].MailItem
Set OLApplication = CreateObject("[B]Lotus[/B].Application")
Set OLMail = OLApplication.CreateItem(OLMailItem)
pour voir si VBA te propose les classes... Il faudrait avoir l'accès à l'API de Lotus...
J'ai jeté un oeil sur le net, mais ça a l'air d'un joyeux bordel... Et ils ont l'air de dire que seul Object passe...
Bon courage 😎
 
Re : Mettre en gras en vba

Re 🙂,
Je suis vraiment désolé, je viens de reparcourir le web, et j'ai bien l'impression qu'HTML sous Lotus, c'est Mission Impossible 😱.
Beaucoup de questions, mais pas de réponses...
A tout hasard, tu peux peut-être essayer des balises RTF
Code:
{\rtf
 Bonjour
 \par
 Ceci est
 un petit {\b texte}.
 \par
 FIN
}
avec ton .Body de base.
Bon courage 😎
 
- 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éponses
43
Affichages
802
Réponses
7
Affichages
175
Réponses
3
Affichages
256
Retour