[prog] Entête et pieds de page ...

[Cezame Concept]

Je souhaiterai simplement gérer par programmation sous VB.Net l'ajout / Suppression d'entêtes et pieds de page ...   A savoir ... * Créer un entête      Accéder à l'entête pour modifications ...   Suppression de l'entête ...   Afin de réer l'entête j'ai utilisé la fonction UNo Suivante ...       Dim oServiceManager As Object, oDispatcher As Object Dim oDesktop As Object, oDocument As Object, oSel As Object   oServiceManager = CreateObject("com.sun.star.ServiceManager") oDesktop = oServiceManager.createInstance("com.sun.star.frame.Desktop") oDispatcher = oServiceManager.createInstance("com.sun.star.frame.DispatchHelper")   Public Function MakePropertyValue(ByVal cName As String, ByVal uValue As Object) As Object         Dim oStruct As Object         oStruct = oServiceManager.Bridge_GetStruct("com.sun.star.beans.PropertyValue")         oStruct.Name = cName         oStruct.Value = uValue         MakePropertyValue = oStruct End Function   Sub AjouterEntêteUNO()         Dim Arguments(1) As Object         oSel = oDocument.CurrentController.Frame         Arguments(0) = MakePropertyValue("PageStyle", "Standard")         Arguments(1) = MakePropertyValue("On", True)         oDispatcher.executeDispatch(oSel, ".uno:InsertPageHeader", "", 0, Arguments) End Sub     Cela ne fonctionne pas …   Merci d’avance pour votre aide