wie kann man Text eines Textfeldes
Verfasst: Mo, 21.11.2005 22:50
Hallo an alle, die sich an folgendem Problem probieren möchten:
Ich habe ein Formular auf einem StarOffice Tabellenblatt (Calc) erstellt.
Unter anderem soll der Inhalt eines Textfeldes in eine Zelle geschrieben werden.
Er soll aber gleichzeitig mit einem weiteren Textfeld-Inhalt und einem Wort (als Verbindung) geschrieben werden.
Also, in der Zelle soll dann stehen:
Textfeld1 "und" Textfeld2
Habs mit diesem Code probiert:
Das funktioniert aber nicht: "und" unerwartet.
Dann wollte ich die Tabellenfunktion VERKETTEN benutzen, geht aber nicht. Der englische Begriff CONCATENATE geht auch nicht.
Habe den Code hier getestet:
Oder muss ich die Funktionen anders in den Code schreiben?
Vielleicht gehts auch viel einfacher??
Ich habe ein Formular auf einem StarOffice Tabellenblatt (Calc) erstellt.
Unter anderem soll der Inhalt eines Textfeldes in eine Zelle geschrieben werden.
Er soll aber gleichzeitig mit einem weiteren Textfeld-Inhalt und einem Wort (als Verbindung) geschrieben werden.
Also, in der Zelle soll dann stehen:
Textfeld1 "und" Textfeld2
Habs mit diesem Code probiert:
Code: Alles auswählen
Sub Texte
myDoc = thisComponent
mySheet = myDoc.sheets(0)
myForm = mySheet.drawpage.forms(0)
myCell = mySheet.getCellRangeByName("$B$7")
myCtl1 = myForm.getByName("Text1")
myCtl2 = myForm.getByName("Text2")
lese1 = myCtl1.Text
lese2 = myCtl2.Text
myCell.string = lese1;"und";lese2
End Sub
Dann wollte ich die Tabellenfunktion VERKETTEN benutzen, geht aber nicht. Der englische Begriff CONCATENATE geht auch nicht.
Habe den Code hier getestet:
Code: Alles auswählen
Sub Texte
myDoc = thisComponent
mySheet = myDoc.sheets(0)
myForm = mySheet.drawpage.forms(0)
myCell = mySheet.getCellRangeByName("$B$7")
myCtl1 = myForm.getByName("Text1")
myCtl2 = myForm.getByName("Text2")
lese1 = myCtl1.Text
lese2 = myCtl2.Text
myCell.string = concatenate(lese1;"und";lese2)
End Sub
Vielleicht gehts auch viel einfacher??