Können Visio-Hintergrundseiten Ränder für die Vordergrundseite festlegen?

551
cxw

Frage: Gibt es eine Möglichkeit, die Ränder einer Vordergrundseite in Visio 2007 automatisch an die Ränder der entsprechenden Hintergrundseite anzupassen?

Situation: Mein Visio 2007-Dokument enthält eine Hochformathintergrundseite und eine Querformathintergrundseite. Sie haben die gleichen Ränder, sind jedoch um 90 Grad gedreht, sodass der obere Rand der Hochformatseite der rechte Rand der Querformatseite ist.

Problem: Wenn ich eine Hochformat-Vordergrundseite (unter Verwendung des Hochformathintergrunds) und dann eine Querformat-Vordergrundseite (unter Verwendung des Querformathintergrunds) einfügen, hat die Querformatseite die nicht gedrehten Ränder der Hochformatseite.

VBA-Antworten sind in Ordnung, wenn es darum geht. Vielen Dank für alle Ideen, die Sie anbieten können!

1

1 Antwort auf die Frage

0
cxw

Nun, ich habe ein bisschen gejagt und nichts Automatisches gefunden. Wenn Sie einen automatischen Weg finden, bitte posten! Ich verwende die folgenden Makros, in einer benutzerdefinierten Schablone pro diesem, neue Seiten zu reparieren, nachdem sie zu schaffen. Ändern Sie die 1, 0.625, 0.4Werte unabhängig von Rändern Sie (in Zoll, zumindest auf einer US - Installation von Visio und Windows).

Public Sub MarginsPortrait() Application.ShowChanges = False With ActivePage.PageSheet .Cells("PageTopMargin") = 1 .Cells("PageLeftMargin") = 1 .Cells("PageRightMargin") = 0.625 .Cells("PageBottomMargin") = 0.4 End With Application.ShowChanges = True End Sub  Public Sub MarginsLandscape() Application.ShowChanges = False With ActivePage.PageSheet .Cells("PageRightMargin") = 1 .Cells("PageTopMargin") = 1 .Cells("PageBottomMargin") = 0.625 .Cells("PageLeftMargin") = 0.4 End With Application.ShowChanges = True End Sub

Verwandte Probleme