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

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

4 Март 2021, 18:42 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости: Доступно и просто о работе в офисных пакетах
 
   Начало   Помощь Поиск Войти Регистрация    задать вопрос  
Страниц: 1   Вниз
  Печать  
Автор Тема: Копирование  (Прочитано 3923 раз)
0 Пользователей и 1 Гость смотрят эту тему.
katena88
Новичок
*
Offline Offline

Сообщений: 3


« Стартовое сообщение: 27 Июнь 2011, 09:13 »

как сделать так, чтобы при копировании копировалась не формула в ячейке, а значение? (я сделала макрос путем записи и хотела переправить код, но не получилось)
и еще: как при повторном нажатии кнопки делать так, чтобы копировалось в ячейку ниже
Записан
RFJ
Форумчанин
***
Offline Offline

Сообщений: 220


« Ответ #1: 27 Июнь 2011, 12:55 »

Покажите ваши попытки.
Записан

katena88
Новичок
*
Offline Offline

Сообщений: 3


« Ответ #2: 27 Июнь 2011, 12:56 »

Как то так

[вложение удалено Администратором]
Записан
RFJ
Форумчанин
***
Offline Offline

Сообщений: 220


« Ответ #3: 27 Июнь 2011, 14:32 »

Замените ваш макрос opy на такой:
Код:
REM  *****  BASIC  *****

Global mr As Integer     ' - Важно!!!


Sub opy

  oDoc=ThisComponent

sheet_name="покупка"

  oSheet=oDoc.Sheets.getByName(sheet_name)

  oCell=oSheet.getCellByposition(3,2)
  mrr=oCell.getString()

If Trim(mrr)="" Then mr=0

  oCell_1=oSheet.getCellByposition(1,3)
  ns = oCell_1.getString()
  oCell_2=oSheet.getCellByposition(3,mr+2)
  oCell_2.setString(ns)

  oCell_1=oSheet.getCellByposition(1,6)
  ns = oCell_1.getValue()
  oCell_2=oSheet.getCellByposition(4,mr+2)
  oCell_2.setValue(ns)
  
     mr=mr+1

End Sub

PS. Global mr As Integer     ' - Важно!!! - Запоминает число заполненных строк в Корзине.
« Последнее редактирование: 27 Июнь 2011, 14:41 от RFJ » Записан

Страниц: 1   Вверх
  Печать  
 
Перейти в:  

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