Hallo Jörg,
erst mal sorry, dass ich mich erst jetzt melde. Stecke in einem
Riesenprojekt drin und kann mich für die Makros immer nur kurz
loseisen.
Hab Deine Ergänzungen eingefügt...
> '...
> ----------------------------------------------------------------------
> rem Tabellen-Cursor erzeugen und auf Zelle A37 bewegen
> oView2.ActiveSheet
> oZelle=oDoc2.getCurrentSelection() '<---####
> selCell = oDoc2.Sheets (GetPosActiveSheet).getCellbyPosition (0,36)
> 'Makro springt auf das letzte Tab.blatt - Warum?
> oDoc2.CurrentController.Select (selCell)
>
> rem
> ----------------------------------------------------------------------
> dim args1(0) as new com.sun.star.beans.PropertyValue
> args1(0).Name = "Format"
> args1(0).Value = 1
>
> dispatcher.executeDispatch(oFrame2, ".uno:PasteSpecial", "", 0, args1())
>
> oDoc2.CurrentController.Select (oZelle) '<--####
>
> dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
>
> rem
> ----------------------------------------------------------------------
> '...
...und das Makro laufen lassen. Und jetzt bin erst richtig verblüfft:
Tatsächlich wechselt OOo in das Tabellenblatt, das vorher aktiv war. Aber
nun halt Dich fest: Es fügt den Inhalt aus der Zwischenablage im LETZTEN
Tabellenblatt ein zu sehen ist es natürlich erst, wenn man auf das
letzte Tabellenblatt klickt und den Inhalt überprüft. Was sagst Du nun?
:-( Hoffentlich hast Du dafür eine Erklärung oder noch besser: eine
Lösung.
Grüße
Kornelia
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
