Bonjour,
Je traite des classeurs Calc de manière implicite pour l'utilisateur. Pour cela, j'ai utilisé le code ci-dessous pour que le classeur soit invisible lors du traitement.
Le problème est que je souhaite, à la fin du traitement, rendre visible le fichier par l'utilisateur.
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 strfile = replace(strfile, "\", "/") '------------- 'Création d'une instance Open Office Set oServiceManager = CreateObject("com.sun.star.serviceManager") Set oDesktop = oServiceManager.createInstance("com.sun.star.frame.Desktop") 'Tableau pour les paramètres du mode masqué Set args(0) = oServiceManager.Bridge_getStruct("com.sun.star.beans.PropertyValue") 'Arguments Open Office pour masquer le fichier args(0).NAME = "Hidden" 'nom de l'argument args(0).Value = True 'valeur de l'argument 'Ouverture du fichier Set oDocument = oDesktop.loadComponentFromURL(strfile, "_blank", 0, args)
Quelqu'un saurait-il comment ???
Merci![]()
Partager