Discussion :

[ickyknox]

Bonjour à tous,

Quelqu'un pourrait me traduire ce langage VBA en OPEN OFFICE s'il vous plait?
J'ai des tuto mais je n'arrive pasà trouver comment faire car je ne suis pas très fort en macro.

Code :

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

Worksheets("1").Range("A2") = "1"

MERCI BEAUCOUP

[Sepia]

Salut,

Avec OpenOffice, l'enregistreur de macros te renvoit ça :

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
17
18
19
20
21
22
23
24
25
26
27
28
 
sub Main
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 = "ToPoint"
args1(0).Value = "$B$1"
 
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())
 
rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "StringName"
args2(0).Value = "1"
 
dispatcher.executeDispatch(document, ".uno:EnterString", "", 0, args2())
 
rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:JumpToNextCell", "", 0, Array())
end sub

Mais attention avec OO, la technique n'est pas la même, donc traduire ligne à ligne une macro n'a pas vraiment de sens. Il faut réutiliser les primitives de OO donc refaire, ce qui est terrible, car sinon tu risques de gros ennuis surtout sur ce qui concerne la gestion de la numérotation, de la pagination, des propriétés des documents, des champs et de quelques signets. Attention, il ne s'agit pas de dire si l'un ou l'autre est mieux mais bien de dire qu'ils sont différents donc traitement spécifique & donc réécriture plus que portage.