enregister sous forme HTML

  • Initiateur de la discussion Initiateur de la discussion Johan
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

Johan

Guest
Mon programme sous EXCEL me permet d'exploiter des mesures pour en donner un graph et un tableau.
J'aimerai enregistrer ces résultats sous forme de fichiers HTML en mode programmé (utilisant les macros)
 
'articles pour commencer, mais attention je ne sais pas s'ils existent tjrs chez microsoft
http://support.microsoft.com/support/kb/articles/q168/5/61.asp
http://www.microsoft.com/exceldev/articles/ch11.htm


http://jacxl.free.fr/cours_xl/accueil.html



pour xl2000 (et pt être xl97)
Un exemple d'utilisation par code de l'assistant de conversion HTML d'Office
Sub SaveAsHtml()
'this saves as html
Dim ObjectToConvert 'As Variant
Dim Reslult As Integer
Set ObjToConvert = Sheets("sheet5").Range("b1:r14")
AddIns("Internet Assistant Wizard").Installed = True
Result = htmlconvert(rangeandcharttoconvert:=Sheets("sheet5").Range("b1:r143"), useexistingfile:=False, usefrontpageforexistingfile:=False, addtofrontpageweb:=False, codepage:=1252, htmlfilepath:="c:\My Documents\wssnba.htm", linebeforetablefullpage:=True, namefullpage:="VolFreak")
Application.Save : ActiveWindow.Close

'this publishes to ftp,but not as html (I have tried File format html)
Workbooks.Open FileName:="C:\My Documents\wssnba.htm"
Windows("wssnba.htm").Activate
ActiveWorkbook.SaveAs FileName:="ftp://ftp.xoom.com/wssnba.prn", FileFormat :=xlTextPrinter, CreateBackup:=False
End Sub


bye
stephane
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
XL 2019 B
Réponses
10
Affichages
378
Réponses
134
Affichages
4 K
Retour