OpenOffice.info

[quote="MaximilianWe"]
[i]Main
…............
move("Tabelle1.B12:B378","Tabelle1.F21","copy")
[color=#FF0000]move("C7:C14", "Tabelle1.G21:G398","copy") ****bei diesem Aufruf Fehlermeldung******[/color]
arg="Tabelle1.E" & hdbeginn & ":E413"
move(arg,"Tabelle1.H21","copy")
…....
end sub
[/quote]
Ohne mich in Starbasic auszukennen würde ich mal behaupten, dass es am fehlenden Tabellennamen liegt (vor C7:C14") .

beim Schreiben eines Basics tritt immer wieder die Fehlermeldung: [i]diese Funktion kann nicht bei Mehrfachnennung verwendet werden.[/i]
Allerdings ist sie für mich nicht rekonstruierbar, weil sie nach einigen weiteren Codezeilen oder Änderungen nicht mehr auftritt.
Z.B.:
[i]Main
…............
move("Tabelle1.B12:B378","Tabelle1.F21","copy")
move("C7:C14", "Tabelle1.G21:G398","copy") ****bei diesem Aufruf Fehlermeldung******
arg="Tabelle1.E" & hdbeginn & ":E413"
move(arg,"Tabelle1.H21","copy")
…....
end sub


sub move (from as string, dest as string, typ as string ) as string
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 = from
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())

rem ----------------------------------------------------------------------
if typ = "cut" then
dispatcher.executeDispatch(document,".uno:Cut", "",0, Array())
else

dispatcher.executeDispatch(document,".uno:Copy", "",0, Array()
end if

rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "ToPoint"
args3(0).Value =dest
dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args3())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())
dest=" "
from=" "
args1(0).Value= 0
args3(0).Value=0
end sub[/i]

Ich kann also nicht herausfinden, was zu diesen FM führt. Einen Codefehler in diesem Zusammenhang habe ich nie orten können.
Kann mir jemand erklären, welche Methodik hinter dieser FM steckt?

Max