XL 2019 Problème avec WeBrowser

[AIXELS]

Bonjour à tous les amis du Forum. 🙂
Je reviens vers vous suite un message d'erreur récurent apparu il y'a 2 jours.

Tous les userforms contenant des Gifs, m'affichent un message d'erreur
voir pièces jointes : Erreur d'exécution 424.

Cela fonctionnait très bien grâce à votre aide et dans cette partie, c'est
@patricktoulon qui m'a donné la solution et je l'en remercie encore ainsi
que tous les contributeurs. 🙏

With WebBrowser2
.Navigate "about:blank"
Do While .readystate < 4: DoEvents: Loop
With .Document
.body.Style.margin = 0
Set img = .body.appendchild(.createelement("img"))
img.src = "C:\Users\patrick\Desktop\printermachine.JPG"
With img.Style
.Height = "100%"
.Width = "100%"
End With
End With
Debug.Print .Document.getelementsbytagname("HTML")(0).outerhtml
End With

Avez-vous une idée à quoi est-ce dû et la façon de régler ce problème ?
Par avance merci pour aide.
Bien cordialement.

 

[patricktoulon]

a ben oui c'est une clicktorun ta version d'excel
et en plus je vois que tu a migré de la version 15 à 16 puis clicktorun version 2021
et ben dis donc tu n'es pas gaté toi 🤣

donc!!!
cherche si il y a ce chemin

HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/16.0/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

ou encore

HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

dans une de ces clé tu devrais trouver une valeur DWORD "compatibility flag"
il faut la mettre a zero

le mieux c'est que tu click droite sur "Office" et que tu exporte cette clé
ensuite change l'extension ".reg" en ".txt" du fichier exporté et envoie moi ca en zip je te prepare la cle qui fera le boulot tout seul

 

[AIXELS]

a ben oui c'est une clicktorun ta version d'excel
et en plus je vois que tu a migré de la version 15 à 16 puis clicktorun version 2021
et ben dis donc tu n'es pas gaté toi 🤣

donc!!!
cherche si il y a ce chemin

HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/16.0/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

ou encore

HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

dans une de ces clé tu devrais trouver une valeur DWORD "compatibility flag"
il faut la mettre a zero

le mieux c'est que tu click droite sur "Office" et que tu exporte cette clé
ensuite change l'extension ".reg" en ".txt" du fichier exporté et envoie moi ca en zip je te prepare la cle qui fera le boulot tout seul

Voilà le fichier

 

[patricktoulon]

re
bon ben désolé je la trouve pas
sans doute a telle déjà été supprimée
mais c'est un vrai boxon ton registre apres ces migrations multiple ,un petit coup d cccleaner ne ferait pas de mal

sais tu enregistrer une dll?

 

[AIXELS]

Non enregistrer une DLL, je ne l'ai jamais fait

 

[patricktoulon]

ok je te prepare ça
tu m'a dis que la dll iframe.dll se trouvait bien dans system32 on est d'accords ?

 

[AIXELS]

Je me déconnecte pour passer CCleaner et je me reconnecte

 

[patricktoulon]

OK

 

[AIXELS]

ok je te prepare ça
tu m'a dis que la dll iframe.dll se trouvait bien dans system32 on est d'accords ?

Oui dans sytem32

 

[AIXELS]

 

[patricktoulon]

re
dezip ces deux fichiers quelque part sur ton bureau
click droit sur chacun son tour et click exécuter en mode administrateur

 

[AIXELS]

Message d'erreur avec : regIEFRAME.dllSystem32.cmd

 

[patricktoulon]

dans le 2d sysWOW ajoute en dessous pause
pour voir ce qu'il te dit

C:\WINDOWS\system32>%systemroot%\SysWoW64\regsvr32.exe C:\Windows\SysWOW64\"C:\Windows\SysWoW64\ieframe.dll"
pause

et dis mois ce que tu ois

 

[AIXELS]

dans le 2d sysWOW ajoute en dessous pause
pour voir ce qu'il te dit

C:\WINDOWS\system32>%systemroot%\SysWoW64\regsvr32.exe C:\Windows\SysWOW64\"C:\Windows\SysWoW64\ieframe.dll"
pause

et dis mois ce que tu ois

 

[patricktoulon]

ouais ben tu es bien bloqué toi
laisse moi quelques jour pour essayer de trouver ne solution
a tu essayé de l'ajouter dynamiquement le webbrowser ??????????

 

[AIXELS]

Merci pour tout le temps que tu as passé sur mon problème.
Merci pour ta disponibilité et ta patience.
Bon week-end. 🙏