Discussion :

[LG1818]

Bonjour,

J'ai créé une macro sous LibreOffice Calc pour transformer un fichier ods en .csv.

Lorsque j'exécute la macro, un message d'avertissement apparaît :

"Avertissement lors de l'enregistrement du document xxx.
Seule la feuille active a été enregistrée".

Y a-t-il possibilité de "masquer" ou "supprimer" ce message d'avertissement ? Si oui, comment ?

Merci d'avance pour votre aide.

Bonne journée.

[vandman]

Bonjour,

Essaye ceci, ca fonctionne:
La fonction sauvegarde la feuille passée en paramètre 'NomFeuille' dans 'SaveFile' au format UTF8 avec des séparateur de champ ';' et des séparateurs de texte ' " '.

1. SaveFile = chemin absolut ou tu veux sauvegarder ton fichier
2. NomFeuille => NomFeuille = ListeDesFeuilles.getByName("nom de la feuille")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
sub EnregistrementFichier (SaveFile as string, NomFeuille as object)
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
'dim dispatcher as object
Dim sURL as string
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent
ThisComponent.CurrentController.ActiveSheet = NomFeuille
 
sURL = ConvertToURL(SaveFile)
rem ----------------------------------------------------------------------
dim args1(1) as new com.sun.star.beans.PropertyValue
args1(0).Name = "FilterName"
args1(0).Value = "Text - txt - csv (StarCalc)"
args1(1).Name = "FilterOptions"
args1(1).Value = "59,34,76,1,,0,false,true,true"
 
document.storeToURL(sURL, args1)
 
end sub

Cordialement,
vandman

[LG1818]

Super ça fonctionne merci beaucoup.