- Code: Select all
If document.Sections.Count = 0 Then document.AddSection()
Dim table As Table = document.Sections(0).AddTable(False)
table.ResetCells(1, 2)
Dim p As Paragraph = table.Rows(0).Cells(0).AddParagraph()
p.AppendBookmarkStart("EmpfängerAdresse")
Dim txtRange As TextRange = p.AppendText("EmpfängerAdresse")
p.AppendBookmarkEnd("EmpfängerAdresse")
txtRange.CharacterFormat.FontName = FontName.Arial.ToString
txtRange.CharacterFormat.FontSize = 12
p.Format.HorizontalAlignment = TextAlignmentToHorizAlignment(TextAlignment.Left)
Dim secTable As Table = table.Rows(0).Cells(1).AddTable(False)
secTable.ResetCells(3, 2)
'secTable.Rows(0).IsHeader = True
secTable.Rows(0).RowFormat.BackColor = Color.FromArgb(112, 112, 112)
Dim p1 As Paragraph = secTable.Rows(0).Cells(0).AddParagraph
p1.AppendBookmarkStart("Dokumentart")
Dim txtRange1 As TextRange = p1.AppendText("Dokumentart")
txtRange1.CharacterFormat.TextColor = Color.White
p1.AppendBookmarkEnd("Dokumentart")
Dim p2 As Paragraph = secTable.Rows(0).Cells(1).AddParagraph
p2.AppendBookmarkStart("Dokumentnummer")
Dim txtRange2 As TextRange = p2.AppendText("Dokumentnummer")
txtRange2.CharacterFormat.TextColor = Color.White
p2.AppendBookmarkEnd("Dokumentnummer")
Dim p3 As Paragraph = secTable.Rows(1).Cells(0).AddParagraph
Dim txtRange3 As TextRange = p3.AppendText("Datum")
Dim p4 As Paragraph = secTable.Rows(1).Cells(1).AddParagraph
p4.AppendBookmarkStart("DokumentDatum")
Dim txtRange4 As TextRange = p4.AppendText("DokumentDatum")
p4.AppendBookmarkEnd("DokumentDatum")
Dim p5 As Paragraph = secTable.Rows(2).Cells(0).AddParagraph
Dim txtRange5 As TextRange = p5.AppendText("Kundennummer")
Dim p6 As Paragraph = secTable.Rows(2).Cells(1).AddParagraph
p6.AppendBookmarkStart("Kundennummer")
Dim txtRange6 As TextRange = p6.AppendText("Kundennummer")
p6.AppendBookmarkEnd("Kundennummer")
If i save it as Word, it's fine, and converting it to PDF with other tool, it's also fine, but i want to do that with Spire.Doc.
Can you check if you meet the same error, and tell if there is any solution for this?
thank you.