SaveSetting es una función en Visual Basic for Applications (VBA) que permite guardar una configuración o valor personalizado en el Registro de Windows bajo la clave de registro de HKEY_CURRENT_USER\Software\VB and VBA Program Settings. Esta función es útil cuando queremos almacenar configuraciones específicas de usuario que deben persistir entre las sesiones de la aplicación.

Sintaxis básica

SaveSetting appname, section, key, setting

• appname: Es una cadena que especifica el nombre de su aplicación. Esto se usa para crear una nueva clave dentro del Registro de Windows para almacenar los valores de configuración específicos de tu aplicación.
• section: Es una cadena que especifica una sección dentro de tu aplicación donde se almacenará el valor. Piensa en esto como un subdirectorio dentro de la clave de tu aplicación.
• key: Es una cadena que especifica el nombre de la clave individual dentro de la sección que va a almacenar el valor.
• setting: Es el valor que deseas guardar. Puede ser un número, una cadena o un valor booleano.

Aquí tienes un ejemplo de cómo usar SaveSetting para almacenar algunos datos de configuración:

Sub GuardarConfiguracion()
    ' Define algunos valores de configuración
    Const AppName As String = "MiAplicacionVBA"
    Const SectionName As String = "ConfiguracionUsuario"
    Const ClaveNombre As String = "ColorFondo"
    Dim ValorConfiguracion As String
    
    ' Asigna un valor de configuración
    ValorConfiguracion = "Azul"
    
    ' Guarda el valor de configuración en el Registro de Windows
    SaveSetting AppName, SectionName, ClaveNombre, ValorConfiguracion
End Sub

En este ejemplo, MiAplicacionVBA es el nombre de la aplicación, ConfiguracionUsuario es la sección donde almacenamos la configuración, ColorFondo es la clave específica y «Azul» es el valor que queremos guardar.

Para recuperar estos valores, utilizarías la función GetSetting con la misma appname, section y key.

Sub RecuperarConfiguracion()
    ' Define algunos valores correspondientes a los que se usaron en SaveSetting
    Const AppName As String = "MiAplicacionVBA"
    Const SectionName As String = "ConfiguracionUsuario"
    Const ClaveNombre As String = "ColorFondo"
    
    ' Recupera el valor de configuración del Registro de Windows
    Dim ValorConfiguracion As String
    ValorConfiguracion = GetSetting(AppName, SectionName, ClaveNombre)
    
    ' Muestra el valor recuperado
    MsgBox "El color de fondo configurado es: " & ValorConfiguracion
End Sub

Cabe mencionar que SaveSetting sólo se debe usar para almacenar configuraciones ligeras. Si necesitas almacenar grandes cantidades de datos o trabajar en ambientes diferentes a Windows, entonces considera utilizar alternativas como archivos de configuración propios de tu aplicación (por ejemplo, archivos INI, XML, JSON, etc.).

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto