If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Removing "Microsft Access" from the title bar in Access
Hi All,
Is there a way to remove the "Microsoft Access" title on the database? I'm not talking about a form, but the program itself when open? Thanks, Mark |
#2
|
|||
|
|||
Removing "Microsft Access" from the title bar in Access
Mark wrote:
Hi All, Is there a way to remove the "Microsoft Access" title on the database? I'm not talking about a form, but the program itself when open? Thanks, Mark In Tools Startup you can set your own application title. -- Rick Brandt, Microsoft Access MVP Email (as appropriate) to... RBrandt at Hunter dot com |
#3
|
|||
|
|||
Removing "Microsft Access" from the title bar in Access
On Sat, 18 Oct 2008 14:50:01 -0700, Mark wrote:
Hi All, Is there a way to remove the "Microsoft Access" title on the database? I'm not talking about a form, but the program itself when open? Thanks, Mark You can change it to a single space. Adapted from VBA help: Sub ChangeTitle() Dim dbs As DAO.Database Dim obj As Object Const conPropNotFoundError = 3270 On Error GoTo ErrorHandler ' Return Database object variable pointing to ' the current database. Set dbs = CurrentDb ' Change title bar. dbs.Properties!AppTitle = " " ' Update title bar on screen. Application.RefreshTitleBar Exit Sub ErrorHandler: If Err.Number = conPropNotFoundError Then Set obj = dbs.CreateProperty("AppTitle", dbText, " ") dbs.Properties.Append obj Else MsgBox "Error: " & Err.Number & vbCrLf & Err.Description End If Resume Next End Sub -- Fred Please respond only to this newsgroup. I do not reply to personal e-mail |
Thread Tools | |
Display Modes | |
|
|