[prog] VB et commandes UNO

[Cezame Concept]

Est t'il possible d'utiliser les commandes uno avec VB ?   Par exemple effectuer un "selectionner tout" puis copier   Si on enregistre la macro sous writer on obtiens ...   sub selectallcopy rem ---------------------------------------------------------------------- rem define variables dim document   as object dim dispatcher as object rem ---------------------------------------------------------------------- rem get access to the document document   = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")   rem ---------------------------------------------------------------------- dispatcher.executeDispatch(document, ".uno:SelectAll", "", 0, Array())   rem ---------------------------------------------------------------------- dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Array())     end sub     Lorsque je transcrit ca sous VB cela ne fonctionne pas …   Comment réaliser cette fonction si les commandes uno ne marchent pas ?   Merci d’avance ….