Hallo,
ich würde die Tabelle abschließend durchlaufen um diese entsprechend zu formatieren. Dabei könntest du mit Instr die Position deines Zeilenumbruchs lokalisieren und alles hinter dem Zeilenumbruch entsprechend umformatieren.
Aus der Automation.chm unter den Methoden von DrawingText.
Sub SetFontSize( long iFirst,
long inbCharacter,
double iFontSize)
Sets the font size on a substring of the drawing text.
Parameters:
iFirst
The first character to which the property should apply
inbCharacter
The number of characters to which the property should apply
iFontSize
The size of the font
Example:
This example sets the MyText font size to 3.5.
iFontSize = 3.5
MyText.SetFontSize 0, 0, iFontSize
Gruß
Randle
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP