This commit is contained in:
2021-03-04 15:47:48 +01:00
parent 3aaf328ce6
commit b4612ab3e0
142 changed files with 24372 additions and 14785 deletions

View File

@@ -46,7 +46,6 @@ Public Class usrCntlSeriendruck
If s.Length > 6 Then WordDoc.FormFields("txtAdresseZeile7").Range.Text = s(6)
End If
Else
WordDoc.FormFields("txtAdresseZeile1").Range.Text = bericht.Name.Trim
WordDoc.FormFields("txtAdresseZeile2").Range.Text = bericht.Straße
WordDoc.FormFields("txtAdresseZeile3").Range.Text = bericht.LandKz & " " & bericht.Ort