Probleme 64bits

Bonjour,

Je viens de changer d'ordinateur windows7 (32bits) par un windows8.1 en (64bits), j'utilise Excel 2013.

J'ai un problème sur une application sur le code suivant :

Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long

Private Declare Function GetWindowLongA Lib "user32" _

(ByVal hwnd As Long, ByVal nIndex As Long) As Long

Private Declare Function FindWindowA Lib "user32" _

(ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Declare Function SetWindowLongA Lib "user32" _

(ByVal hwnd As Long, ByVal nIndex As Long, _

ByVal dwNewLong As Long) As Long

Private Declare Function SetWindowPos Lib "user32" _

(ByVal handleW1 As Long, _

ByVal handleW1InsertWhere As Long, ByVal w As Long, _

ByVal X As Long, ByVal Y As Long, ByVal z As Long, _

ByVal wFlags As Long) As Long

J'ai une erreur qui m'empêche de faire tourner mon application.

J'ai cherché sur internet mais je ne vois rien.

J'ai joints les différents messages.

Merci d'avance pour votre aide

11message-erreur.pdf (17.34 Ko)
Rechercher des sujets similaires à "probleme 64bits"