Office - Word, Excel und Co. 9.703 Themen, 40.813 Beiträge

Word 2000_Knickmarkierung

Marwoj / 4 Antworten / Flachansicht Nickles

Hallo,
ich habe mal in altem WORD97 mir die s.g.(Striche zum Knicken im Brief bzw.Vorlage) eigerichtet. Jetzt habe ich natürlich vergessen wie das entstand ist.Es geht um Markierung für Fensterumschlag. Hat jemand eine Idee? Muss doch einfach gehen oder?
Gruss Marwoj

amat victoria curam
bei Antwort benachrichtigen
fussel Marwoj „Word 2000_Knickmarkierung“
Optionen

Hi,
versuche es doch mit diesem Makro:
Sub FalzUndLochmarkeEinfügen()
Dim oKz As HeaderFooter, FM As Shape, LM As Shape
Set oKz = ActiveDocument.Sections(1).Headers(1)
'Die Länge des Striches (Faltmarke) beträgt 1,2 - 0,5 = 0,7 cm
Set FM = oKz.Shapes.AddLine(CentimetersToPoints(0.5), _
CentimetersToPoints(10.4), _
CentimetersToPoints(1.2), _
CentimetersToPoints(10.4))

FM.Line.Weight = 0.25
FM.LockAnchor = True
'Die Länge des Striches (Lochmarke) beträgt 0,9 - 0,5 = 0,4 cm
Set LM = oKz.Shapes.AddLine(CentimetersToPoints(0.5), _
CentimetersToPoints(14.85), _
CentimetersToPoints(0.9), _
CentimetersToPoints(14.85))
LM.Line.Weight = 0.25
LM.LockAnchor = True
End Sub
Viel Spaß!

bei Antwort benachrichtigen