오픈오피스 베이직

1. 개요

오픈오피스 베이직은 오픈오피스 및 리브레오피스에서 매크로 작성을 위해 사용되는 프로그래밍 언어이다. 마이크로소프트의 VBA와 문법은 유사하지만 API가 달라 VBA 코드를 직접 호환하지는 않는다. 텍스트 문서, 스프레드시트, 프레젠테이션 등 오픈오피스/리브레오피스 내 다양한 객체에 접근하고 제어할 수 있으며, 텍스트 문서 단락 수 계산과 같은 매크로를 작성할 수 있다. VBA 에뮬레이션 모델 프로젝트를 통해 VBA 코드 실행을 지원하지만, 복잡한 VBA 코드는 문제가 발생할 수 있다.

2. 상세

오픈오피스 및 리브레오피스 오피스 제품군에서 매크로 기능을 구현하고 문서 작업을 자동화하기 위해 사용되는 프로그래밍 언어이다. 사용자는 이 언어를 통해 반복적인 작업을 줄이거나 오피스 문서의 기능을 확장하는 등 다양한 사용자 정의 기능을 만들 수 있다.

2.1. 오픈오피스 베이직의 특징

오픈오피스 및 리브레오피스의 매크로 작성에 사용되는 프로그래밍 언어이다. 문법은 마이크로소프트의 VBA와 유사하지만, API는 상당히 다르다. 이 때문에 VBA로 작성된 코드를 오픈오피스 베이직에서 직접 호환하여 사용할 수는 없다.

오픈오피스 베이직을 사용하면 텍스트 문서, 스프레드시트, 프레젠테이션 등 오픈오피스 및 리브레오피스 내 다양한 문서 객체에 접근하고 제어할 수 있다. 아래는 텍스트 문서의 단락 수를 세는 간단한 매크로 예시로, 오픈오피스 베이직 API의 기본적인 사용 방식을 보여준다. 문서 속성을 직접 읽는 더 쉬운 방법도 있지만, 이 예제는 문서 내 각 단락 요소에 순차적으로 접근하는 방법을 설명하는 데 중점을 둔다.


Sub ParaCount
'
' 텍스트 문서의 단락 수 계산
'
Dim Doc As Object, Enum As Object, TextEl As Object, Count As Long
Doc = ThisComponent
' 텍스트 문서인가?
If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
MsgBox "이 매크로는 텍스트 문서에서 실행해야 합니다", 64, "오류"
Exit Sub
End If
Count = 0
' 각 구성요소 검사 - 단락 또는 표?
Enum = Doc.Text.CreateEnumeration
While Enum.HasMoreElements
TextEl = Enum.NextElement
' 구성요소가 단락인가?
If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
Count = Count + 1
End If
Wend
' 결과 표시
MsgBox Count, 0, "단락 수"
End Sub

2.2. 예제

오픈오피스 베이직은 마이크로소프트의 Visual Basic for Applications (VBA)와 같은 다른 베이직 계열 언어와 유사하지만, API는 상당히 다르다. 아래는 텍스트 문서 내의 단락 수를 계산하는 매크로 예제이다. 이 예제는 문서의 각 단락에 순차적으로 접근하는 기본적인 방법을 보여주기 위한 것으로, 실제로는 "단락 수" 문서 속성을 직접 얻는 더 간단한 방법이 존재한다.


Sub ParaCount
'
' 텍스트 문서의 단락 수 계산
'
Dim Doc As Object, Enum As Object, TextEl As Object, Count As Long
Doc = ThisComponent
' 텍스트 문서인가?
If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
MsgBox "이 매크로는 텍스트 문서에서 실행해야 합니다", 64, "오류"
Exit Sub
End If
Count = 0
' 각 구성요소 검사 - 단락 또는 표?
Enum = Doc.Text.CreateEnumeration
While Enum.HasMoreElements
TextEl = Enum.NextElement
' 구성요소가 단락인가?
If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
Count = Count + 1
End If
Wend
' 결과 표시
MsgBox Count, 0, "단락 수"
End Sub

2.3. VBA와의 호환성

오픈오피스 베이직은 마이크로소프트의 Visual Basic for Applications (VBA)와 문법적으로 유사한 점이 있지만, 완전히 호환되지는 않는다. 오픈오피스는 VBA 코드를 일부 실행할 수 있도록 지원하지만, 특히 API 구조가 VBA와는 상당히 다르기 때문에 복잡한 매크로의 경우 호환성 문제가 발생할 수 있다. 예를 들어, 문서 내의 특정 요소에 접근하고 조작하는 방식 등에서 차이가 나타난다.

3. 관련 자료

* 슈타인버그, 제임스. 오픈 오피스 베이직: 소개. CreateSpace Independent Publishing Platform. ISBN 978-1481270939.

* 베이직 매크로
오픈 오피스 베이직 프로그래밍 가이드
오픈 오피스 VBA 에뮬레이션 모델 프로젝트 (여전히 어려운 개발에 사용된다)
엔드류 피튼왁의 매크로 정보

* 오픈오피스 API
오픈오피스/스타오피스 API 페이지
* 오픈 오피스 SDK
* 오픈오피스 개발자 가이드
* API 참조 설명서

* 리브레오피스 API
리브레오피스 API의 문서
** 리브레오피스 베이직의 도움말

4. 베이직 프로그래밍 언어

오픈오피스 베이직은 베이직 프로그래밍 언어의 다양한 파생 언어 중 하나이다. 베이직 언어는 오랜 역사 속에서 여러 형태로 발전해 왔으며, 그 종류는 매우 다양하다. 상세한 베이직 언어의 목록은 베이직 언어 목록 문서에서 확인할 수 있다.

오픈오피스 베이직은 마이크로소프트의 Visual Basic for Applications (VBA)와 같은 다른 베이직 계열 언어와 문법적으로 유사한 측면이 있지만, 오픈오피스 및 리브레오피스의 내부 구조와 상호작용하는 응용 프로그래밍 인터페이스 (API)는 VBA와 상당히 다르다. 따라서 VBA 매크로를 오픈오피스 베이직으로 그대로 사용하기는 어렵고, 오픈오피스 API에 맞게 코드를 수정해야 한다.

다음은 오픈오피스 베이직을 사용하여 텍스트 문서의 단락 수를 계산하는 간단한 매크로 예시이다. 이 코드는 문서 객체 모델에 접근하여 각 요소를 순회하고, 해당 요소가 단락 객체(`com.sun.star.text.Paragraph` 서비스)인지 확인하는 기본적인 API 사용법을 보여준다.


Sub ParaCount
'
' 텍스트 문서의 단락 수 계산
'
Dim Doc As Object, Enum As Object, TextEl As Object, Count As Long
Doc = ThisComponent
' 현재 문서가 텍스트 문서인지 확인 (TextDocument 서비스 지원 여부 검사)
If Not Doc.SupportsService("com.sun.star.text.TextDocument") Then
MsgBox "이 매크로는 텍스트 문서에서 실행해야 합니다", 64, "오류"
Exit Sub
End If
Count = 0
' 문서 내의 모든 텍스트 요소를 순차적으로 접근하기 위한 Enumeration 생성
Enum = Doc.Text.CreateEnumeration
' 요소가 더 이상 없을 때까지 반복
While Enum.HasMoreElements
TextEl = Enum.NextElement
' 현재 요소가 단락(Paragraph) 서비스 를 지원하는지 확인
If TextEl.SupportsService("com.sun.star.text.Paragraph") Then
Count = Count + 1 ' 단락 수를 증가
End If
Wend
' 계산된 단락 수를 메시지 상자로 표시
MsgBox Count, 0, "단락 수"
End Sub


이 예제는 문서의 '단락 수' 속성을 직접 읽는 더 간단한 방법도 존재하지만, 문서 내의 각 단락 요소에 순차적으로 접근하고 처리하는 기본적인 매크로 작성 방식을 이해하는 데 도움을 준다.