3 messages in org.openoffice.fr.prog[prog] Export HTML d'un fichier Calc
FromSent OnAttachments
m.gr...@cnafmail.frNov 13, 2008 12:51 am 
Francois GattoNov 14, 2008 10:23 pm 
m.gr...@cnafmail.frNov 16, 2008 11:49 pm 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:[prog] Export HTML d'un fichier CalcActions...
From:m.gr...@cnafmail.fr (m.gr@cnafmail.fr)
Date:Nov 13, 2008 12:51:06 am
List:org.openoffice.fr.prog

Bonjour,

En version 3, l'export HTML d'un fichier Calc fonctionne parfaitement. En revanche, si l'on veut exporter une partie de ce fichier, cela ne fonctionne pas bien que la possibilité soit ouverte (cf copie boîte de dialogue ci-dessous) :

(Embedded image moved to file: pic04215.jpg)

De même, en agissant par macro, l'export HTML fonctionne pour l'intégralité du fichier et non pas uniquement pour la sélection opérée sur une feuille. Voici le code utilisé :

Sub ExportHTML()

Dim oDocument, oFeuilCONV, oSelection, oCC As Object Dim sAdress As String Dim propFich(1) As New com.sun.star.beans.PropertyValue

oDocument = thisComponent oFeuilCONV = oDocument.Sheets.getByName( "conv_europe" ) oSelection = oFeuilCONV.getCellRangeByName( "A1:I29" ) oCC = oDocument.CurrentController oCC.Select( oSelection )

sAdress = convertToURL( "C:\MGR\Adoc\baremes\TransfertHTML.html" )

propFich(0).Name = "FilterName" propFich(0).Value = "HTML (StarCalc)" propFich(1).Name = "SelectionOnly" propFich(1).Value = true

oDocument.storeToURL( sAdress, propFich() )

On Error Resume Next Print "Erreur : " & Err

End Sub

Merci d'avance pour l'aide que quelqu'un pourrait m'apporter.

Michel GRIMAULT