[GastForen Programme Office Microsoft Office alle rotierten Textrahmen auf null Grad stellen [Word 2019, Win10]

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Office - Alles fürs Büro
Themen
Beiträge
Moderatoren
Letzter Beitrag

alle rotierten Textrahmen auf null Grad stellen [Word 2019, Win10]

cwenet
Beiträge gesamt: 1139

14. Mai 2022, 13:56
Beitrag # 1 von 2
Bewertung:
(11293 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Guten Tag,

wie kann ich mehrere Textrahmen (verteilt in einem einseitigen Dokument) mit jeweils unterschiedlichem Rotationswinkel auf einen einheitlichen Wert stellen?
Also alle Rähmchen sollten z.B. auf null Grad stehen.

Evtl. auch mit Makro möglich?

Grüße
Christoph
X

alle rotierten Textrahmen auf null Grad stellen [Word 2019, Win10]

cwenet
Beiträge gesamt: 1139

15. Mai 2022, 08:58
Beitrag # 2 von 2
Beitrag ID: #583472
Bewertung:
(11251 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Ich bins nochmal,

habe tatsächlich etwas gefunden:
Code
Sub drehen() 
Dim shp As Shape
For Each shp In ActiveDocument.Shapes
If shp.Type = msoTextBox Then
shp.Rotation = 0
End If
Next
End Sub


Grüße
Christoph


als Antwort auf: [#583471]