Wie fusionierten Zelle Zeile/Spalte Spanne in Openoffice Calc Makro

Question

Ich kann erkennen, zu erhalten, wenn eine bestimmte Zelle in einem Blatt mit sheet.getCellByPosition(0,0).IsMerged

verschmolzen wird Gibt es eine Möglichkeit, die Breite/Höhe der fusionierten Zelle zu entdecken?

Answer 1

Zuerst herausfinden, welche Zeilen oder Spalten die Zelle überspannt. Angenommen, wir möchten herausfinden, wie groß eine Zelle ist, die sich über zwei Spalten erstreckt.

Dann für jede Spalte beteiligt, herauszufinden, wie weit es ist, und die Breiten addieren. Dieser Code, von https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=19790 angepasst, bestimmt die Breite einer Spalte:

Sub GetColumnWidth 
    dim oSheet as object, oDoc As Object 
    dim w as single 
    dim col as integer 
    oDoc = ThisComponent 
    oSheet = ThisComponent.getCurrentController.getActiveSheet 
    col = 1 'column B 
    oColumn = oSheet.getColumns.getByIndex(col) 
    'column width (in 100ths of mm) 
    w = oColumn.Width/2540 
    MsgBox w 
End Sub 

Eine weitere Sache, es sieht aus wie eine ShrinkToFit Eigenschaft ist. Ich habe nicht getestet, ob das in der Width Eigenschaft widergespiegelt wird.

Answer 2

Ich habe einige Funktionen erstellt:

• fusionierten Zelle Zeilenspanne Zahl zu erhalten.
  https://github.com/aa6/libreoffice_calc_basic_extras/blob/master/basic_extras_MergedCellGetRowSpanCount.bas
• fusionierten Zelle col Spannweite Zahl zu erhalten.
  https://github.com/aa6/libreoffice_calc_basic_extras/blob/master/basic_extras_MergedCellGetColSpanCount.bas
• Zum Zusammenführen und Normalisieren von zusammengeführten Zellen, indem nicht zusammengeführte Zellen mit zusammengeführten Zellenwerten gefüllt werden.
  https://github.com/aa6/libreoffice_calc_basic_extras/blob/master/basic_extras_UnMergeAndNormalizeCell.bas

Wahrscheinlich finden könnte jemand sie nützlich.