imported>Siegbert v2: + GND

2026-01-09T07:16:03Z

+ GND

Neue Seite

'''StarOffice Basic''' (auch bekannt unter der Bezeichnung '''StarBasic''' und '''OOoBasic''') ist ein [[BASIC]]-Dialekt, der in die [[Office-Paket]]e [[LibreOffice]], [[OpenOffice.org]] und [[StarOffice]] und dem darauf basierenden [[IBM Lotus Symphony]] integriert ist.

== Vergleich mit anderen BASIC-Dialekten ==

StarBasic hat eine Ähnlichkeit zu anderen BASIC-Dialekten wie zum Beispiel [[Microsoft]]s [[Visual Basic for Applications|VBA]].<ref>{{Internetquelle |autor=Thomas Hümmler |url=https://www.linux-community.de/ausgaben/linuxuser/2003/05/starbasic/ |titel=StarBasic |werk=[[LinuxUser]] 05/2003 |sprache=de-DE |abruf=2023-01-23}}</ref> In der Praxis erfordert ein [[Makro]] in StarBasic meist einen größeren [[Overhead (EDV)|Overhead]] als ein Makro in der entsprechenden Applikation von Microsoft mit gleicher Funktionalität. Im Folgenden ist oben ein Makro für den Writer ([[Textverarbeitung]]sprogramm) von OpenOffice dargestellt, unten das Makro mit gleicher Funktion – nämlich dem Zählen der Abschnitte eines Textdokuments – in VBA von [[Microsoft Word]]:

<syntaxhighlight lang="oobas">
Sub ParaCount
'
' Absätze in einem Textdokument zählen in OpenOffice Basic
'
Dim Doc As Object, Enum As Object, Count As Long
Doc = ThisComponent
' Ist dies ein Textdokument?
If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
MsgBox "Dieses Makro muss aus einem Textdokument ausgeführt werden", 64, "Error"
Exit Sub
End If
Count = 0
' Jeden Teil des Dokuments überprüfen - Absatz oder Tabelle?
Enum = Doc.Text.CreateEnumeration
While Enum.HasMoreElements
TextEl = Enum.NextElement
' Ist dieser Teil des Dokuments ein Absatz?
If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
Count = Count + 1
End If
Wend
'Ergebnis anzeigen:
MsgBox Count, 0, "Anzahl der Absätze"
End Sub
</syntaxhighlight>

<syntaxhighlight lang="vbscript">
Sub ParaCount()
'
' Absätze in einem Textdokument zählen in MS Word Visual Basic
'
MsgBox ActiveDocument.Paragraphs.Count
End Sub
</syntaxhighlight>

== Literatur ==
* Thomas Krumbein: ''Makro Kochbuch. LibreOffice/OpenOffice Basic.'' Tintal Verlag, Wiesbaden 2013, ISBN 978-3-943771-02-2.

== Weblinks ==
'''BASIC-Macros'''
* [https://docs.oracle.com/cd/E19253-01/817-3924/817-3924.pdf StarOfficeTM 7 Basic Programmierhandbuch]
* {{Webarchiv |url=http://dlc.sun.com/pdf/819-1326/819-1326.pdf |text=StarOffice 8 Programmierhandbuch für BASIC 8 |wayback=20090330112102}} (PDF; 1,6 MB)
* [http://wiki.services.openoffice.org/wiki/VBA OpenOffice.org VBA Emulation Model Project] (in einer frühen Entwicklungsphase)
* [http://www.pitonyak.org/oo.php Andrew Pitonyaks Makroinformation]
* [http://mavoe.de/mavoe_BaumDia_OOB.htm Schritt-für-Schritt-Anleitung zur Einbindung eines Basic-Makros in Calc]

'''StarOffice/OpenOffice.org API'''
* [http://api.openoffice.org/ OpenOffice.org/StarOffice API-Projektseite]
** [http://api.openoffice.org/SDK/index.html OpenOffice.org SDK]
** [http://api.openoffice.org/DevelopersGuide/DevelopersGuide.html OpenOffice.org 2.0 Developer's Guide]
*: [http://docs.sun.com/app/docs/doc/819-1304 StarOffice 8 Developer's Guide]
** [http://api.openoffice.org/docs/common/ref/com/sun/star/module-ix.html API reference manual]

== Einzelnachweise ==
<references />

{{Normdaten |TYP=s |GND=4533247-2}}

[[Kategorie:BASIC]]
[[Kategorie:Skriptsprache]]

StarOffice Basic - Versionsgeschichte

imported>Siegbert v2: + GND