Макрос перенос столбца libreoffice basic
Имеется
Dim Doc as object
Dim sheet as object
Dim sheets as object
Doc=thiscomponent
Sheet=doc.sheets(0)
Как выделить целиком столбец, например с индексом 2 и вставить его в столбец с индексом 5?
Ответы (1 шт):
Автор решения: Spatz
→ Ссылка
Перенос столбца:
Dim doc as object
Dim sheet as object
doc=thiscomponent
sheet=doc.sheets(0)
source = sheet.Columns(2)
target = sheet.getCellByPosition(5, 0)
' или target = sheet.getCellRangeByName("F1")
sheet.moveRange(target.CellAddress, source.RangeAddress)
Для простого копирования заменяем moveRange на copyRange.
Дополнительную информацию можно найти в wiki