vba - How could I have set the database application name in the title bar? -
in access 2016 database "mediaman.accdb" has application name set ("mediaman - dev copy") in title bar differently filename, there nothing set vba , options setting under current database application title "mediaman". personal database use @ home, have development copy , live copy. of course set @ point in dev copy, before cloning live copy , forgot remove appendage in live copy. life of me dont remember how set it, although have expected in main form onload(). other means have been set? (there backend db , linked "interface-only" instance running @ 1 time)
do global search in vba code apptitle
, perhaps setwindowtext
if used api function.
maybe have autoexec
macro calls startup code.
from online help:
sub changetitle() dim obj object const conpropnotfounderror = 3270 on error goto errorhandler set dbs = currentdb ' change title bar. dbs.properties!apptitle = "contacts database" ' update title bar on screen. application.refreshtitlebar exit sub errorhandler: if err.number = conpropnotfounderror set obj = dbs.createproperty("apptitle", dbtext, "contacts database") dbs.properties.append obj else msgbox "error: " & err.number & vbcrlf & err.description end if resume next end sub
Comments
Post a Comment