Discussion :

[laconst]

Bonjour,

Je veux créer une macro qui gère un bouton sur OOo.calc. Celui ci est que lorsque je clique sur mon bouton "facture", ça me renvoie a la feuille nommée facture, qui se trouve dans le meme classeur que le bouton, mais le programme que j'ai créé m'ouvre un nouveau classeur avec nouvelle feuille vierge.

Voici mon programme

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub Main
Dim mNoArgs()
Dim oDesktop As Object
Dim oDocument As Object
Dim sUrl As String
oDesktop = createUnoService("com.sun.star.frame.Desktop")
sUrl = "private:factory/scalc"
oDocument = _
oDesktop.LoadComponentFromURL(sUrl,"_blank",0,mNoArgs())
End Sub

Q'u'est ce qui ne va pas??
merci pour votre aide

[Daranc]

Disons que le VBA et le language macro de Ooo ne sont pas compatible
l'enregistreur de macro de calc me donne ceci

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
Sub essai2
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 ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Nr"
 args1(0).Value = 2
dispatcher.executeDispatch(document, ".uno:JumpToTable", "", 0, args1())
end sub

apparemment c'est l'index de la feuille qui est pris en compte (et sa position dans le classement )
Il serait surement mieux de poser la question par ici

[laconst]

Merci pour ta reponse,
ton code me renvoie bien a une feuille du meme classeur, mais pas a la feuille que je désire, que dois je changer et ou dans ton code afin de mettre le bon nom de la feuille :"facture"?

merci beaucoup

[Daranc]

moi je suis plutot sur VBA
je n'ai pas réussi à comprendre comment on nomme une feuille sur Ooo c'est pourquoi je te renvoies au forum open office