lo so che sicuramente ci sono dei modi più smart (e sarebbe bello conoscerli) per fare quello che ho chiesto di fare a questa macro... ma abbiate pietà di me sono un novellino al riguardo.
la domanda è: come faccio a far si che alla decima riga il codice riconosca il valore della variabile definita alla quarta riga.
grazie mille ai coraggiosi che mi daranno una mano.
Codice: Seleziona tutto
sub Main
cella = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
numero = 2
dim ciccio(0) as new com.sun.star.beans.PropertyValue
ciccio(0).Name = "ToPoint"
ciccio(0).Value = "$a$1"
dim Pippo2(0) as new com.sun.star.beans.PropertyValue
Pippo2(0).Name = "StringName"
Pippo2(0).Value = numero
dispatcher.executeDispatch(cella, ".uno:GoToCell", "", 0, ciccio())
dispatcher.executeDispatch(cella, ".uno:EnterString", "", 0, Pippo2())
dispatcher.executeDispatch(cella, ".uno:JumpToNextCell", "", 0, Array())
end sub