Test de macro

Bonjour

Sur le fichier http://troumad.org/OOo/test_impression.ods il y a une toute petite macro :

Sub Main
   Dim param(2) As New com.sun.star.beans.PropertyValue
   oDoc = ThisComponent

param(0).Name = "Pages"
   param(0).Value = "1-2"
   param(1).Name = "CopyCount"
   param(1).Value = 1
   param(2).Name = "PaperOrientation"
   param(2).Value = 0

oDoc.Print(param())
End sub

Si vous regardez ici, elle n'a pas le même comportement chez moi et chez mon interlocuteur : https://forum.openoffice.org/fr/forum/viewtopic.php?f=8&t=62641 . Le pire, c'est que chez moi si j'utilise LibO ou AOO, je n'ai pas le même résultat qui n'est jamais comme le sien. Et le comportement que je cherche à avoir est celui qu'il a.

Est-ce que vous pouvez me dire ce qu'il se passe quand vous lancez la macro alors que la 1e feuille, puis après la 3e est active.