Manipulate

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is it possible to manipulate ms access name. for example after opening access
the name title is "Microsoft Access". how can i change it to "My Own Tile"

Thanks
Ernie
 
Go to Tools - Startup. Type in My Own Title into the Application Title box.

PC Datasheet
Providing Customers A Resource For Help With Access, Excel And Word
Applications
(e-mail address removed)
 
You can set the Application Title under Tools | Startup.

To do it programmatically, you set the DAO Database's AppTitle property. The
"trick" is that the AppTitle property doesn't exist until you've set a title
at least once.

You could use a routine like:

Sub CreateAppTitle(AppTitle As String)
On Error GoTo Err_CreateAppTitle

Dim dbCurr As DAO.Database
Dim prpNew As DAO.Property

Set dbCurr = CurrentDb()
dbCurr.Properties("AppTitle") = AppTitle

End_CreateAppTitle:
Application.RefreshTitleBar
Set dbCurr = Nothing
Exit Sub

Err_CreateAppTitle:
Select Case Err.Number
Case 3270 ' "Property Not Found"
Set prpNew = dbCurr.CreateProperty("AppTitle", dbText, AppTitle)
dbCurr.Properties.Append prpNew
Case Else
MsgBox Err.Number & ": " & Err.Description
End Select
Resume End_CreateAppTitle

End Sub
 
Tools-Startup-Application Title

Steve said:
Go to Tools - Startup. Type in My Own Title into the Application Title box.

PC Datasheet
Providing Customers A Resource For Help With Access, Excel And Word
Applications
(e-mail address removed)
 
Back
Top