Sorry für die späte Antwort
Für die Tabelle kann man mit dem NotesRichTextNavigator allgemeine Farbvorgaben machen, alternierende Zeilenfarben usw. Für die einzelne Zelle geht es nicht via LS. Da helfen nur andere Wege über HTML/Mime oder DXL Exporter/Importer.
Du kannst aber eigene Textstyles definieren und zuweisen (nur ein Auszug):
Dim rti As New NotesRichTextItem (doc, "Body")
Dim rtt As NotesRichTextTable
Dim rtnav As NotesRichTextNavigator
Set rtnav = rti.CreateNavigator
Dim richStyleFett10 As NotesRichTextStyle
Set richStyleFett10 = s.CreateRichTextStyle
richStyleFett10.NotesFont = rti.GetNotesFont("Vorgabe Sans Serif",True)
richStyleFett10.Bold = True
richStyleFett10.FontSize = 10
....
....
Call rtNav.FindNextElement(RTELEM_TYPE_TABLECELL)
Call rti.BeginInsert(rtnav)
Call rti.AppendStyle(richStyleFett8)
Call rti.AppendText("HIER DEIN WERT AUS DEM x-ten Document der embedded view")
Call rti.EndInsert
Call rtt.AddRow(x, y)
Du findest hier im Forum jede Menge zum Thema Tabellen mit LS füllen und bearbeiten. Die Navigation durch die Zellen mag erstmal gewöhnungsbedürftig sein, wenn man aber einmal das Gerüst hat, sind auch komplexere Tabellen und Ausdrucke ganz ordentlich machbar