Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сделать формат ячийки Excel финансовым из VFP / 7 сообщений из 7, страница 1 из 1
29.01.2008, 11:26
    #35094025
Alex-ZZZ
Alex-ZZZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
Как правильно перевести формат ячейки Excel в финансовый вид без названия денежных единиц???

Знаю что чтобы перевести в текстовый нужно написать:

Код: plaintext
XLApp.columns( 5 ).NumberFormat = "@"

При переводе в финансовый, без названия денежных единиц, макрос Excel выдает следующее:

Код: plaintext
1.
Range("E41").Select
Selection.NumberFormat = "_(* #,##0.00_);_(* (#,##0.00);_(* ""-""??_);_(@_)"

Пишу вот так, выдает синтаксическую ошибку при компиляции:

Код: plaintext
XLApp.columns( 5 ).NumberFormat = "_(* #,##0.00_);_(* (#,##0.00);_(* ""-""??_);_(@_)"

Пользовался поиском ответа не нашел.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 11:27
    #35094030
Galyamov Rinat
Galyamov Rinat
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
> XLApp.columns(5).NumberFormat = "_(* #,##0.00_);_(* (#,##0.00);_(*
> ""-""??_);_(@_)"
У тебя XLApp.columns(5).NumberFormat = "Строка1"-"Строка2"

Естественно ошибка


Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 11:40
    #35094087
Alex-ZZZ
Alex-ZZZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
Galyamov Rinat

> XLApp.columns(5).NumberFormat = "_(* #,##0.00_);_(* (#,##0.00);_(*
> ""-""??_);_(@_)"
У тебя XLApp.columns(5).NumberFormat = "Строка1"-"Строка2"

Естественно ошибка


Posted via ActualForum NNTP Server 1.4

Сори ничего не понял. Я просто брал раньше макросы выдаваемые екселем и вставлял в прогу, почему для финансового формата он выдает не правильно? Укажите пожалуйста, а как надо правильно написать, чтобы все заработало.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 12:00
    #35094193
прошелмимо
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
[ 455555 """""" '''']


text to ... noshow prete  15 
     455555 """""" ''''
endtext

попробуйте один из предл-х вариантов
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 12:02
    #35094205
-=AlexiS=-
-=AlexiS=-
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
Да причем тут Эксел - если у вас просто неправильно сформирована строка.
У вас одни кавычки внутри других а фокс такого не понимает
если у вас в строке есть кавычки , то "наружные" должны быть другими

Код: plaintext
1.
XLApp.columns( 5 ).NumberFormat = '_(* #,##0.00_);_(* (#,##0.00);_(* ""-""??_);_(@_)'
XLApp.columns( 5 ).NumberFormat = [_(* #,## 0 .00_);_(* (#,## 0 . 00 );_(* ""-""??_);_(@_)]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 14:25
    #35094812
GoshaS
GoshaS
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
У меня вот так, все работает нормально :)
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
* Создаем объект Excel
LOCAL loExcel as Excel.Application 
loExcel=CREATEOBJECT('Excel.Application')
* Создаем в нем новую рабочую книгу
LOCAL loBook as Excel.Workbook 
#DEFINE xlWBATWorksheet - 4167 
loBook = m.loExcel.workbooks.Add(xlWBATWorksheet)
* Создаем ссылку на новый лист в рабочей книге
LOCAL loSheet as Excel.Worksheet 
loSheet = m.loBook.Sheets( 1 )
* Заносим шапку таблицы
m.loSheet.cells( 2 ,  1 ).value='Кол-во'
*Устанавливаем шрифт и его размер для шапки таблицы
WITH m.loSheet.Range("A2:E2").Font
    .Name = "Arial Cyr"
    .Size =  8 
    .Bold = .T.
ENDWITH 
*Устанавливаем выравнивание данных
WITH m.loSheet.Range("A2:E2")
    .HorizontalAlignment =  3  &&Center
    .VerticalAlignment =  2  && Center
    .WrapText = .T. &&Переносить по словам
ENDWITH 
*Изменяем ширину колонок
m.loSheet.Columns( 3 ).ColumnWidth =  10 
m.loSheet.Columns( 3 ).NumberFormat = "0.000"
m.loSheet.Columns( 4 ).ColumnWidth =  14 
m.loSheet.Columns( 4 ).NumberFormat = "#,##0.00"
m.loSheet.Columns( 5 ).ColumnWidth =  14 
m.loSheet.Columns( 5 ).NumberFormat = '_(* #,##0.00_);_(* (#,##0.00);_(* ""-""??_);_(@_)'
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.01.2008, 16:26
    #35095263
Alex-ZZZ
Alex-ZZZ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать формат ячийки Excel финансовым из VFP
Всем спасибо. -=AlexiS=- оказался прав . Тема закрыта.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сделать формат ячийки Excel финансовым из VFP / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 329ms
Закрыть
start [/forum/topic.php?fid=41&tablet=1&tid=1588237]:
 0ms
get settings:
 7ms
get forum list:
 22ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 55ms
get topic data:
 7ms
get forum data:
 1ms
get page messages:
 29ms
get tp. blocked users:
 1ms
others: 201ms
total:  329ms
x
x
Закрыть


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