XL 2016 VBA - Range to HTML incluant les objets de la feuille (boutons, images, ...)

Dudu2 · 14 Août 2022

Bonjour,

Je n'ai rien trouvé qui fonctionne pour convertir un Range en HTML qui inclurait tout ce qu'il y a dans le Range en question.

J'ai bien récupéré la fonction de Ron de Bruin omni-présente sur le Web qui fonctionne uniquement pour les valeurs de cellules et leurs formats, sauf pour les tableaux structurés qui ne sont pas en exclusivité dans le Range qui perdent alors leurs formats (qui n'en sont pas vraiment !).

Dudu2 · 18 Septembre 2022

Plusieurs solutions sont actuellement disponibles:

Les solutions de @patricktoulon dans cette ressource.
La solution de @Dudu2 dans le fichier joint pour chacune des situations:
- Créer un fichier .htm et son répertoire associé de fichiers images
- Créer un fichier .htm unique contenant les images codées en Base64
- Créer un mail Outlook

Dudu2 · 12 Septembre 2022

si c'est une épaisseur de bordure ,zoom sur html et tu verra que c'est bon
c'est juste le rendering FF qui fait ça

Ok, tu as raison, sous Chrome ça apparait bien.

patricktoulon · 12 Septembre 2022

re
ah ...
je sais pas si tu a fait une fusion dans le coin mais comme je te l'ai dis
avec les fusion il y a des choses que fait excel qui sont impossible encss2 en html les moitié de bordures ca n'existe pas en html
il faut passer par border-image

oui je sais pour les activX avec publier et je te parle meme pas des bordures sur des fusion croisées il les zape tout bonnement moi j'en récupère le max possible et compatible html
comme je te l'ai dis la seule solution c'est de tout construire
c'est ce que je fait avec ma méthode

patricktoulon · 12 Septembre 2022

regarde par exemple avec FF le rendering
ca c'est excel

en zoom normal ff ca va pas et quand je zoom on vois bien que c'est une bordure double

patricktoulon · 12 Septembre 2022

après comme je te l'ai dis, les bordures c'est ""au plus près de l'original""
faire mieux je pourrais mais ce serait une usine a gaz( heu..pardon lionel )
et je t'embarquerait dans le css3 avec border-image sur le quel on peut régler le width,height,leftt,top

Dudu2 · 12 Septembre 2022

A cette occasion je viens de remarquer que Publish n'exporte pas les Contols Active X de la feuille.

Non en fait c'est le copy du range dans une nouvelle feuille qui ne prend pas les Active X.
Et ça je ne sais pas faire, même manuellement.
Va falloir bidouiller.

patricktoulon · 12 Septembre 2022

non non c'est bien publier aussi je viens de tester
en plus regarde le dossier image et comment veux tu choisir une image toi qui va a qui et a quoi et pour couronner le tout regarde celle tout a fait a droite
c'est une capture de groupes d'image va savoir pour quoi il fait ça

non moi publier c'est mort et en plus sur outlook 2013 c'est un carnage

Dudu2 · 12 Septembre 2022

Oui, j'ai aussi essayé d'utiliser Publish pour récupérer les fichiers car c'est rapide.
Mais comme tu l'indiques ci-dessus, Publish créé plusieurs images pour une seule, parfois créé une image de plusieurs images et donc c'est totalement inexploitable.

comme je te l'ai dis la seule solution c'est de tout construire
c'est ce que je fait avec ma méthode

En effet, la méthode que tu as codée et qui suscite toute mon admiration car je ne comprends que 10% de ton code est celle qu'il faut utiliser pour éviter les risques de discordance entre le Range et sa représentation HTML.

Par contre je te confirme que c'est bien le Paste du Range.Copy qui exclut les Controls ActiveX.
En copiant ces contrôles par code pour compléter le Paste, Publish les prend en compte comme tu peux le constater avec ce fichier.

Dudu2 · 12 Septembre 2022

Pour info, lorsqu'il n'y a pas d'objet dans le Range, ton code affiche:

Je l'ai supprimé chez moi

patricktoulon · 12 Septembre 2022

re
ben si il n'y a pas d'images et que tu a choisi avec image et que bien sur il est sensé y en avoir c'est qu'il y a eu un problème
l'avertissement est utile
bon alors ce displayGridline qu'est ce que tu en pense ??

patricktoulon · 12 Septembre 2022

re j'ai tellement bossé pour te l'adapter à outlook que maintenant sans les corrections bordures pour outlook c'est nickel par contre pour le web c'est pas bon

regarde oulook sans correction bordure

et maintenant regarde FF sans correction bordure

pourtant c'est exactement le même code pour outlook et le fichier web

patricktoulon · 13 Septembre 2022

re
Bonjour @Dudu2
aujourd'hui je reviens sur la 4.8 car le displayGridline ne me conviens pas trop dans le sens ou ca ne fonctionne pas comme tu veux à 100%

j'ai donc fait le test ultime pour les bordures de fusion inter croisée à outrance
et j'en ai raccourci le code
alors c'est pas parfait mais on voit bien que mon résultat est bien meilleur que le publish
démonstration

original excel

version publish

version avec ma fonction

voila c'est pas parfait mais le résultat est largement supérieur a publish

Dudu2 · 13 Septembre 2022

Bonjour @patricktoulon,
Je ne doute pas un instant que pour Outlook au moins, ton code est indispensable car Outlook ne sait pas utiliser le code de Publish. Et Outlook l'objectif principal. Le code Web Browser est accessoire.

Il y a un petit bug sur la couleur du "1" de "B1" passé du noir au rouge et qui est masqué par la flèche.

Dudu2 · 13 Septembre 2022

j'ai tellement bossé pour te l'adapter à outlook que maintenant sans les corrections bordures

Désolé de te faire travailler comme un mineur de fond.
Mais c'est pour la bonne cause: une exclusivité mondiale dont tu seras l'auteur !

patricktoulon · 13 Septembre 2022

re
a oui j'ai vu
je l'avais mis en rouge puis remis en noir et visiblement dans le xml du sheet il n'a pas corrigé
j'ai bien verifié dans le xml du sheet et le 1 de "B1" était bien en rouge alors que sur la feuille il est noir
c'est bizarre ça quand même il doit y avoir de belles fuites mémoire

patricktoulon · 13 Septembre 2022

re
j'avais laissé ça de coté mais maintenant qu'on est bons
je vais voir pourquoi le first FONT margin-left à 2px de fonctionne pas dans outlook
il va bien falloir trouver une solution même si somme toute c'est pas bien grave

XL 2016 VBA - Range to HTML incluant les objets de la feuille (boutons, images, ...)

Dudu2

XLDnaute Barbatruc

Pièces jointes

Dudu2

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

Pièces jointes

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

Dudu2

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

patricktoulon

XLDnaute Barbatruc

Discussions similaires