XL 2021 [Réglé] Erreur suite change de micro.

[Bearn 64]

Bonjour le forum,

Ma demande est dans le titre.

Je viens ici vous demander votre expertise.

 

[Phil69970]

Bonjour @Bearn 64

Ma demande est dans le titre.

Perso je te répondrais que la réponse est dans le message il suffit de lire et de faire ce qui est marqué !!!
Tu es passé de 32 bits à 64 bits !!!

 

[Bearn 64]

Bonsoir Phil69970,​

Oui c'est cela mais je suis novice et j'ai remplace user32 par user64. Hélas cela ne suffit pas.

 

[Dranreb]

J'ajouterais quand même : Les variables destinées à contenir des adresses doivent être déclarées As LongPtr au lieu de As Long. Mais il n'y en a pas dans les Api utilisées me semble t-il.
Pour ne plus avoir l'avertissement, l'attribut PtrSafe doit se mettre juste après le mot clé Declare.

 

[Phil69970]

@Bearn 64

je suis novice

Pas temps que cela ....

Désolé mais je ne peux pas écrire dans une image 😉

 

[Bearn 64]

Re ;

L'application de gestion de commandes fonctionné depuis ce temps la sans probleme.
Et j'en ai perdu le fil.

Option Explicit
Private Declare PtrSafe Function FindWindow Lib "user32" Alias "FindWindowA" _
(ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrt
Private Declare PtrSafe Function GetWindowLong Lib "user32" Alias _
"GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As LongPrt
Private Declare PtrSafe Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
(ByVal hWnd As LongPrt, ByVal nIndex As LongPrt, ByVal dwNewLong As LongPrt) As LongPrt
Private Declare PtrSafe Function DrawMenuBar Lib "user32" (ByVal hWnd As LongPrt) As LongPrt

 

[Dranreb]

Oui mais ça ne marche plus avec un bus adresse passé à 64 bits s'il est effectivement utilisé en tant que tel par la version d'office. Donc, comme disait @Phil69970, faire ce qui est demandé dans le message. Nous on ne saurait le faire à votre place que sur un classeur joint. À la rigueur on pourrait suggérer une modif d'un code joint, mais pas d'une image.

 

[Bearn 64]

Bonsoir Dranreb,

J'ai fait les modifs cela parrait ok

Je continu.

 

[kiki29]

Salut, à lire/pratiquer : Développer avec Office 64 bits