goedemiddag allen,
Voor een Excel sheat heb ik een custom header gemaakt, ik probeer nu om de center header links uit te lijnen.
Heb al wel gevonden dat als ik "&L" toevoeg de links uitlijning doe, maar dan gooit ie het helemaal links op de pagina.
Ik zou graag willen dat de centre header links uitlijnt, zodat ik netjes met 2 kolommen kan werken.
Iemand een idee?
Private Sub Workbook_beforePrint(cancel As Boolean)
With ActiveSheet.PageSetup
.CenterHeader = "&L""Arial Black""&11" & _
"Nummer: " & getCustomDocumentProperty("MMS_NUMMER") & vbCr & _"
"&""Arial Black""&14" & _
"Tab: " & ActiveSheet.Name
.TopMargin = Application.InchesToPoints(1.42)
.BottomMargin = Application.InchesToPoints(0.65)
End With
End Sub
Voor een Excel sheat heb ik een custom header gemaakt, ik probeer nu om de center header links uit te lijnen.
Heb al wel gevonden dat als ik "&L" toevoeg de links uitlijning doe, maar dan gooit ie het helemaal links op de pagina.
Ik zou graag willen dat de centre header links uitlijnt, zodat ik netjes met 2 kolommen kan werken.
Iemand een idee?
Private Sub Workbook_beforePrint(cancel As Boolean)
With ActiveSheet.PageSetup
.CenterHeader = "&L""Arial Black""&11" & _
"Nummer: " & getCustomDocumentProperty("MMS_NUMMER") & vbCr & _"
"&""Arial Black""&14" & _
"Tab: " & ActiveSheet.Name
.TopMargin = Application.InchesToPoints(1.42)
.BottomMargin = Application.InchesToPoints(0.65)
End With
End Sub