Excel VBA

css navigation by Css3Menu.com

Custom Document Properties

In my latest project, there was a need to use a number of status items over and over but we did not want them to appear visible on the worksheet.

To achieve these ends, we hold the items in the CustomDocumentProperties and pull them out as needed.

Our spreadsheets are created from a master template and the Properties must be defined in the template before they can be used.

 ThisWorkbook.CustomDocumentProperties("ActMonth") = ForecastMon

BUKRS = ThisWorkbook.CustomDocumentProperties("BUKRS")
Do While Mid(InputRow, 10, 4) = BUKRS

PRINTING:
.LeftHeader = "&""Arial,Bold""&12" & ThisWorkbook.CustomDocumentProperties("CompanyNm") _
            & Chr(10) & ThisWorkbook.CustomDocumentProperties("FileType") _
            & Chr(10) & TheAccount _
            & Chr(10) & "Budget Fiscal Year " & ThisWorkbook.CustomDocumentProperties("FiscalYear")
        .RightHeader = "&""Arial,Bold""&12" & VersType
        .CenterFooter = ThisWorkbook.CustomDocumentProperties("FileType") & " Support" _
             & Chr(10) & TheAccount
        .LeftFooter = "&D"


© 2003-2017

Updated:  12/10/2017 15:42
This page added:  15 November 2003