Appearance and ergos - access database

U

Uncle Wulf

I'm working on modifying an Access 2003 database that was bequeathed
to me by my predecessor. The database part of things is proceeding
apace, but the UI is absolutely horrid! The colors are garish, and the
text is to small, among other things. Leads to eyestrain in very short
order.

I could edit the various forms to improve things, but we're talking
about 60+ forms here! Is there a feature in Access that would allow
me to change things en masse? [Like a style sheet in a website?]
 
D

Douglas J. Steele

Uncle Wulf said:
I could edit the various forms to improve things, but we're talking
about 60+ forms here! Is there a feature in Access that would allow
me to change things en masse? [Like a style sheet in a website?]
Click to expand...

Unfortunately, there is no style sheet equivalent.

It is possible, though, to change properties programmatically by opening the
form in design view, then working with controls on the form:

Dim frmCurr As Form
Dim ctlCurr As Control

DoCmd.OpenForm "NameOfForm", acDesign
Set frmCurr = Forms("NameOfForm")
Set ctlCurr = frmCurr.Controls("NameOfControl")
ctlCurr.BackColor = vbRed
DoCmd.Close acForm, "NameOfForm, acSaveYes
Set frmCurr = Nothing
 
U

Uncle Wulf

Unfortunately, there is no style sheet equivalent.

It is possible, though, to change properties programmatically by opening the
form in design view, then working with controls on the form:

Dim frmCurr As Form
Dim ctlCurr As Control

DoCmd.OpenForm "NameOfForm", acDesign
Set frmCurr = Forms("NameOfForm")
Set ctlCurr = frmCurr.Controls("NameOfControl")
ctlCurr.BackColor = vbRed
DoCmd.Close acForm, "NameOfForm, acSaveYes
Set frmCurr = Nothing
Click to expand...


Thank you, Sir. I'll have a go at it first thing in the AM.

One other [stupid?] question, if I may.... Where's the property that
controls the title bar text?
 
U

Uncle Wulf

One other [stupid?] question, if I may.... Where's the property that
controls the title bar text?
Click to expand...


Never mind, found it.

I gotta quit working this late. I'm starting to look right past the
obvious things.
 
Top