bonjour a tous
Y'a t'il un moyen de déclarer une fonction API en 32 bits et 64 bits dans un mème projet VBA pour que ce dernier fonction en mème temps sur les plates forme 32 et 64 bits
Exemple :
Merci d'avance
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 'declarations pour la Gestion de l'ecran de veille Private Declare Function SetThreadExecutionState Lib "kernel32.dll" (ByVal esFlags As Long) As Long Private Const ES_DISPLAY_REQUIRED As Long = 2 Private Const ES_CONTINUOUS As Long = -2147483648# 'Bloqué écran de veille Sub BloqVeille(Optional strBidon As String) On Error Resume Next SetThreadExecutionState (ES_DISPLAY_REQUIRED Or ES_CONTINUOUS) End Sub 'active écran de veille Sub ActivVeille(Optional strBidon As String) On Error Resume Next SetThreadExecutionState (ES_CONTINUOUS) ' écran de veille End Sub
cdt
Partager