Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Открыть новый документ в Excel с задданым именем  [new]
q1w1e1
Member

Откуда: Кы-рск
Сообщений: 1034
Как можно такое сделать...subj
есть вроде две команды

.workbooks.ADD
и
.workbooks.OPEN(имя_файла,.F.)
Так вот, я сперва формирую имя файла, а потом мне надо открыть чистую книгу Excel с этим уже сформированным именем файла
1 фев 08, 06:10    [5230231]     Ответить | Цитировать Сообщить модератору
 Re: Открыть новый документ в Excel с задданым именем  [new]
AleksMed
Member

Откуда: Россия, Серпухов-Москва
Сообщений: 1546
1. Открой новую книгу (Workbooks.Add())
2. Сохрани её со своим именем (Workbooks.Save())
3. Открой сохраненную книгу (Workbooks.Open())
1 фев 08, 09:03    [5230450]     Ответить | Цитировать Сообщить модератору
 Re: Открыть новый документ в Excel с задданым именем  [new]
s_gonch
Member

Откуда: Беларусь
Сообщений: 41
q1w1e1
Как можно такое сделать...subj
есть вроде две команды

.workbooks.ADD
и
.workbooks.OPEN(имя_файла,.F.)
Так вот, я сперва формирую имя файла, а потом мне надо открыть чистую книгу Excel с этим уже сформированным именем файла


ON ERROR loExcel=Null
loExcel=CREATEOBJECT("Excel.Application")
ON ERROR 
IF loExcel=Null
	=MESSAGEBOX("Не могу вызвать EXCEL !",0+48+512,"")
ENDIF
*
WITH loExcel
	.workbooks.add
*
*заполняем новую книгу данными
*
ENDWITH 
* Сохранить все это в файл
with loExcel
	.DisplayAlerts=.f.
	.ActiveWorkBook.SaveAs(lcfilename)
	.DisplayAlerts=.t.
	.visible=.T.
endwith
loExcel=Null
1 фев 08, 09:28    [5230551]     Ответить | Цитировать Сообщить модератору
 Re: Открыть новый документ в Excel с задданым именем  [new]
q1w1e1
Member

Откуда: Кы-рск
Сообщений: 1034
Спасибо
1 фев 08, 09:51    [5230680]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить