Ouvrir un document Calc existant et contenant des macros [Résolu]

[Martipit]

Bonjour à tous, je suis actuellement en train de développer une application sous openOffice calc dans laquelle via un bouton se trouvant sur le formulaire "A" on ouvre un document "B" existant et contenant des macros.

La macro suivante fonctionne mais lorsque le document "B" est ouvert, les macros de celui-ci ne fonctionnent plus alors que si je l'ouvre normalement elles marchent :

Code :

1
2
3
4
5
6
7
8
9
10
11
sub OuvreTableauSynthese
'Ouvre le fichier de synthese de l'opération
	Dim mNoArgs()
	Dim oDesktop As Object
	Dim oDocument As Object
	Dim sUrl As String
		oDesktop = createUnoService("com.sun.star.frame.Desktop")
		sUrl = "file:///" & ThisComponent.Sheets.getByName("Parametres"). getCellRangeByName("S10").String
		oDocument = _
	oDesktop.LoadComponentFromURL(sUrl,"_blank",0,mNoArgs())
End Sub

Autre petit souci, lorsque j'ouvre mon document "B" via cette macro et que je le modifie, lorsque je fait enregistrer, j'ai le message d'erreur suivant qui s'affiche :

Erreur lors de l'enregistrement du document c:\xxxxxxxx
Erreur générale
Erreur d'entrée/sortie générale.

Je ne comprends pas pourquoi j'obtiens de tels résultats tant dans le non fonctionnement des macro du document "B" que dans l'enregistrement.

Si une âme charitable pouvait se pencher sur la question ce serait super sympa.

Merci par avance.

@+ Martipit

[Martipit]

salut

Bon après quelques recherches, j'ai trouvé une solution pour pouvoir enregistrer mon document "B" lorsqu'il a été ouvert par la marco.

En fait, j'ai carrément changé celle-ci et je l'ai remplacée par cette macro :

Code :

1
2
3
4
5
6
7
8
Sub OuvreTableauSynthese
	Dim Fichier As String
	Dim Wb As Object
	Dim Args()
	Fichier = ConvertToUrl(ThisComponent.Sheets.getByName("Parametres"). getCellRangeByName("S10").String)
	Wb = StarDesktop.loadComponentFromURL(Fichier,"_blank",0 ,Args() )
End Sub

Avec ce code, je n'ai plus de soucis pour l'enregistrement.

Par conttre, j'ai toujours le problème des macro qui ne fonctionnent pas dans le document que j'ai ouvert via cette macro ...

Je continue mes recherches.

Ca donne l'impression que celles-ci sont désactivées puisque lorsque j'ouvre mon document de manière normale (en passant par l'Exlporer) les macros fonctionnent

Pour info la sécurité des macro d'OPenOffice est au niveau le plus faible.

De plus lorsque mon document est ouvert au moyen de la macro et que j'essais d'executer les macro j'ai un message qui me dit que pour des raisons de sécurité, la macro ne puet être exécuter.


Merci par avance pour l'aide que vous pourrez m'apporter.

@+ Martipit