Access - Cambiar las propiedades de Access

Cambiar las propiedades de Access

Publicado por Salomon (152 intervenciones) el 01/02/2006 16:36:21

Necesito al iniciar mi programa desde VisualBasic, poder ajustar las distintas propiedades de Access. Me refiero a poder cambiar los parametros que aparecen en el menu Herramientas/Opciones, del menu de Access.
He conseguido cambiar algunas con

Application.SetOption "Show Status Bar", 0
Application.SetOption "Show System Objects", 0

pero hay las 6 que aparecen en el tab Ver/Mostrar que no soy capaz de ajustar.
Tambien me interesa poder ajustar el color del fondo de la pantalla de Acces (este que es de un tono gris oscuro).

Si alguien puede ayudarme
Gracias de antemano

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Ajustar propiedades y configuraciones desde Visual Basic

Publicado por Alejandro (4142 intervenciones) el 20/06/2023 17:24:30

Para ajustar las propiedades y configuraciones de Access desde Visual Basic, puedes utilizar la biblioteca de objetos de Access (DAO) y la propiedad `CurrentDb.Properties` para acceder a las propiedades de la base de datos.

Aquí hay un ejemplo de cómo ajustar algunas de las propiedades que mencionaste:

Dim db As DAO.Database

Dim prop As DAO.Property

' Obtener referencia a la base de datos actual

Set db = CurrentDb

' Ajustar la propiedad "Mostrar la barra de estado" (Show Status Bar)

Set prop = db.Properties("Show Status Bar")

prop.Value = False

' Ajustar la propiedad "Mostrar objetos del sistema" (Show System Objects)

Set prop = db.Properties("Show System Objects")

prop.Value = False

' Ajustar la propiedad "Mostrar pestañas" (Navigation Pane Options > Show Tabs)

Set prop = db.Properties("AllowFullMenus")

prop.Value = False

' Ajustar la propiedad "Mostrar el grupo de objetos de navegación" (Navigation Pane Options > Show Navigation Pane)

Set prop = db.Properties("AllowBuiltInToolbars")

prop.Value = False

' Ajustar la propiedad "Mostrar todas las bases de datos" (Navigation Pane Options > Show All Databases)

Set prop = db.Properties("AllowSpecialKeys")

prop.Value = False

' Ajustar la propiedad "Mostrar documentos recientes" (Navigation Pane Options > Show Recent Documents)

Set prop = db.Properties("AllowShortcutMenus")

prop.Value = False

' Guardar los cambios en las propiedades

db.Properties.Refresh

db.Properties.Update

Para ajustar el color de fondo de la pantalla de Access, puedes utilizar la función `SysCmd` y el argumento `acSysCmdSetBackColor`:

' Ajustar el color de fondo de la pantalla de Access

SysCmd acSysCmdSetBackColor, RGB(128, 128, 128)

Ten en cuenta que estas soluciones se aplican a la instancia actual de Access y pueden no afectar a otras instancias o bases de datos. Además, algunas configuraciones pueden requerir privilegios de administrador.

Espero que esta solución te ayude a ajustar las propiedades y configuraciones de Access desde Visual Basic.

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar