Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketfed skrift i linje til mail.. :)

 Besvar Besvar
Forfatter
Tor4Every1 Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 15.Mar.2021
Land: Danmark
Status: Offline
Point: 66
Direkte link til dette indlæg Emne: fed skrift i linje til mail.. :)
    Sendt: 18.Mar.2021 kl. 14:15
Hej Alle, 

jeg har excel ark hvor jeg sender en mail via outlook, inden i den tekst jeg skriver som standart tekst til min mail, vil jeg gerne have en del af teksten B.  men det som skal være B er fra ThisWorkbook.Sheets.Range("E11")

Har prøvet med  med denne, den virker når det bare er tekst. men hvordan får jeg den til at virke når det er range. 
  

"<b> ThisWorkbook.Sheets("aktør - Liste").Range("E11") </b>

på forhånd tak,,  

Tor4Every1
Til top



Til top
Bjarnehansen Se dropdown
Platin bruger
Platin bruger
Avatar

Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5585
Direkte link til dette indlæg Sendt: 19.Mar.2021 kl. 15:49
 Application.ScreenUpdating = False
    Sheets("Timeseddel").Select
    Range("C18").Select
    'ActiveSheet.PageSetup.CenterFooter = "&8Udskrevet d. " & "&D &  -  & Kl. &T"
    ' Get info for Right footer
    Set wbTemplate = ActiveWorkbook
    Set wsTemplate = wbTemplate.Sheets("T")
    Set rRightFooter = wsTemplate.Range("G1")
    
    Sheets("Blodtryksskema").Select
    Application.ScreenUpdating = False
    With ActiveSheet.PageSetup
        '.LeftHeader = ""
        '.CenterHeader = ""
        '.RightHeaderPicture.Filename = "C:\myfooterpic.jpg"
        '.RightHeader = ""
        .LeftFooter = "&8Side &P af &N"
        .CenterFooter = "&8Udskrevet d. &D - kl. &T"
        '.RightFooter = Sheets("Dine_Data").Range("F6").Value
        .RightFooter = "&""Calibri,bold""&08" & rRightFooter.Value
    End With
linjen med rødt laver en bold tekst i calibri font størrelse 8
håber det giver dig en ide
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
Til top
Bjarnehansen Se dropdown
Platin bruger
Platin bruger
Avatar

Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5585
Direkte link til dette indlæg Sendt: 19.Mar.2021 kl. 15:52
ellers må du upload dit ark så skal vi nok kunne hjælpe dig
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk