Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

Форум поддержки пользователей. LibreOffice, Apache OpenOffice, OpenOffice.org

19 Январь 2022, 22:16 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Часто задаваемые вопросы по LibreOffice и Apache OpenOffice.org
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: Удаление столбцов  (Прочитано 2808 раз)
0 Пользователей и 1 Гость смотрят эту тему.
ikalina
Участник
**
Offline Offline

Сообщений: 7


« Ответ #47148: 21 Май 2018, 20:31 »

Спасибо, Bigor за помощь, сделал мне макрос.
Если будет подобный мне ламер интерисоваться такой функцией. Вот макрос на удаление заведомо известных столбцов на странице:
Код:
Sub ColsRemove
oSheet = ThisComponent.Sheets(0)
'создаем массив удаляемых столбцов
NameR="A,B,d"
NRow=split(NameR,",")
'цикл по массиву
For i=ubound(NRow) To 0 Step -1
oRange = oSheet.getCellRangeByName("" & ltrim(NRow(i)) & "1")
oCol = oRange.getColumns()
'удаляем
oCol.removeByIndex(0, 1)
next
End Sub
« Последнее редактирование: 22 Май 2018, 06:22 от Helen » Записан
Страниц: 1   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.21 | SMF © 2006-2009, Simple Machines Valid XHTML 1.0! Valid CSS!