Koptekst beveiligen

[Kaavya]

Is het mogelijk om de koptekst te beveiligen, zodat deze niet gewijzigd kan worden (ook niet bij de pagina-instellingen bij afdrukken)?

 

[gast0660]

Waaruit bestaat uw koptekst (plaatje, tekst) en waar staat het (links,midden rechts ....)
Geef wat meer uitleg of post een vbtje.
Dan krijg je de juiste code.
zie ondertussen.
http://www.helpmij.nl/forum/showthread.php/912447-In-Excel-2013-een-afbeelding-in-de-voettekst-beveiligen-tegen-wijzigingen

 

[Kaavya]

De vraag onder de link is vergelijkbaar.
Plaatje in het midden.

De bedoeling is dat het bestand gemaild kan worden en dus op andere locaties geopend kan worden.

 

[gast0660]

Probeer het zo eens.
Zet dit in de VBA editor onder ThisWorkbook.
verander het rode gedeelte.
Is mailen als PDF geen oplossing?

Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
   Call blocklogo
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Call blocklogo
End Sub
Private Sub Workbook_Open()
    Call blocklogo
End Sub
Private Sub blocklogo()
    Application.ScreenUpdating = False
    ActiveSheet.PageSetup.CenterHeaderPicture.Filename = "[COLOR="#FF0000"]C:\Users\....\....\uw afbeelding[/COLOR]"
    ThisWorkbook.ActiveSheet.PageSetup.CenterHeader = "&G"
    Application.ScreenUpdating = True
End Sub

 

[Kaavya]

Het is een formulier wat met Excel ingevuld moet worden.