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

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

18 Сентябрь 2019, 08:23 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Доступно и просто о работе в офисных пакетах
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1 2 »   Вниз
  Печать  
Автор Тема: Обрамление ячеек при помощи макроса [РЕШЕНО]  (Прочитано 5461 раз)
0 Пользователей и 1 Гость смотрят эту тему.
BotExtraSens
Участник
**
Offline Offline

Сообщений: 18


« Ответ #46989: 10 Май 2018, 16:31 »

1) Этот код неправильный, он ставит в ячейку A1 (0, 0) - значение переменных i и k, которые тоже равны 0. Смысла сие не имеет:
oCell = oSheet.getCellByPosition (i, k)
oCell.Value = i                      
oCell = oSheet.getCellByPosition (i, k)
oCell.Value = k

Вы меня не поняли )
i и k глобальные переменные их значение не обнуляется!
значение которых увеличивается с каждым нажатием кнопки мыши (в моем макросе это можно проверить)
координаты Ячеек тоже привязаны к ним, поэтому при изменении k и i  их новые числовые значения прописываются в соседние ячейки ( у меня это работает )!!


Напишите что должен делать макрос. Из его кода - непонятно.
При нажатии кнопки должны появляться  новые Числовые значения и записываться в соседние ячейки с обрамлением 

в обрамлении ячеек , которое тоже должно переходить на соседние ячейки (как числовые значения) и обрамлять их.
Почему то не перемещаются (один раз пропечатывается и все ) в этом и проблема ........
Не могу понять почему на координаты Обрамлений ячеек со значением глобальных переменных не действует как нужно  ...
Пытаюсь найти решение


Написал вроде
With    [B3:R3].Borders(xlEdgeLeft)' можно [ИМЯ_ДИАПАЗОНА] или Range("B3")
        .LineStyle = xlContinuous
        .Weight = xlThin
End With
with     Range("i:k").Borders(xlEdgeLeft)


вроде правильно но смещения бордюров ячейки нет (
в чем ошибка ?
« Последнее редактирование: 10 Май 2018, 17:12 от BotExtraSens » Записан
Страниц: 1 2 »   Вверх
  Печать  
 
Перейти в:  

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