Отправлено: 28.04.15 22:50. Заголовок: Вопрос по Excel ?

Всем привет.
Вопрос к знатокам Excel-я, как подсчитать сумму ВСЕХ значений с минусом и с плюсом ?

 Отправлено: 23.11.21 12:58. Заголовок: MIKHAIL Надо Пашу с..

MIKHAIL
Надо Пашу спросить , я не работаю с OpenOffice

 Отправлено: 23.11.21 15:20. Заголовок: MIKHAIL пишет: этот..

MIKHAIL пишет:

цитата:

этот механизм работает в OpenOffice ?

Да, синтаксис другой:

oRange:setDataArray(aData)

 Отправлено: 23.11.21 22:50. Заголовок: hbXlsxWriter

Погонял пример hbXlsxWriter из поставки Minigui
Достойная альтернатива OLE. Поддержка всего чего нужно. Полностью документирован.
Форматы, таблицы, чарты, формулы , макросы и пр. И при этом хорошая скорость вывода. Из недостатков только один - это только Writer, а не Reader/Writer.

 Отправлено: 03.12.22 00:29. Заголовок: Что то опять у меня ..

Что то опять у меня с Экселем не получается.
Не могу удалить первую строку в таблице. Как это сделать ?
Получил вот такой макрос:

      Rows("1:1").Select 
       Selection.Delete Shift:=xlUp

А как перевести для Харбора не понимаю....

   oExcel:WorkBooks:Add()               
    oBook  := oExcel:ActiveWorkBook()      // это книга 
    oSheet := oExcel:ActiveSheet()         // это лист 
    oExcel:Workbooks:Open( cFileDbf, 0 )  
  
    // здесь нужно удалить первую строку 
  
    oBook := oExcel:Get("ActiveWorkBook")   
    oBook:SaveAs( cFileXls, xlWorkbookNormal ) 
    oExcel:Quit()  
 

 Отправлено: 03.12.22 12:42. Заголовок: oSheet:Rows(1):Delet..

oSheet:Rows(1):Delete(xlShiftUp)

 Отправлено: 03.12.22 13:20. Заголовок: Pasha пишет: oSheet..

Pasha пишет:

цитата:

oSheet:Rows(1):Delete(xlShiftUp)

Не удаляет первую строку в таблице в 2003 Экселе.
Может по другому надо ?

 Отправлено: 03.12.22 13:43. Заголовок: так удаляет же. 2003..

так удаляет же. 2003-й я конечно сейчас не найду, но в 2016-м работает. Это же базовый метод, версия Excel роли не играет

 Отправлено: 03.12.22 16:01. Заголовок: может так ? oSheet:R..

может так ?
oSheet:Rows(1):Select()
oSheet:Rows(1):Delete()

PS
почитать и пробнуть , сам не юзал

 Отправлено: 03.12.22 16:40. Заголовок: Pasha пишет: так уд..

Pasha пишет:

цитата:

так удаляет же. 2003-й я конечно сейчас не найду, но в 2016-м работает

Да, в 2016 удаляет.

Сделал как Дима предлагал

 
 oSheet:Rows(1):Select() 
 oSheet:Rows(1):Delete(xlShiftUp)

И в 2003 заработало...

Спасибо БОЛЬШОЕ вам !

 Отправлено: 29.01.23 11:53. Заголовок: Xls в DBF и DBF в Xls - макрос Excel

Есть готовый макрос https://softclipper.net/ispolzovanie-sql-i-dbf/xls-v-dbf-i-dbf-v-xls-makros-excel.html

 Отправлено: 13.02.23 16:31. Заголовок: Есть пример работы с..

Есть пример работы с двумя файлами Excel?
Открыть первый, второй файл, прочитать данные в первом файле, обработать их, занести во второй файл, сохранить второй файл.

 Отправлено: 13.02.23 18:02. Заголовок: Всё получилось, всё ..

Всё получилось, всё как обычно

 Отправлено: 09.03.23 19:47. Заголовок: Не могу понять как э..

Не могу понять как это преобразовать в Harbour
Хотел отслеживать что менялось в документе

 
 With ActiveWorkbook  
  .HighlightChangesOptions When:=xlSinceMyLastSave, Who:="Everyone"  // вот тут затык    
  .ListChangesOnNewSheet = True  
 End With 
 

 Отправлено: 09.03.23 20:06. Заголовок: Dima пишет: вот тут..

Dima пишет:

цитата:

вот тут затык

В справке MS это представлено как функция.
https://learn.microsoft.com/en-us/office/vba/api/excel.workbook.highlightchangesoptions

так пробовал ?

 
 Syntax 
 expression.HighlightChangesOptions (When, Who, Where) 
 

 Отправлено: 09.03.23 20:12. Заголовок: Падает зараза на стр..

Падает зараза на строке
oExcel:ActiveWorkbook:HighlightChangesOptions(xlSinceMyLastSave,"Everyone")
или так
oExcel:ActiveWorkbook:HighlightChangesOptions(xlSinceMyLastSave)
Эта штука xlSinceMyLastSave в Excel.ch есть

 Отправлено: 09.03.23 20:26. Заголовок: Похоже не получится ..

Похоже не получится , так как если руками включать , то Excel требует сохранить книгу
А сохранять как раз не нужно.
Смысл был следующий , бух формирует отчетик , он формируется в Excel , после бух вносит
свои правки , спецом или же по ошибке а потом мне выносят мозг , мол прога не правильно считает

 Отправлено: 09.03.23 20:43. Заголовок: Dima пишет: Падает ..

Dima пишет:

цитата:

Падает зараза на строке

Excel как правило требует явного указания всех параметров при передаче в функцию
Ранее сталкивался с этой фичей

 Отправлено: 09.03.23 20:46. Заголовок: Dima пишет: после б..

Dima пишет:

цитата:

после бух вносит свои правки , спецом или же по ошибке а потом мне выносят мозг , мол прога не правильно считает

Делай скрытый ярлык под паролем и пиши туда копию . можно с условным форматом - цветом изменения если данные не совпадают в ячейках на двух листах

 Отправлено: 11.03.23 20:56. Заголовок: Haz пишет: Делай ск..

Haz пишет:

цитата:

Делай скрытый ярлык под паролем и пиши туда копию . можно с условным форматом - цветом изменения если данные не совпадают в ячейках на двух листах

Покажи примерчик если есть живой а нет если буду гуглить :)

 Отправлено: 12.03.23 00:02. Заголовок: Dima пишет: Покажи ..

Dima пишет:

цитата:

Покажи примерчик если есть живой а нет если буду гуглить :)

когда-то делал, поищу. Скорее всего в понедельник.