Início / coding / Perguntas / 77853768
Accepted
Danny Coleiro
Asked: 2024-01-21 14:10:19 +0800 CST

Quero abrir a tela de configurações do Windows via código VBA

  • 772
  1. Pressione Windows + R para abrir a caixa de diálogo Executar .
  2. Digite ms-settings: na caixa de diálogo Executar .
  3. Pressione OK para abrir a tela de configurações do Windows .

Você conhece algum código VBA que me dê o mesmo resultado das ações acima?

Quer dizer, só quero abrir a tela de configurações do Windows por meio do código VBA .

Observe que sou um usuário do Windows 10 .

vba

1 respostas

  1. Best Answer
    • Use API ShellExecutepara executar scriptStart-Process ms-settings:
    Option Explicit

#If VBA7 Then
    Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
        ByVal hwnd As LongPtr, _
        ByVal lpOperation As String, _
        ByVal lpFile As String, _
        ByVal lpParameters As String, _
        ByVal lpDirectory As String, _
        ByVal nShowCmd As Long) As LongPtr
#Else
    Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
        ByVal hwnd As Long, _
        ByVal lpOperation As String, _
        ByVal lpFile As String, _
        ByVal lpParameters As String, _
        ByVal lpDirectory As String, _
        ByVal nShowCmd As Long) As Long
#End If

Sub OpenSystemSettings()
    ShellExecute 0, "open", "ms-settings:", vbNullString, vbNullString, vbNormalFocus
End Sub
    • 1

relate perguntas