Textrahmen mit Makro verschieben ? [gelöst] DANKE !

[SteffCN]

Hallo,
ich öffne einige WordDokumente.
Bei bestimmten Formularen befinden sich einige Textrahmen nicht an der richtigen Stelle.

Ist es möglich, diese Textrahmen mit einem Makro zu verschieben ?
Wenn ich es als Makro aufzeichne, passiert in diesem Makro leider gar nix

Danke & Gruß
Steff

[komma4]

Das ist bestimmt möglich.

Mit Deinen Angaben kann ich Dir allerdings keinen Tipp für eine Fundstelle von Code geben:

sind das (programmtechnisch gesehen) Textrahmen? Oder Umrandungen von Textfeldern eines Formulars? Oder was...?


Untersuche das Dokument mit XRAY!


Viel Erfolg!

[SteffCN]

Hallo,
XRAY kann ich nicht downloaden:
http://ooomacros.org/dev.php#101416
ist leider immer noch down.

Hat jemand eine andere vertrauenswürdige Seite ?

Im Navigator vom Writer wird es als Textrahmen angezeigt.

Danke & Gruß
Steff

[Karolus]

Hallo

Hat jemand eine andere vertrauenswürdige Seite ?

http://sourceforge.net/projects/ooomacr ... ion%205.2/

Gruß Karo

[SteffCN]

Danke Karo

XRAY sagt zu den Textrahmen:
ElementType type pseudo-prop, read-only
ElementNames []string pseudo-prop, read-only
Count long 8 pseudo-prop, read-only
ImplementationName string "SwXTextFrames" pseudo-prop, read-only
SupportedServiceNames []string pseudo-prop, read-only
Types []type pseudo-prop, read-only
ImplementationId []byte pseudo-prop, read-only
Dbg_Properties string <...> basic prop, read-only
Dbg_Methods string <...> basic prop, read-only
Dbg_SupportedInterfaces string <...> basic prop, read-only

Ich habe mich schon versucht mit
jumptonextframe & framedialog
aber das ist ja echt eine schwer verständliche Welt für sich

Gruß aus Hamburg
Steff

[DPunch]

Aloha

Ist es möglich, diese Textrahmen mit einem Makro zu verschieben ?

Prinzipiell funktioniert das ganz einfach so

Code: Alles auswählen

	sFrameName = "Rahmen1"
	nPosX = 5000
	nPosY = 5000
	oDoc = thisComponent
	oTextFrame = oDoc.TextFrames.getByName(sFrameName)
	oTextFrame.HoriOrientPosition  = nPosX
	oTextFrame.VertOrientPosition = nPosY

Dabei ist allerdings zu beachten, dass die Einstellung der Verankerung passen muss, so lässt sich z.B. die Position bei Verankerung "als Zeichen" natürlich nicht verändern.

[SteffCN]

Prinzipiell funktioniert das ganz einfach so

Ja - klasse !

Genau so funktioniert es in diesem Word-Dokument

Danke & Gruß
Steff