Databases Reference
In-Depth Information
TABLE 6.5
Environ Function Arguments
Environ Arguments
ALLUSERSPROFILE
APPDATA
AVENGINE
CLIENTNAME
CommonProgramFiles
COMPUTERNAME
ComSpec
FP_NO_HOST_CHECK
HOMEDRIVE
HOMEPATH
INCLUDE
INOCULAN
LIB
LOGONSERVER
NUMBER_OF_PROCESSORS
OS
Path
PATHEXT
PROCESSOR_ARCHITECTURE
PROCESSOR_IDENTIFIER
PROCESSOR_LEVEL
PROCESSOR_REVISION
ProgramFiles
SESSIONNAME
SystemDrive
SystemRoot
TEMP
TMP
USERDOMAIN
USERNAME
USERPROFILE
VS71COMNTOOLS
WecVersionForRosebud.FF0
windir
These functions provide critical system information such as dates, times, and usernames, which
are perfectly suitable for inclusion on headers or footers in Worksheets. The next subroutine will
allow the developer to add a header or a footer
contained in the specified Workbook.
The subroutine allows the developer to add text to the left, middle, and right sides of the header
or footer. It can easily be modified to perform the operation on a single sheet should that type of
functionality be required.
to every sheet
Sub AddHeaderOrFooter(Workbook$, ltxt$, mtxt$, rtxt$, header
As Boolean)
'Places a Universal Header or Footer on all sheets in a
specific Workbook$
Dim ws As Worksheet
