Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Shapes angleichen
zurück: Anfängerfrage Fremdschlüssel & ntext weiter: Viso PERT - Daten von MS Project importieren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
manuche
Fachproblematiker


Verfasst am:
09. Apr 2010, 14:54
Rufname:
Wohnort: BiFi

Shapes angleichen - Shapes angleichen

Nach oben
       

Hallo,

ich bin heute frisch mit MS Visio eingstiegen und benötige es für eine Projektarbeit.
Ich hab meinen Ablaufplan thematisch schon fertiggestellt nur leider scheitert es noch an der Formatierung. Ich hab schon lange gebraucht, um zwei Shaps in einer Flucht auszurichten, allerdings scheitere ich grad daran, mehreren Shapes gleichzeitig die gleiche Größe mitzuteilen.
Geht sowas überhaupt oder muss ich alle einzeln anpacken?

Gruß
Jump(y)
Gast


Verfasst am:
09. Apr 2010, 22:15
Rufname:


AW: Shapes angleichen - AW: Shapes angleichen

Nach oben
       

Hallo,

Visio bietet viele Möglichkeiten der Unterstützung im gesuchten Bereich, doch muss man sich in manches davon erst mal einarbeiten. Zudem gibt es für viele Zwecke gute Vorlagen, die einem viel Arbeit abnehmen.

Was das Ausrichten angeht gibt es in der Menüleiste Shape->Shape ausrichten einen Assistenten, der einem hilft Shapes auszurichten und gleichmässig zu verteilen. Es gibt auch eine Symbolleiste mit den entsprechenden Werkzeugen, die man unter Ansicht->Symbolleiste einblenden kann.

Zudem gibt es unter unter Shapes auch die Option "Shapes neu ausrichten" und "Layout konfiguriren" die die Shapes ja nach Layout (z.B. Flußdiagramm) autom. platzieren.

-----

Was deine zweite Frage mit der Größe angeht musst du leider jedes Shape anpacken. Es gibt unter Ansicht den Punkt Größe und Positionsfenster, der dabei sehr hilfreich ist.

Wenn du dich etwas mehr einarbeitest, kannst du auch Shapes selber erstellen die alle z.B. ihre Größe nach einer global auf dem Zeichenblatt eingebbaren Wert richten.
Oder du schreibst eine kurze VBA-Prozedur, die mal eben alle Shapes anpasst, wie die Folgende:
Code:
Sub Anpassen()
    Dim Shp As Visio.Shape

    For Each Shp In ActivePage.Shapes
        If Shp.OneD = False Then
            Shp.Cells("Width").Result("MM") = XXX   '<= Hier gewünschte Breite in mm einsetzen
            Shp.Cells("Height").Result("MM") = YYY    '<= Hier gewünschte Höhe in mm einsetzen
        End If
    Next Shp
End Sub
Einfach Alt+F11 drücken, dann geht der VBA-Editor auf. Da im Modul ThisDocument das obige reinkopieren, XXX und YYY durch die gewünschten Zahlen ersetzen, dann VBA-Editor schliesen und das Makro "Anpassen()" unter Extras->Makros in der Menüleiste starten.
Es verändert dann alle 2D Shapes, alles ausser Verbindungslinien.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge MS Visio Forum: Wie lasse ich benutzerdefinierte Shapes einrasten? 1 Gast 1710 21. Aug 2009, 15:29
Gast Wie lasse ich benutzerdefinierte Shapes einrasten?
Keine neuen Beiträge MS Visio Forum: Alle Shapes eines Typs markieren? 0 Nachrichtentext 905 30. Jul 2009, 08:29
Nachrichtentext Alle Shapes eines Typs markieren?
Keine neuen Beiträge MS Visio Forum: Eigene Shapes über Organigramm Assistent 2 so.cold 1719 25. Mai 2009, 16:04
so.cold Eigene Shapes über Organigramm Assistent
Keine neuen Beiträge MS Visio Forum: Visio Bericht (Auswertung) verbundene Shapes 0 sp0001 2315 24. Mai 2009, 20:07
sp0001 Visio Bericht (Auswertung) verbundene Shapes
Keine neuen Beiträge MS Visio Forum: Feste Positionen für Shapes - Seitenplan 1 cyris 1797 20. Mai 2009, 15:48
jester1966de Feste Positionen für Shapes - Seitenplan
Keine neuen Beiträge MS Visio Forum: Gruppierte Shapes mit Informationen bestücken 1 Mexxchen 791 14. Mai 2009, 09:51
Mexxchen Gruppierte Shapes mit Informationen bestücken
Keine neuen Beiträge MS Visio Forum: Verknüpfte Shapes auslesen 0 Bigfoot68 494 13. Mai 2009, 14:16
Bigfoot68 Verknüpfte Shapes auslesen
Keine neuen Beiträge MS Visio Forum: Unique-IDs für Shapes 6 Mexxchen 698 13. Mai 2009, 09:08
Mexxchen Unique-IDs für Shapes
Keine neuen Beiträge MS Visio Forum: CAD-Anwender auf Visio - erstellen von eigenen Shapes 1 Konrad1 4641 02. Dez 2008, 10:03
MBreugst CAD-Anwender auf Visio - erstellen von eigenen Shapes
Keine neuen Beiträge MS Visio Forum: 2D Shapes Kleben und auslesen 4 Lisa83 1900 25. Aug 2008, 14:16
Lisa83 2D Shapes Kleben und auslesen
Keine neuen Beiträge MS Visio Forum: Shapes mit veränderbaren Text erstellen 3 RolandE 2212 04. Aug 2008, 22:19
GuidoK Shapes mit veränderbaren Text erstellen
Keine neuen Beiträge MS Visio Forum: Shapes beschriften und Text in ExcelTabelle schreiben 7 Lisa83 2910 28. Jul 2008, 11:41
MSVISIO 2002 Shapes beschriften und Text in ExcelTabelle schreiben
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Word Serienbriefe