Logo Hardware.com.br
Alexpctech
Alexpctech Membro Junior Registrado
54 Mensagens 3 Curtidas

[Resolvido] Adicionar caminho externo no VBA

#1 Por Alexpctech 23/11/2021 - 23:26
Tenho uma planilha com um VBA, mas só funciona se a planilha estiver em primeiro plano, na verdade, hora funciona bem, hora não. Mas eu preciso que ela funciona tanto em primeiro como em segundo plano. Pois, assim posso usar o pc para fazer outras coisas. E na célula B9, o caminho que esta ali, eu preciso colocar no vba, assim fica tudo centralizado no código.

Será que poderiam me ajudar?

Não entendo nada de VBA...

Ela toca um som quando é verdadeira uma regra em "SE"

############################

[HASHTAG]#If[/HASHTAG] Win64 Then

Private Declare PtrSafe Function PlaySound Lib "winmm.dll" _

Alias "PlaySoundA" (ByVal lpszName As String, _

ByVal hModule As LongPtr, ByVal dwFlags As Long) As Boolean

[HASHTAG]#Else[/HASHTAG]

Private Declare Function PlaySound Lib "winmm.dll" _

Alias "PlaySoundA" (ByVal lpszName As String, _

ByVal hModule As Long, ByVal dwFlags As Long) As Boolean

[HASHTAG]#End[/HASHTAG] If

Const SND_SYNC = &H0

Const SND_ASYNC = &H1

Const SND_FILENAME = &H20000

Function SoundMe() As String

'Updateby Extendoffice 20161223

Call PlaySound("c:\windows\media\Ring08.wav", _

0, SND_ASYNC Or SND_FILENAME)

SoundMe = ""

End Function

#############################

Anexos

© 1999-2024 Hardware.com.br. Todos os direitos reservados.
Imagem do Modal