Text align to the right Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
k
kobibh2
Jeune membre
Jeune membre
Messages : 12
Inscrit le : 9 juillet 2019

Message par kobibh2 » 5 août 2019, 11:07

Hello everyone :)

I have a VBA code for sending an Excel sheet as a PDF.
To the file I add text.

I have a problem with the text because I need it to be on the right (Hebrew language).

After an extensive search on the Internet I did not find a solution.

I would appreciate your help,
Kobi

That's part of the code:
SendTo = ActiveSheet.Cells(3, 3)

    If FileName <> "" Then
        RDB_Mail_PDF_Outlook FileNamePDF:=FileName, _
                             StrTo:=ActiveSheet.Cells(47, 3), _
                             StrCC:="", _
                             StrBCC:="", _
                             StrSubject:="שכר עידוד", _
                             Signature:=True, _
                             Send:=False, _
                             StrBody:="<H3><B>...לכבוד</B></H3><br>" & SendTo & _
                                      "<body>מצורף דוח שכר עידוד לעיונך" & _
                                      "<br><br>" & "בברכה תחום שכר עידוד</body>"
Doc1.docx
(267.63 Kio) Téléchargé 4 fois
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 15'077
Appréciations reçues : 900
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 5 août 2019, 11:58

Hello kobibh2

For each paragraph, use this sentense instead of <br>
Don't forget to terminate with </p>
<p align="right">This is some text in a paragraph.</p>
Hope this will help you.

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
k
kobibh2
Jeune membre
Jeune membre
Messages : 12
Inscrit le : 9 juillet 2019

Message par kobibh2 » 5 août 2019, 13:45

HII Steelson,
first TY
Unfortunately I was unable to complete what you recommended (I only succeeded on the title).
I would be happy if you could fix it.

StrBody:="<H3><B> in honor of </B></H3><br>" & SendTo & _
"<body>TEXT TEXT TEXT TEXT " & _
"<br><br>" & "End of TEXT </body>"



SendTo a variable
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 15'077
Appréciations reçues : 900
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 5 août 2019, 16:35

Try this
StrBody:="<H3  align="right"><B> in honor of </B></H3><p  align=""right"">" & SendTo & "</p>" _
"<p  align=""right"">TEXT TEXT TEXT TEXT " & "</p>" _
"<p  align=""right"">" & "End of TEXT </p>"
If it doesn't work, please join a light copy of your excel file.

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
k
kobibh2
Jeune membre
Jeune membre
Messages : 12
Inscrit le : 9 juillet 2019

Message par kobibh2 » 6 août 2019, 09:45

good morning Steelson and else

I join a file
be attention that the first row align to the right,
and the "SendTo" variable need to be in the same row

The name of the macro :"RDB_Worksheet_Or_Worksheets_To_PDF_And_Create_Mail"
The relevant line of code is in line 59

TY again
auto mail from excel.xlsm
(40.9 Kio) Téléchargé 3 fois
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 15'077
Appréciations reçues : 900
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 6 août 2019, 11:08

For me, with light changes ...
                            StrBody:="<H3 align= right><B>in honor of</B></H3><p align= right>" & SendTo & </p> _
                                      "<body align= right>TEXT TEXT TEXT TEXT " & _
                                      "<br><br>" & "End of TEXT</body>"
works well
Nevertheless I have not an hebrew keyboard to test completely.

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
Avatar du membre
Ausecour
Passionné d'Excel
Passionné d'Excel
Messages : 3'118
Appréciations reçues : 346
Inscrit le : 31 mai 2018
Version d'Excel : 2010 FR, 2013 FR

Message par Ausecour » 6 août 2019, 11:19

Ne pas prendre en compte ce message (fail de ma part)
Plus un sujet a un titre précis, des explications claires, et un fichier Excel bien préparé, plus il a de chances d'avoir une réponse qui répond au besoin, mettez toutes les chances de votre côté :bien:
"100% des gagnants auront tenté leur chance" :trfl:
k
kobibh2
Jeune membre
Jeune membre
Messages : 12
Inscrit le : 9 juillet 2019

Message par kobibh2 » 6 août 2019, 11:52

unfortunately the code not compile.
can you add the file that you work on
Avatar du membre
Steelson
Fanatique d'Excel
Fanatique d'Excel
Messages : 15'077
Appréciations reçues : 900
Inscrit le : 13 octobre 2014
Version d'Excel : 2013 FR
Téléchargements : Mes applications

Message par Steelson » 6 août 2019, 14:05

Sorry, i add </p> at the last time with a mistake !!
auto mail from excel.xlsm
(32.15 Kio) Téléchargé 4 fois

O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸ O.o°• ♪♪♫ °º¤ø,¸¸,ø¤º°`°º¤ø,¸
PI = 3.14159 26535 89793 23846 26433 83279 50288 41971 69399 37510 58209 74944 59230 78164 06286 20899 86280

( ͡• ͜ʖ ͡• )
k
kobibh2
Jeune membre
Jeune membre
Messages : 12
Inscrit le : 9 juillet 2019

Message par kobibh2 » 6 août 2019, 15:31

This is the result :(
two things:
The first, variable "sendTo" goes down a line, it should be in the first row.

Second, except for the first line the rest of the text is still on the left.

Begins to despair.
Attached print screen

Thank you
PrtSc mail.docx
(218.97 Kio) Téléchargé 3 fois
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message