Open Office Calcアドイン開発によるExcel互換性補完

# OpenOffice Calc アドイン開発によるExcel互換性補完 

 ExcelとOpenOffice Calcの互換性ギャップを埋めるためのアドイン開発提案です。特にRevit Dynamo連携電気工事積算ソフトの互換性を確保するためのソリューションです。 

 ## アドインの主要機能 

 1. **Excelファイル(.xlsx)の完全互換読み込み/書き込み** 

 2. **Excel VBAマクロのOpenOffice Basicへの自動変換** 

 3. **Revit Dynamo連携専用の拡張機能** 4. **電気工事積算用テンプレート管理** 

 ## アドイン開発の技術構成

 ### 1. 基本アーキテクチャ

 ``` 

 [Revit Dynamo]

 | 

 v 

 [OpenOffice Calcアドイン]

 ├─ Excelファイルコンバータ 

 ├─ マクロ変換エンジン 

 ├─ Dynamo連携モジュール 

 └─ 電気工事積算拡張 

 ```

 ### 2. 必要な開発ツール - **OpenOffice/LibreOffice SDK** - **Java** (OpenOffice拡張開発の主要言語) - **Python** (Dynamo連携部分) - **Apache POI** (Excelファイル操作ライブラリ)

 ## アドイン実装コード 

 ### 1. Excelファイル読み込みコンポーネント (Java)

  ```java // ExcelファイルをOpenOfficeで開くためのコンバータ import com.sun.star.uno.XComponentContext; import com.sun.star.lang.XMultiComponentFactory; import org.apache.poi.ss.usermodel.*; import org.apache.poi.xssf.usermodel.XSSFWorkbook; public class ExcelConverter { public static void convertExcelToODS(String inputPath, String outputPath) { try { // ExcelファイルをPOIで読み込み Workbook excelWorkbook = WorkbookFactory.create(new File(inputPath)); // OpenOfficeドキュメントを作成 XComponentContext context = Bootstrap.bootstrap(); XMultiComponentFactory serviceManager = context.getServiceManager(); Object desktop = serviceManager.createInstanceWithContext( "com.sun.star.frame.Desktop", context); XComponentLoader componentLoader = (XComponentLoader)UnoRuntime.queryInterface( XComponentLoader.class, desktop); String loadUrl = "private:factory/scalc"; XComponent document = componentLoader.loadComponentFromURL( loadUrl, "_blank", 0, new PropertyValue[0]); XSpreadsheetDocument spreadsheetDoc = (XSpreadsheetDocument) UnoRuntime.queryInterface(XSpreadsheetDocument.class, document); // シートごとにデータ転送 for (int i = 0; i < excelWorkbook.getNumberOfSheets(); i++) { Sheet excelSheet = excelWorkbook.getSheetAt(i); XSpreadsheet odsSheet = spreadsheetDoc.getSheets().getByIndex(i); // セルデータ転送 for (Row row : excelSheet) { for (Cell cell : row) { XCell odsCell = odsSheet.getCellByPosition( cell.getColumnIndex(), cell.getRowIndex()); switch (cell.getCellType()) { case STRING: odsCell.setFormula(cell.getStringCellValue()); break; case NUMERIC: odsCell.setValue(cell.getNumericCellValue()); break; case BOOLEAN: odsCell.setValue(cell.getBooleanCellValue() ? 1 : 0); break; case FORMULA: odsCell.setFormula(cell.getCellFormula()); break; } } } } // 保存 String outputUrl = "file:///" + outputPath.replace("\\", "/"); XStorable storable = (XStorable)document; storable.storeToURL(outputUrl, new PropertyValue[0]); } catch (Exception e) { e.printStackTrace(); } } } ```  

 ### 2. VBAマクロ変換エンジン (Python) ```python # VBAからOpenOffice Basicへの変換スクリプト import re class VBAtoOOBasicConverter: def __init__(self): self.conversion_rules = { r"Worksheets\(([^)]+)\)": "Sheets.getByName(\\1)", r"Range\(([^)]+)\)": "getCellRangeByName(\\1)", r"Cells\(([^)]+)\)": "getCellByPosition(\\1)", r"ActiveSheet": "ThisComponent.CurrentController.ActiveSheet", r"Workbooks\(([^)]+)\)": "ThisComponent", r"MsgBox\s+([^,]+),\s+vbInformation": "MsgBox(\\1, 0, \"情報\")", r"For Each\s+(\w+)\s+In\s+([^\n]+)": "For Each \\1 In \\2", r"\.Value": ".Value", r"\.Formula": ".Formula", r"\.Text": ".String" } def convert(self, vba_code): # 基本変換 for pattern, replacement in self.conversion_rules.items(): vba_code = re.sub(pattern, replacement, vba_code) # 関数宣言変換 vba_code = re.sub( r"Sub\s+([^\(]+)\(([^\)]*)\)", r"Sub \1(\2)", vba_code) # 変数宣言変換 vba_code = re.sub( r"Dim\s+([^ ]+)\s+As\s+([^\n]+)", r"Dim \1 As \2", vba_code) return vba_code # 使用例 converter = VBAtoOOBasicConverter() vba_macro = """ Sub CalculateElectricalCost() Dim ws As Worksheet Dim lastRow As Long Dim totalQuantity As Double Set ws = ThisWorkbook.Sheets("積算") lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row For i = 2 To lastRow totalQuantity = totalQuantity + ws.Cells(i, 3).Value Next i MsgBox "合計数量: " & totalQuantity, vbInformation End Sub """ oobasic_macro = converter.convert(vba_macro) print(oobasic_macro) ```

### 3. Dynamo連携モジュール (Python) ```python # OpenOfficeとDynamoの連携モジュール import uno from com.sun.star.connection import NoConnectException class DynamoOOIntegration: def __init__(self): self.local_context = None self.document = None def connect_to_oo(self): try: self.local_context = uno.getComponentContext() resolver = self.local_context.ServiceManager.createInstanceWithContext( "com.sun.star.bridge.UnoUrlResolver", self.local_context) context = resolver.resolve( "uno:socket,host=localhost,port=2002;urp;StarOffice.ComponentContext") desktop = context.ServiceManager.createInstanceWithContext( "com.sun.star.frame.Desktop", context) return desktop except Exception as e: print(f"OpenOffice接続エラー: {str(e)}") return None def export_from_dynamo(self, data, template_name="電気工事テンプレート.ots"): desktop = self.connect_to_oo() if not desktop: return False try: # テンプレートをロード template_path = os.path.join(os.path.expanduser("~"), "OpenOffice/templates", template_name) doc = desktop.loadComponentFromURL( uno.systemPathToFileUrl(template_path), "_blank", 0, ()) # データをシートに挿入 sheet = doc.Sheets.getByName("積算データ") # Dynamoデータを挿入 for row_idx, item in enumerate(data, start=1): sheet.getCellByPosition(0, row_idx).String = item["Category"] sheet.getCellByPosition(1, row_idx).String = item["Type"] sheet.getCellByPosition(2, row_idx).Value = item["Quantity"] sheet.getCellByPosition(3, row_idx).Value = item["Length"] # 電気工事固有のパラメータ処理 if "Voltage" in item["Parameters"]: sheet.getCellByPosition(4, row_idx).Value = item["Parameters"]["Voltage"] # 計算をトリガー self.trigger_calculation(doc) return True except Exception as e: print(f"エクスポートエラー: {str(e)}") return False def trigger_calculation(self, doc): try: # 電気工事積算マクロを実行 macro_url = "vnd.sun.star.script:Standard.Module1.CalculateElectricalCost?language=Basic&location=document" doc.invoke(macro_url, (), (), ()) except Exception as e: print(f"マクロ実行エラー: {str(e)}") ```  

 ## アドインインストーラー開発 

 ### 1. インストールスクリプト (Bash) ```bash #!/bin/bash # OpenOfficeアドインインストーラー # 依存ライブラリのインストール sudo apt-get install -y libreoffice-java-common unzip # アドインパッケージの展開 UNO_PACKAGES_DIR="/usr/lib/libreoffice/share/uno_packages" ADMIN_DIR="/usr/lib/libreoffice/program" # アドインの配置 sudo mkdir -p "$UNO_PACKAGES_DIR/cache" sudo unzip dynamo_integration.oxt -d "$UNO_PACKAGES_DIR/cache/" # 登録処理 sudo "$ADMIN_DIR/unopkg" add --shared "$UNO_PACKAGES_DIR/cache/dynamo_integration.oxt" # テンプレートディレクトリの作成 mkdir -p ~/OpenOffice/templates cp electrical_template.ots ~/OpenOffice/templates/ # デスクトップショートカット作成 cat > ~/Desktop/Electrical-Estimation.desktop <<EOL [Desktop Entry] Version=1.0 Type=Application Name=Electrical Estimation Comment=Revit Dynamo連携電気工事積算ツール Exec=libreoffice --nologo --norestore --nofirststartwizard macro:///Standard.Module1.StartDynamoIntegration Icon=/usr/share/icons/hicolor/256x256/apps/libreoffice-main.png Terminal=false Categories=Office; EOL chmod +x ~/Desktop/Electrical-Estimation.desktop ```  

 ## 電気工事積算専用拡張機能

 ### 1. 専用ツールバー実装 (XML) ```xml <!-- アドインのツールバー定義 --> <!DOCTYPE toolbar:toolbar PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "toolbar.dtd"> <toolbar:toolbar xmlns:toolbar="http://openoffice.org/2001/toolbar"> <toolbar:toolbaritem toolbar:id="dynamo_import" toolbar:text="Dynamoからインポート" toolbar:visible="true" toolbar:command="vnd.sun.star.script:Standard.Module1.ImportFromDynamo?language=Basic&location=application"/> <toolbar:toolbaritem toolbar:id="export_excel" toolbar:text="Excel形式でエクスポート" toolbar:visible="true" toolbar:command="vnd.sun.star.script:Standard.Module1.ExportToExcel?language=Basic&location=application"/> <toolbar:toolbaritem toolbar:id="calc_estimate" toolbar:text="積算実行" toolbar:visible="true" toolbar:command="vnd.sun.star.script:Standard.Module1.CalculateEstimation?language=Basic&location=application"/> <toolbar:toolbaritem toolbar:id="gen_report" toolbar:text="報告書生成" toolbar:visible="true" toolbar:command="vnd.sun.star.script:Standard.Module1.GenerateReport?language=Basic&location=application"/> </toolbar:toolbar> ```  

 ## まとめ 

 このアドイン開発により、以下のExcel-OpenOffice間の互換性問題を解決できます：

 1. **ファイル形式の違い** - Excelファイル(.xlsx)の完全な読み書きを実現

 2. **マクロの互換性** - VBAからOpenOffice Basicへの自動変換 

 3. **Dynamo連携のギャップ** - Revitデータを直接OpenOfficeで処理 

 4. **電気工事固有の機能** - 業界標準の計算方法を組み込み アドインを開発・配布することで、Excelがインストールされていない環境でも、Revit Dynamoとの連携による電気工事積算作業をフル機能で実行できるようになります。