Гость
Войти | Профиль | Очистить
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Смещение строк в Excel / 9 сообщений из 9, страница 1 из 1
15.06.2012, 13:33
    #37839512
johngorn
johngorn
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
День добрый всем, нужна подсказка, делаю экспорт в эксель через ниже перечисленные команды
VAR1=GETOBJECT('', "Excel.Application")
EXPORT TO "список групп" TYPE XL5 FIELDS &a1
var1.application.visible=.T.
VAR1.AutomationSecurity= 3
VAR1.DisplayAlerts=.F.
var1.workbooks.open(SYS(5)+SYS(2003)+'\список групп.XLS')

после чего хочу просто сместить все данные на две строки вниз, чтобы сделать шапку
с помощью макроса записал код, а действия были следующие Ctrl-A, Ctrl-X, клик мышки в нужную ячейку и Ctrl-V

Range("A1:B73").Select
Selection.Cut
Range("A3").Select
ActiveSheet.Paste

Как это перевести в Visual Foxpro?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 13:42
    #37839535
tanglir
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
johngorn, да один в один:

Код: sql
1.
2.
3.
4.
5.
6.
loxl=createobject("Excel.Application") --по этой фразе в форуме поищите
--открываете книгу и т.д., всё это в форуме есть
loxl.Range("A1:B73").Select
loxl.Selection.Cut
loxl.Range("A3").Select
loxl.ActiveSheet.Paste
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 13:50
    #37839563
johngorn
johngorn
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
тогда вопрос встречный, у меня разный диапазон столбцов и строк в разных отчетах, как сделать чтобы не нужно было указывать диапазон в выделении, а как бы выделить все по Ctrl-A?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 13:54
    #37839573
tanglir
tanglir
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
johngorn,

это уже вопрос в форум по офису.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 14:01
    #37839590
johngorn
johngorn
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
ну и на том спасибо, но если кто знает отпишитесь!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 14:06
    #37839600
Jonny540
Jonny540
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
johngorn,

KEYBOARD '{CTRL+A}' не поможет?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 14:20
    #37839624
johngorn
johngorn
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
нет пробовал....((((
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 15:03
    #37839726
Jonny540
Jonny540
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
johngorn,

попробуй еще так:
Код: plsql
1.
loxl.Cells.Select
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.06.2012, 15:09
    #37839744
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Смещение строк в Excel
Не надо использовать Selection, Active, Copy-Paste etc...
Код: sql
1.
2.
3.
for i=1 to 2
    var1.Sheets(1).Rows(1).Insert
endfor
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Смещение строк в Excel / 9 сообщений из 9, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 414ms
Закрыть
start [/forum/topic.php?fid=41&mobile=1&tid=1583619]:
 0ms
get settings:
 7ms
get forum list:
 13ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 40ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 52ms
get tp. blocked users:
 1ms
others: 280ms
total:  414ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]