Necesito saber si alguien sabe cómo preguntar por código en Word, si existe una clave en el registro
Registro
Moderador: Moderadores
- GonzaloVazquez
- Junior
- Mensajes: 10
- Registrado: Lun Dic 09, 2024 6:10 pm
- Contactar:
Re: Registro
En Word (o VBA en general), puedes interactuar con el Registro de Windows utilizando el objeto WScript.Shell de VBScript. Esto permite leer, escribir o verificar la existencia de claves específicas. A continuación, te muestro cómo puedes preguntar si una clave existe en el Registro:
Código VBA para verificar una clave del Registro
Especificar valores concretos de la clave: Si la clave contiene subvalores, debes incluirlos. Ejemplo:
Leer datos de diferentes tipos: RegRead funciona para valores String, DWORD, Binary, etc.
Código VBA para verificar una clave del Registro
Código: Seleccionar todo
Sub VerificarClaveRegistro()
Dim shell As Object
Dim clave As String
Dim valor As Variant
' Crear el objeto WScript.Shell
Set shell = CreateObject("WScript.Shell")
' Ruta de la clave del Registro que quieres verificar
clave = "HKEY_CURRENT_USER\Software\MiAplicacion\MiClave"
On Error Resume Next ' Ignorar errores para verificar existencia
valor = shell.RegRead(clave)
If Err.Number = 0 Then
MsgBox "La clave existe. Valor: " & valor, vbInformation, "Registro"
Else
MsgBox "La clave no existe.", vbExclamation, "Registro"
End If
On Error GoTo 0 ' Restaurar manejo de errores
End SubEspecificar valores concretos de la clave: Si la clave contiene subvalores, debes incluirlos. Ejemplo:
Código: Seleccionar todo
clave = "HKEY_CURRENT_USER\Software\MiAplicacion\MiClave\SubClave"