Das Notes Forum

Domino 9 und frühere Versionen => ND7: Administration & Userprobleme => Thema gestartet von: bezi27 am 25.04.09 - 23:57:16

Titel: EXCEL-Text mit Script formatieren
Beitrag von: bezi27 am 25.04.09 - 23:57:16

Hallo,

ich habe ein ganz spezielles Problem (Notes 7) und trotz aller Versuche bin ich bisher auf keinen grünen Zweig gekommen.
Daher hoffe ich, dass mir hier ein Experte weiterhelfen kann:

Ich erstelle und befülle eine Tabelle im EXCEL über Script.
Dabei werden auch Zellen in dieser Tabelle verbunden und mit Text befüllt.
so weit, so gut.

Aber:
Ich möchte einen Teil des Textes in dieser Zelle fett schreiben.
Im EXCEL funktioniert das ja auch ganz gut, aber das Script lässt den Syntax nicht zu!

Im Excel schaut das so aus (Beispiel):

ActiveCell.FormulaR1C1 = _
        "erste Zeile - Standardschrift." & Chr(10) & "Zweite Zeile - ebenso." & Chr(10) & "" & Chr(10) & "Dritte Zeile - die ist jetzt fett geschrieben." & Chr(10) & "" & Chr(10) & "Vierte "
    With ActiveCell.Characters(Start:=1, Length:=55).Font
        .Name = "Arial"
        .FontStyle = "Standard"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
    With ActiveCell.Characters(Start:=56, Length:=55).Font
        .Name = "Arial"
        .FontStyle = "Fett"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
    Range(Selection, Cells(ActiveCell.Row, 1)).Select
    ActiveCell.FormulaR1C1 = _
        "erste Zeile - Standardschrift." & Chr(10) & "Zweite Zeile - ebenso." & Chr(10) & "" & Chr(10) & "Dritte Zeile - die ist jetzt fett geschrieben." & Chr(10) & "" & Chr(10) & "Vierte Zeile - wieder Standardschrift."
    With ActiveCell.Characters(Start:=1, Length:=55).Font
        .Name = "Arial"
        .FontStyle = "Standard"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
    With ActiveCell.Characters(Start:=56, Length:=48).Font
        .Name = "Arial"
        .FontStyle = "Fett"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With
    With ActiveCell.Characters(Start:=104, Length:=38).Font
        .Name = "Arial"
        .FontStyle = "Standard"
        .Size = 10
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ColorIndex = xlAutomatic
    End With

Im Script ist es aber leider nicht möglich, die Anweisung "Start := " zu geben - hier wird immer ein Fehler angezeigt.

Weiß jemand eine alternative Schreibweise fürs EXCEL?

Vielen Dank im Voraus!

bezi27

Titel: Re: EXCEL-Text mit Script formatieren - Nachsatz
Beitrag von: bezi27 am 26.04.09 - 00:11:19

Uuuuuuuuuuuuuups - sorry!

Nachdem ich in diesem Forum schon mal fürchterlich geschimpft wurde, weil ich mich mit dem Nickname verabschiedet habe, hier die Korrektur: ;)

Vielen Dank im Voraus

Bettina

Titel: Re: EXCEL-Text mit Script formatieren
Beitrag von: Werner Götz am 26.04.09 - 09:05:08

Lotusscript unterstützt bei Funktionsaufrufen keine benannten Parameter. Also muss statt

Code

ActiveCell.Characters(Start:=56, Length:=55)

aus Lotusscript

Code

ExcelApplication.ActiveCell.Characters(56, 55)

geschrieben werden. ExcelApplication ist hier die Variable für das Excel-Application-Objekt.

Hierbei ggf. in der Excel-Dokumentation die richtige Reihenfolge der Parameter sicherstellen. Das ist nämlich der Vorteil bei benannten Parametern: Man muss sich nicht um die Reihenfolge der Parameter kümmern.

-Werner

Titel: Re: EXCEL-Text mit Script formatieren
Beitrag von: bezi27 am 26.04.09 - 12:14:31

Lieber Werner,

allerherzlichsten Dank - die schlaflosen Nächte sind vorbei, Problem gelöst.
Funktioniert super.  ;D

merci nochmals

Bettina

Titel: Re: EXCEL-Text mit Script formatieren
Beitrag von: Axel am 26.04.09 - 18:45:15

Noch mehr infos zu dem Thema findest du hier: http://atnotes.de/index.php/topic,39862.0.html (http://atnotes.de/index.php/topic,39862.0.html)

Axel