Текущее время: Чт, июл 24 2025, 03:06

Часовой пояс: UTC + 3 часа


Правила форума


ВНИМАНИЕ!

Вопросы по SAP Query и Quick View - сюда



Начать новую тему Ответить на тему  [ Сообщений: 4 ] 
Автор Сообщение
 Заголовок сообщения: Преобразования макроса Excel в код. need help.
СообщениеДобавлено: Ср, мар 28 2007, 18:47 
Начинающий
Начинающий

Зарегистрирован:
Ср, мар 28 2007, 18:00
Сообщения: 16
Подскажите пожалуйста как преобразовать макрос

Selection.AutoFill Destination:=Range("I11:I17"), Type:=xlFillDefault
Range("I11:I17").Select
End Sub

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

в код.



CALL METHOD OF ls_excel 'CELLS' = ls_cell1
EXPORTING
#1 = 11
#2 = 9.

CALL METHOD OF ls_excel 'CELLS' = ls_cell2
EXPORTING
#1 = 17
#2 = 9.

CALL METHOD OF ls_excel 'RANGE' = ls_range
EXPORTING
#1 = ls_cell1
#2 = ls_cell2.

CALL METHOD OF ls_range 'SELECT'.

* CALL METHOD OF ls_range 'AutoFill'
* EXPORTING
* #1 = 1.


Получается что-то типа этого, по-видимому. Да несовсем...


Заранее спасибо.


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, мар 29 2007, 08:05 
Младший специалист
Младший специалист

Зарегистрирован:
Пн, окт 03 2005, 10:16
Сообщения: 74
Выдержка из хелпа екселевского

Set sourceRange = Worksheets("Sheet1").Range("A1:A2")
Set fillRange = Worksheets("Sheet1").Range("A1:A20")
sourceRange.AutoFill Destination:=fillRange

Т.е. есть два Range: источник (sourceRange) и назначение (fillRange)
источник - это I11:I12, т.е. указание или пример, как именно заполнять дальше
назначение - это I11:I17, т.е. какие ячейки он будет заполнять

т.е. код будет примерно такой ...

Code:

CALL METHOD OF ls_excel 'CELLS' = ls_cell1
EXPORTING
#1 = 11
#2 = 9.

CALL METHOD OF ls_excel 'CELLS' = ls_cell2
EXPORTING
#1 = 12
#2 = 9.

CALL METHOD OF ls_excel 'RANGE' = ls_range_source
EXPORTING
#1 = ls_cell1
#2 = ls_cell2.

CALL METHOD OF ls_excel 'CELLS' = ls_cell1
EXPORTING
#1 = 11
#2 = 9.

CALL METHOD OF ls_excel 'CELLS' = ls_cell2
EXPORTING
#1 = 17
#2 = 9.

CALL METHOD OF ls_excel 'RANGE' = ls_range_dest
EXPORTING
#1 = ls_cell1
#2 = ls_cell2.

CALL METHOD OF ls_range_source 'AutoFill'
EXPORTING
#1 = ls_range_dest.


у меня прокатило :)


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, мар 29 2007, 08:14 
Младший специалист
Младший специалист

Зарегистрирован:
Пн, окт 03 2005, 10:16
Сообщения: 74
в конце еще надо будет добавить

CALL METHOD OF ls_range_dest 'SELECT'.

а чтобы получить Selection
это надо
Code:
get property of excel 'selection' = range


Принять этот ответ
Вернуться к началу
 Профиль  
 
 Заголовок сообщения:
СообщениеДобавлено: Чт, мар 29 2007, 10:48 
Начинающий
Начинающий

Зарегистрирован:
Ср, мар 28 2007, 18:00
Сообщения: 16
Огромное спасибо!


Принять этот ответ
Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 4 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: Google [Bot]


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
cron
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB