Wenn dies Ihr erster Besuch hier ist,
lesen Sie bitte zuerst die Hilfe - Häufig gestellte Fragen
durch. Sie müssen sich vermutlich registrieren,
bevor Sie Beiträge verfassen können. Klicken Sie oben auf 'Registrieren', um den Registrierungsprozess zu
starten. Sie können auch jetzt schon Beiträge lesen. Suchen Sie sich einfach das Forum aus, das Sie am meisten
interessiert.
Vielleicht solltest du sollche Fragen in einem expliziten Word Automatisierungs Forum stellen (ich kenne keins). Hier geht es nur um die Sprache VB.Net als solches. Hier also jemand zu finden der die helfen kann ist eher unwahrscheinlich.
Worin könnte der Sinn liegen in einem Macro - dem Programmcode von Word - unsichtare Zeilen zu haben
Ich merke, dass ich meine Frage wohl unpassend formuliert habe!
Ich meinte eigentlich nicht im Makro selbst unsichtbar zu schreiben. Das Makro soll unsichtbare Zeilen in ein Dokument schreiben (die textart, mit der ich schreiben möchte soll also unsichtbar sein... nicht die Textart bzw. der Text im Makro selbst. Da ist es ja nicht möglich (und das ist auch gut so) die Schriftart zu ändern!
Vielleicht solltest du sollche Fragen in einem expliziten Word Automatisierungs Forum stellen (ich kenne keins). Hier geht es nur um die Sprache VB.Net als solches. Hier also jemand zu finden der die helfen kann ist eher unwahrscheinlich.
Okay .... Ich habe sehr wenig bis keine Programmiererfahrung (ich bin eher der "Benutzer" als der "Entwickler") und bin dankbar für jeden Hinweis.
Wahrscheinlich dann wohl mit der weißer Adler auf weißem Grund - Methode....
Das wäre zwar eine Idee, würde aber in meinem Fall nicht funktionieren, da aus den Word Dokumenten später eine Internetseite wird. Hier wäre der Hintergrund ein Bild und somit würde man den Text dort wieder sehen :/
Naja, da gäbe es noch Kommentare und Fußnoten, ggf. Formularfelder, die beim Ausdruck (und vlt bei der Webveröffentlichung?) nicht bzw. nur auf ausdrücklichen Wunsch gedruckt werden.
In den Schriftarteinstellungen gibt es dann auch noch das Attribut "ausgeblendet" ...
Wie würdest du ohne Wordmakro, also zu Fuß "unsichtbar schreiben"?
Wenn das klar ist, dann kannst du dir ja einfach ein Makro aufzeichnen, während du die gewünschten Formatierungen einstellst (Entwicklertools -> Makro aufzeichnen).
[highlight=vb]
Sub Makro3()
'
' Makro3 Makro
'
'
Selection.TypeText Text:="Dieser Text wird jetzt gleich ausgeblendet."
Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
With Selection.Font
.Name = "Arial"
.Size = 10
.Bold = False
.Italic = False
.Underline = wdUnderlineNone
.UnderlineColor = wdColorAutomatic
.StrikeThrough = False
.DoubleStrikeThrough = False
.Outline = False
.Emboss = False
.Shadow = False
.Hidden = True ' <---- ich denke mal, das ist es
.SmallCaps = False
.AllCaps = False
.Color = wdColorAutomatic
.Engrave = False
.Superscript = False
.Subscript = False
.Spacing = 0
.Scaling = 100
.Position = 0
.Kerning = 0
.Animation = wdAnimationNone
End With
End Sub
[/highlight]
Naja, da gäbe es noch Kommentare und Fußnoten, ggf. Formularfelder, die beim Ausdruck (und vlt bei der Webveröffentlichung?) nicht bzw. nur auf ausdrücklichen Wunsch gedruckt werden.
In den Schriftarteinstellungen gibt es dann auch noch das Attribut "ausgeblendet" ...
Wie würdest du ohne Wordmakro, also zu Fuß "unsichtbar schreiben"?
Wenn das klar ist, dann kannst du dir ja einfach ein Makro aufzeichnen, während du die gewünschten Formatierungen einstellst (Entwicklertools -> Makro aufzeichnen).
[highlight=vb]
Sub Makro3()
'
' Makro3 Makro
'
'
Selection.TypeText Text:="Dieser Text wird jetzt gleich ausgeblendet."
Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
With Selection.Font
.Name = "Arial"
.Size = 10
.Bold = False
.Italic = False
.Underline = wdUnderlineNone
.UnderlineColor = wdColorAutomatic
.StrikeThrough = False
.DoubleStrikeThrough = False
.Outline = False
.Emboss = False
.Shadow = False
.Hidden = True ' <---- ich denke mal, das ist es
.SmallCaps = False
.AllCaps = False
.Color = wdColorAutomatic
.Engrave = False
.Superscript = False
.Subscript = False
.Spacing = 0
.Scaling = 100
.Position = 0
.Kerning = 0
.Animation = wdAnimationNone
End With
End Sub
[/highlight]
also Selection.Font.Hidden..
Viel Spaß
Tino
Danke. Das hat mein Problem gelöst. Die idee mit der Aufzeichnung ist ohnehin echt gut für Kleinigkeit, von denen man die Funktionsbezeichner nicht kennt!
Comment