Saberexcel - site de quem precisa aprender Macros Microsoft Excel VBA
Essas declarações e funções do Aplicativo Microsoft Excel VBA, retorna uma mensagem personalizada do Windows Explorer e algumas informações do sistema conforme mostra a mensagem abaixo.
Declare Function ShellAbout Lib "shell32.dll" Alias "ShellAboutA" _
(ByVal hwnd As Long, ByVal szApp As String, ByVal szOtherStuff As _
String, ByVal hIcon As Long) As Long
Declare Function GetActiveWindow Lib "user32" () As Long
Sub Sobre_Saberexcel_BR()
Dim hwnd As Integer
On Error Resume Next
hwnd = GetActiveWindow()
ShellAbout hwnd, Nm, vbCrLf + Chr(169) + "" & "SaberexcelBR - Excel VBA Estudos®" _
+ vbCrLf, 1
On Error GoTo 0
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
Baixe o exemplo de planilha contendo as declarações e macro acima
Excel planilha vba msgbox mensagem personalizada windows explorer (20.95 kB)
