XL 2019 Problème avec WeBrowser

AIXELS

XLDnaute Occasionnel
Supporter XLD
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. 🙏

VB:
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.
 

Pièces jointes

  • Debogage.jpg
    Debogage.jpg
    125.8 KB · Affichages: 14
  • Erreur d'execution 424 Objet requis.jpg
    Erreur d'execution 424 Objet requis.jpg
    9.5 KB · Affichages: 14
  • Lien aide.txt
    238 bytes · Affichages: 3

patricktoulon

XLDnaute Barbatruc
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
Code:
HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/16.0/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

ou encore

Code:
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

XLDnaute Occasionnel
Supporter XLD
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
Code:
HKEY_LOCAL_MACHINE/SOFTWARE/Microsoft/Office/16.0/ClickToRun/REGISTRY/MACHINE/Software/Miscrosoft/Office/16.0/Common/...

ou encore

Code:
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
 

Pièces jointes

  • exportation.txt
    160.5 KB · Affichages: 2

AIXELS

XLDnaute Occasionnel
Supporter XLD
1678535419358.png
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
314 628
Messages
2 111 337
Membres
111 105
dernier inscrit
Joffrette