Hallo Leute,
ich verzweifle gleich und hoffe, mir kann hier geholfen werden ;O(
Ich fülle von Excel aus mittels VBA Textfelder in Word. Soweit kein Thema...aber ich möchte gerne in einigen Textfeldern einen Zeilenumbruch hinbekommen. Dies gelingt mir aber gänzlich nicht. Egal welchen code ich benutze, es kommt immer nur das Quadrat (Steuerzeichen) zwischen den beiden Textteilen zum Vorschein.
Ich habe es nun mit vbCrLf, vbLF, CHR(10) und CHR(13) versucht. Nichts hat geholfen. Hat wer noch eine Idee? Im Archiv und bei Google hab ich nichts gefunden...
Beispielcode:
Dim wrdApp As Word.Application
Dim wrdDoc As Word.Document
Dim z As Integer
Set wrdApp = GetObject(, "Word.Application")
If Err = 429 Then Set wrdApp = GetObject("", "Word.Application")
wrdApp.Visible = False
wrdApp.Activate
wrdApp.Documents.Add Template:=ActiveWorkbook.Path & "\Abrechnung_DG.dot ", NewTemplate:=False
For z = 1 To 8
wrdApp.ActiveDocument.FormFields("RueckUhr_0" & z).Result = wrdApp.ActiveDocument.FormFields("RueckUhr_0" & z).Result & vbCrLf & Format(Worksheets("Abrechnung_DG").Range("p" & z).Value, "hh:mm")
Next z
End sub