Fehlermeldung: Funktion kann nicht bei Mehrfach.....

Setup und Komponenten-übergreifende Probleme.

Moderator: Moderatoren

MaximilianWe
**
Beiträge: 29
Registriert: Mo, 08.11.2010 20:25

Fehlermeldung: Funktion kann nicht bei Mehrfach.....

Beitrag von MaximilianWe »

beim Schreiben eines Basics tritt immer wieder die Fehlermeldung: diese Funktion kann nicht bei Mehrfachnennung verwendet werden.
Allerdings ist sie für mich nicht rekonstruierbar, weil sie nach einigen weiteren Codezeilen oder Änderungen nicht mehr auftritt.
Z.B.:
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


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
pmoegenb
********
Beiträge: 4330
Registriert: Di, 22.06.2004 12:02
Wohnort: 71134 Aidlingen
Kontaktdaten:

Re: Fehlermeldung: Funktion kann nicht bei Mehrfach.....

Beitrag von pmoegenb »

MaximilianWe hat geschrieben: 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

Ohne mich in Starbasic auszukennen würde ich mal behaupten, dass es am fehlenden Tabellennamen liegt (vor C7:C14") .
Gruß

Peter
---------------------------------------------------------------------------
Windows 7 Prof. 64-bit SP1, LibreOffice 4.3.6.2 und AOO 4.1.1
Antworten