Форум » [x]Harbour » вопрос по Excel » Ответить
вопрос по Excel
fil: Всем, привет ! Выделяю строчку в листе: oXls:Sheets(OemToAnsi("Лист1")):Range("B"+ltrim(str(nn+st))+":F"+ltrim(str(nn+st)) ):Select() а вот копирование выделенного в clipboard дает ошибку - неправильно указана принадлежность объекта Selection() oXls:Sheets(OemToAnsi("Лист1")):Selection():Copy() ??
Ответов - 46, стр:
1 2 3 All
Dima: Vlad04 PAR1+"PIC\ITOG.xls" это что ? Путь доступа к файлу ? Возможно что то не то в PAR1
Dima: Vlad04 пишет: xXarbour 1. Сразу не обратил внимания. У меня тоже самое работает в Harbour 2.0.0
Vlad04: Поместил ExcelApl:WorkBooks:Open(Par1+"PIC\ITOG.xls") в функцию , где инициализируется ExcelApl ( что не совсем удобно) и все заработало. Повидимому что-то на системном уровне xXarbour - предыдущие отчеты работают, а этот требует уже особого внимания. PAR1+"PIC\ITOG.xls" это что ? Путь доступа к файлу ? Да , это путь к шаблону Спасибо за участие. Как нибудь на xXarbour 1.2.1 проверю
i3t4j6: i3t4j6 пишет: ....в указанном месте вставка не производится, потому что копируется ячейка, которая последней редактировалась в Excelе и она же и вставляется Pasha пишет: Надо переместиться в нужную ячейку, и затем выдать Paste Есть файл-шаблон и в нем таблица - шапка и одна строка. Нужно добавить несколько строк со сдвигом вниз. oSheet:Range(oSheet:Cells(19,2),oSheet:Cells(19,64)):Select() oSheet:Range(oSheet:Cells(19,2),oSheet:Cells(19,64)):Copy() oSheet:Cells( 19, 2 ):Select() oSheet:paste() Если делаю так, то строка не добавляется , а информация пишется поверх существующей ?
Pasha: Наверное надо сначала вставить пустую строку: oSheet:Rows(19):Insert(xlDown)
i3t4j6: Спасибо !!!
полная версия страницы