benutzerdefinierte Symbolleiste optimieren

[Karthagos]

ich versuche gerade mal wieder, meine CorelDraw Symbolleisten noch etwas zu optimieren.
1. Wenn ich ein Objekt importiere, steht der Objektursprung standardmässig auf Mitte
     
gibt es eine Möglichkeit, den Standard auf links oben umzustellen
   
2. Kann ich und wenn ja, wie, den Menüpunkt  >Optionen >Anpassung >Befehle als Symbol in meine benutzerdefinierte Symbolleiste einfügen
   
3. Wie kann ich alle Hilfslinien auf einmal löschen (als Befehl oder evtl. per Makro)

[koter]

Hallo Günther,

für Punkt 3 könnte dieses Makro nützlich sein:

Code:

Sub HLKiller()
   Dim p As Page
   Dim s As Shape
   For Each p In ActiveDocument.Pages
       p.Guides.All.Delete
   Next
   For Each s In ActiveDocument.MasterPage.GuidesLayer.Shapes
       If s.Type = cdrGuidelineShape Then s.Delete
   Next
   For Each s In ActiveDocument.MasterPage.DesktopLayer.Shapes
       If s.Type = cdrGuidelineShape Then s.Delete
   Next
End Sub

Gruß

Koter

[Litschi]

Zu Punkt 3; ich markiere immer eine Hilfslinie, drücke dann STRG+A (alle auswählen), anschließend ENTF.

[Karthagos]

Hallo Koter,
vielen Dank für das Makro, werde ich gleich mal testen

Hallo Litschi,
vielen Dank auch für Deinen Tipp, der erscheint mir sehr praxisgerecht

Jetzt muss ich mich nur noch entscheiden, welche der beiden Möglichkeiten ich besser finde 

[koter]

Hallo Günther,

...Hallo Litschi,
vielen Dank auch für Deinen Tipp, der erscheint mir sehr praxisgerecht...

ich würde Litschis Lösung verwenden!
Wenn Dir das genügt ist es die bessere Lösung.
(Vielleicht mit etwas mehr Arbeit verbunden)

Nur wenn Du wirklich alle Hilfslinien im Dokument löschen willst,
wäre das Makro sinnvoll. Es löscht aber auch Hilfslinien die gerade nicht
sichtbar sind, weil sie sich z.B. nicht auf der aktuellen Seite befinden
oder ausgeblendet sind.

Gruß

Koter

P.S. zu Punkt 1 und 2 habe ich leider keine Idee.