ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Excel
54 сообщений из 54, показаны все 3 страниц
  все  
Excel
    #32900833
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
Может кто сталкивался: мне надо вывести в Excel:
************
ОТЧЕТНОСТЬ №
НАЗВАНИЕ
И ЕЩЕ ЧЕГО НИБУДЬ
************
так как набрал пользователь с сохранением всех переносов. В FP перевод строки chr(13)+chr(10), но в Excel только chr(10). Я анализирую то, что набрал пользователь, удаляю chr(13) и посылаю в Excel(в одну ячейку, например 1,1). В данном случае получается
"ОТЧЕТНОСТЬ №"+chr(10)+"НАЗВАНИЕ"+chr(10)+"И ЕЩЕ ЧЕГО НИБУДЬ". А он рисует мне между словами квадраты. Стоит щелкнуть два раза на этой ячеке и все становится как надо. Что это такое и как бороться????
...
Рейтинг: 0 / 0
04.02.2005, 11:13
| Ответить | Цитировать | Написать  
Excel
    #32900934
Фотография FM32YO aka KID
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FM32YO aka KID
Участник
ПисАть в три ячейки
...
Рейтинг: 0 / 0
04.02.2005, 11:50
| Ответить | Цитировать | Написать  
Excel
    #32900973
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
Этот вариант не подходит!!!!!! Надо расположить в ячейке 1,1 ВЕСЬ текст!!!
...
Рейтинг: 0 / 0
04.02.2005, 12:00
| Ответить | Цитировать | Написать  
Excel
    #32900996
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
А версия Excelя?
...
Рейтинг: 0 / 0
04.02.2005, 12:08
| Ответить | Цитировать | Написать  
Excel
    #32901005
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedА версия Excelя?
ХР
...
Рейтинг: 0 / 0
04.02.2005, 12:10
| Ответить | Цитировать | Написать  
Excel
    #32901037
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Excel XP SP3 - без проблем.
...
Рейтинг: 0 / 0
04.02.2005, 12:26
| Ответить | Цитировать | Написать  
Excel
    #32901075
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedExcel XP SP3 - без проблем.
У нас SP1 :-( Надо искать выход :-(
...
Рейтинг: 0 / 0
04.02.2005, 12:40
| Ответить | Цитировать | Написать  
Excel
    #32901080
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Попробуйте запатчить третьим.
...
Рейтинг: 0 / 0
04.02.2005, 12:42
| Ответить | Цитировать | Написать  
Excel
    #32901115
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedПопробуйте запатчить третьим.
Нету его :-( И скачивать из инета нельзя :-(
...
Рейтинг: 0 / 0
04.02.2005, 12:51
| Ответить | Цитировать | Написать  
Excel
    #32901158
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Попробуй формируемую строку писать в FormulaR1C1
...
Рейтинг: 0 / 0
04.02.2005, 13:06
| Ответить | Цитировать | Написать  
Excel
    #32901240
vlad_sv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vlad_sv
Гость
Помочь трудно советом, т.к. nk_81 не до конца поясняет. Он в ячейку A(1,1) хочет ввести только "ОТЧЕТНОСТЬ № "+chr(10)+"НАЗВАНИЕ "+chr(10)+"И ЕЩЕ ЧЕГО НИБУДЬ". А дальше КАК отчет будет располагаться? И в скольких столбцах?
К чему я это. Я то же оформляю иногда свои отчеты в Excel-листах. И сначала оформляю весь отчет в соответствующих столбцах оставляя заголовок на потом. В конце формирования отчета формирую заголовок в первых строках типа A(1,1) = "..." . Затем объединяю ячейки A(1,1)-A(1,№) и центрирую.

А если просто хотеть что-то написать в ячейку A(1,1) и чтобы в этой ячейке действовал перенос по словам. То это и надо заказывать в свойствах ячейки.

Может я что-то не понял.
...
Рейтинг: 0 / 0
04.02.2005, 13:32
| Ответить | Цитировать | Написать  
Excel
    #32901347
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
vlad_svПомочь трудно советом, т.к. nk_81 не до конца поясняет. Он в ячейку A(1,1) хочет ввести только "ОТЧЕТНОСТЬ № "+chr(10)+"НАЗВАНИЕ "+chr(10)+"И ЕЩЕ ЧЕГО НИБУДЬ". А дальше КАК отчет будет располагаться? И в скольких столбцах?
К чему я это. Я то же оформляю иногда свои отчеты в Excel-листах. И сначала оформляю весь отчет в соответствующих столбцах оставляя заголовок на потом. В конце формирования отчета формирую заголовок в первых строках типа A(1,1) = "..." . Затем объединяю ячейки A(1,1)-A(1,№) и центрирую.

А если просто хотеть что-то написать в ячейку A(1,1) и чтобы в этой ячейке действовал перенос по словам. То это и надо заказывать в свойствах ячейки.

Может я что-то не понял.
Мне надо записать этот текст именно в ячейку 1,1. ПЕРЕНОС ПО СЛОВАМ-это другое-разбиваются слова в зависимости от ширины ячейки! Эта настройка специально отключена!!! Мне надо просто поместить туда кусок текста!!!!
...
Рейтинг: 0 / 0
04.02.2005, 13:57
| Ответить | Цитировать | Написать  
Excel
    #32901420
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Office 2K

Код: plaintext
1.
2.
3.
loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets( 1 ).Cells( 1 , 1 ).Value = 'Начало'+chr( 10 )+'Конец'
loExcel.Visible=.T.

Никаких проблем. Если перевод происходит только при получении ячейкой фокуса, то попробуй сделать это принудительно

loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Select()
...
Рейтинг: 0 / 0
04.02.2005, 14:13
| Ответить | Цитировать | Написать  
Excel
    #32901482
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
угу никаких проблем
эт точно
а если так

loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало сеанса связи' +chr(10)+'Конец'
loExcel.Visible=.T.

проблем становиться больше
...
Рейтинг: 0 / 0
04.02.2005, 14:35
| Ответить | Цитировать | Написать  
Excel
    #32901507
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
а так вообще песня

loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало сеанса связи'+chr(10)+'Конец'
loExcel.selection.WrapText = .f.
loExcel.Visible=.T.
...
Рейтинг: 0 / 0
04.02.2005, 14:42
| Ответить | Цитировать | Написать  
Excel
    #32901668
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
ВладимирМOffice 2K

Код: plaintext
1.
2.
3.
loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets( 1 ).Cells( 1 , 1 ).Value = 'Начало'+chr( 10 )+'Конец'
loExcel.Visible=.T.

Никаких проблем. Если перевод происходит только при получении ячейкой фокуса, то попробуй сделать это принудительно

loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Select()
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало'+chr(10)+'Конец'
Все ОК, а если добавляю :
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1)..WrapText=.F.
опять 25-квадраты!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
...
Рейтинг: 0 / 0
04.02.2005, 15:29
| Ответить | Цитировать | Написать  
Excel
    #32901690
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Так не надо WrapText=.F., как раз в этом случае chr(10) и будет в виде прямоугольника.
И сообще какие то непонятки пошли.
Изначально было с квадратами, а по коду Владимира Максимова - все нормально. Где то ты противоречишь себе.
...
Рейтинг: 0 / 0
04.02.2005, 15:35
| Ответить | Цитировать | Написать  
Excel
    #32901713
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
самое простое писать в три разные ячейки одна под одной ,
а соседние ячейки в этом же ряду объединить по три в каждом столбце
хотя может кто что лучше скажет другого решения не нашел
...
Рейтинг: 0 / 0
04.02.2005, 15:41
| Ответить | Цитировать | Написать  
Excel
    #32901716
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Решил и я попробовать - вопрос меня тоже интересует.

Так ват если в коде, который вы написали:
loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало сеанса связи'+chr(10)+'Конец'
loExcel.selection.WrapText = .f.
loExcel.Visible=.T.

Поменть местами две строки, т.е. сначала сделать
loExcel.selection.WrapText = .f.
а уж потом
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало сеанса связи'+chr(10)+'Конец'
То тогда точно песня, по-крайней мере у меня, а первый вариант, действительно выдает квадраты. Правда если ширина ячейки такова, что фраза "Начало сеанса связи" не вмещается, то естественно Excell и ее размещает в несколько строк, однако слово "Конец" в любом случае получается с начала строки.
...
Рейтинг: 0 / 0
04.02.2005, 15:41
| Ответить | Цитировать | Написать  
Excel
    #32901732
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Уппс... извиняйте, перед WrapText надо еще добавить
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Select

Короче код должен быть таким:
loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Select
loExcel.selection.WrapText = .f.
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = "Начало сеанса связи"+chr(10)+"Конец"
loExcel.Visible=.T.
...
Рейтинг: 0 / 0
04.02.2005, 15:45
| Ответить | Цитировать | Написать  
Excel
    #32901762
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
2 kms_

У тебя тоже XP SP1?
Ради интереса, после всего глянь свойства ячейки.
На XP SP3 для ячейки выставлен чекер перенос по словам, хотя мы его явно сбросили.
...
Рейтинг: 0 / 0
04.02.2005, 15:55
| Ответить | Цитировать | Написать  
Excel
    #32901767
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
хотя это может быть решением
выбирам самую длинную строку а далее примерно так

loExcel = CreateObject('Excel.Application')
loExcel.Workbooks.Add
loExcel.selection.WrapText = .f.
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value ='Начало сеанса связи'
loExcel.Selection.Columns.AutoFit
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value ='Начало сеанса связи'+chr(10)+'Конец'
loExcel.Visible=.T.
...
Рейтинг: 0 / 0
04.02.2005, 15:59
| Ответить | Цитировать | Написать  
Excel
    #32901769
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Да, действительно, чекер стоит. Но это из за того что он вставляется автоматически при обработке Chr(10). Это тоже самое, как если вы прямо в Excell набирали с клавки "Начало сеанса связи", а потом бы нажали Alt+Enter и написали бы далее "Конец", тогда бы тоже в ячейке, которая до сих пор была с WrapText = .f. чекер поменялся бы на .t.

А офис у меня вообще 2003, и судя по всему это не от версии зависит.
...
Рейтинг: 0 / 0
04.02.2005, 16:01
| Ответить | Цитировать | Написать  
Excel
    #32901790
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
2 kms_
Так вот и получается, что после этого

Код: plaintext
1.
2.
3.
4.
loXls=CREATEOBJECT("Excel.Application")
loXls.Workbooks.Add
loXls.ActiveWorkbook.Sheets( 1 ).Cells( 1 , 1 ).WrapText = .f.
loXls.ActiveWorkbook.Sheets( 1 ).Cells( 1 , 1 ).Value = "Начало сеанса связи"+chr( 10 )+"Конец"
loXls.Visible=.T.

Excel должен сам выставить для ячейки "перенос по словам", а у nk_81 похоже этого не происходит. Следовательно нужно выставить его принудительно.
...
Рейтинг: 0 / 0
04.02.2005, 16:09
| Ответить | Цитировать | Написать  
Excel
    #32901805
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Ребяты, мы тут между собой устроили дебаты, а nk_81 молчит! Последнее что он написал:

loExcel.ActiveWorkbook.Sheets(1).Cells(1,1).Value = 'Начало'+chr(10)+'Конец'
Все ОК, а если добавляю :
loExcel.ActiveWorkbook.Sheets(1).Cells(1,1)..WrapText=.F.
опять 25-квадраты!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

А это, действительно, так, потому что он WrapText=.f. делает после того как присваивает значение ячейке, соответственно, снимает чекер и получает квадрат. А вот пусть он попробует сделать как писали в последних сообщениях и напишет нам получилось у него или нет. Я думаю, что должно получится.

Так что nk_81 мы ждем вашего вердикта.
...
Рейтинг: 0 / 0
04.02.2005, 16:15
| Ответить | Цитировать | Написать  
Excel
    #32901860
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
kms_Да, действительно, чекер стоит. Но это из за того что он вставляется автоматически при обработке Chr(10). Это тоже самое, как если вы прямо в Excell набирали с клавки "Начало сеанса связи", а потом бы нажали Alt+Enter и написали бы далее "Конец", тогда бы тоже в ячейке, которая до сих пор была с WrapText = .f. чекер поменялся бы на .t.

А офис у меня вообще 2003, и судя по всему это не от версии зависит.
Вот у меня получается:
1)oExl.ActiveWorkbook.Sheets(1).Cells(1,1).Select
oExl.selection.WrapText = .f.
oExl.ActiveWorkbook.Sheets(1).Cells(1,1).Value = "Начало"+chr(10)+"Конец"
переносит по словам-разбиват слова на части в зависимости от ширины столбца, а мне этого НЕ НАДО!!!! Мне надо получить:
НАЧАЛО
КОНЕЦ
а не
НА
ЧА
ЛО, так происходит, если чекер стоит!
Мне нельзя раздвигать столбец по длинне содержимого этой ячейки!!!
...
Рейтинг: 0 / 0
04.02.2005, 16:34
| Ответить | Цитировать | Написать  
Excel
    #32901870
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedИзначально было с квадратами, а по коду Владимира Максимова - все нормально. Где то ты противоречишь себе.
В случае по коду Владимира Максимова имелось ввиду, что нет квадратов, но он переносит по слогам.
...
Рейтинг: 0 / 0
04.02.2005, 16:36
| Ответить | Цитировать | Написать  
Excel
    #32901876
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
тогда в 3 ячейки
а ячейки вокруг постраивать
...
Рейтинг: 0 / 0
04.02.2005, 16:38
| Ответить | Цитировать | Написать  
Excel
    #32901883
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
А что у тебя справа от этой ячейки?
Если там забита информация, то куда же ты Excelю предлагаешь уместить вносимую строку? Если там пусто, то что мешает объединить соседнии ячейки?
Если не военная тайна, то выложи Excel-файл на обозрение.
...
Рейтинг: 0 / 0
04.02.2005, 16:40
| Ответить | Цитировать | Написать  
Excel
    #32901885
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
leafтогда в 3 ячейки
а ячейки вокруг постраивать
а если в 3 тоже не влезает? Пользователь может набрать ОЧЕНЬ длинный текст и ему ОБЯЗАТЕЛЬНО выгрузить в Excel так как ОН ОФОРМИЛ, без разбивки, если не влезает по ширине.
...
Рейтинг: 0 / 0
04.02.2005, 16:40
| Ответить | Цитировать | Написать  
Excel
    #32901889
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedА что у тебя справа от этой ячейки?
Если там забита информация, то куда же ты Excelю предлагаешь уместить вносимую строку? Если там пусто, то что мешает объединить соседнии ячейки?
Если не военная тайна, то выложи Excel-файл на обозрение.
не секрет, просто это несколько больших файлов, собирать надо, если хотите выложу.
...
Рейтинг: 0 / 0
04.02.2005, 16:42
| Ответить | Цитировать | Написать  
Excel
    #32901891
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedА что у тебя справа от этой ячейки?
Если там забита информация, то куда же ты Excelю предлагаешь уместить вносимую строку? Если там пусто, то что мешает объединить соседнии ячейки?
Если не военная тайна, то выложи Excel-файл на обозрение.
справа пусто, но как узнать сколько ячеек объединять, если текст большой?
...
Рейтинг: 0 / 0
04.02.2005, 16:43
| Ответить | Цитировать | Написать  
Excel
    #32901899
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Ну друг извини... тогда тебе Excell не подходит...

Есть только два варианта:
1. Стоит чекер и Excell разбивает содержимое одной ячейки по строкам и не только там, где ты поставил chr(10), но и там где он делает это в штатном порядке.
2. Чекер не стоит и Excell вообще все отображает в одной строке, паказывая "квадратик".

И, как мне кажется, все, что делает Excell - это довольно логично. Нельзя же разместить в заданной ширине колонки, тот текст который туда ну никак не влазит. В конце концов, если текст постоянный, то ты можешь изменить размер шрифта, чтобы твое "Начало" наконец влезло....
...
Рейтинг: 0 / 0
04.02.2005, 16:45
| Ответить | Цитировать | Написать  
Excel
    #32901921
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Если файл потом печатается и ширина столбцов одинакова, то экспериментально можешь определить сколько столбцов объединить под формат А4.
...
Рейтинг: 0 / 0
04.02.2005, 16:49
| Ответить | Цитировать | Написать  
Excel
    #32901929
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
kms_Ну друг извини... тогда тебе Excell не подходит...

Есть только два варианта:
1. Стоит чекер и Excell разбивает содержимое одной ячейки по строкам и не только там, где ты поставил chr(10), но и там где он делает это в штатном порядке.
2. Чекер не стоит и Excell вообще все отображает в одной строке, паказывая "квадратик".

И, как мне кажется, все, что делает Excell - это довольно логично. Нельзя же разместить в заданной ширине колонки, тот текст который туда ну никак не влазит. В конце концов, если текст постоянный, то ты можешь изменить размер шрифта, чтобы твое "Начало" наконец влезло....
на excell настаивают пользователи :-( Вынь да полож :-( А текст далеко не постоянный!
...
Рейтинг: 0 / 0
04.02.2005, 16:52
| Ответить | Цитировать | Написать  
Excel
    #32901946
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
2 nk_81

Ну раз пользователи настаивают ...
Скорее всего мы тут бьемся над проблемой оформления шапки отчетного документа. Совет, объедени ячейки шапки на ширину табличной части отчета и ваяй.
...
Рейтинг: 0 / 0
04.02.2005, 16:57
| Ответить | Цитировать | Написать  
Excel
    #32901949
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
nk_81, я не совсем понимаю, зачем нужно разбивать текст имеенно в определенных местах, тем более что, как вы говорите, текст не постоянный. А раз так, то пусть его Excell сам и разбивает, тем более, что ширина колонки фиксированная.
...
Рейтинг: 0 / 0
04.02.2005, 16:59
| Ответить | Цитировать | Написать  
Excel
    #32901962
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMed 2 nk_81

Ну раз пользователи настаивают ...
Скорее всего мы тут бьемся над проблемой оформления шапки отчетного документа. Совет, объедени ячейки шапки на ширину табличной части отчета и ваяй.
Именно!!!!!!!! То есть пользователи в программе водят заголовок отчета ТАК КАК им надо, чтобы он располагался, причем это далеко не одна строка (но выгрузить надо в одну строку, строго, в екселе), то есть надо сохранить оформление ПОЛНОСТЬЮ!!! Вариант хороший, а если не влезет на ширину табличной части и опять пойдет разбиение? Замкнутый круг.
...
Рейтинг: 0 / 0
04.02.2005, 17:04
| Ответить | Цитировать | Написать  
Excel
    #32901966
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
2 nk_81

Никакого круга, только квадраты

Обычно табличная часть отчета занимает всю ширину листа.
Ну и как они представляют печать за его (листа) пределами.
...
Рейтинг: 0 / 0
04.02.2005, 17:06
| Ответить | Цитировать | Написать  
Excel
    #32901979
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
nk_81 а почему бы вам не ограничить возможности пользователей при определении заголовка, так как диктует ширина колонки и листа в целом, вместо того, чтобы пытаться разместить все, что напишет пользователь в определенных рамках.
...
Рейтинг: 0 / 0
04.02.2005, 17:09
| Ответить | Цитировать | Написать  
Excel
    #32901997
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
kms_nk_81 а почему бы вам не ограничить возможности пользователей при определении заголовка, так как диктует ширина колонки и листа в целом, вместо того, чтобы пытаться разместить все, что напишет пользователь в определенных рамках.
Трудно убедить тех, кто не понимает почему невозможно сделать так как они хотят! Но я так понимаю придется.
...
Рейтинг: 0 / 0
04.02.2005, 17:15
| Ответить | Цитировать | Написать  
Excel
    #32902000
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMed 2 nk_81

Никакого круга, только квадраты


Это точно

А табличная часть отчета не всегда занимает всю ширину листа :-(.
...
Рейтинг: 0 / 0
04.02.2005, 17:16
| Ответить | Цитировать | Написать  
Excel
    #32902002
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Да выход есть и он простой.
Оставить место под шапку и вывести только табличную часть, а пользователи в Excele набьют заголовок как им надо :))
...
Рейтинг: 0 / 0
04.02.2005, 17:17
| Ответить | Цитировать | Написать  
Excel
    #32902016
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedДа выход есть и он простой.
Оставить место под шапку и вывести только табличную часть, а пользователи в Excele набьют заголовок как им надо :))
Знаешь почему они так не хотят? Потому что в программе они набьют и это можно сохранить как шаблон отчетности (а ее очень много це ж банк), а так им придется каждый раз заголовок набивать. Вот я и изголяюсь.
...
Рейтинг: 0 / 0
04.02.2005, 17:21
| Ответить | Цитировать | Написать  
Excel
    #32902025
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
Это что же, одни и те же цифры могут идти под разной шапкой?
Извиняй за вопрос в банке не работал и тонкостей не знаю.
...
Рейтинг: 0 / 0
04.02.2005, 17:25
| Ответить | Цитировать | Написать  
Excel
    #32902043
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
AleksMedЭто что же, одни и те же цифры могут идти под разной шапкой?
Извиняй за вопрос в банке не работал и тонкостей не знаю.
в том то и дело, что и цифры разные. У них есть огромный грид, который они могут настраивать по своему усмотрению-скрывать/восстанавливать колонки, сортировать/фильтровать, редактировать/изменять, короче получать данные в этом гриде, которые им нужны, приписывают к этим данным шапку и подписи-в ексель и на печать. две колонки грида-одна отчетность, а добавил еще несколько, отфильтровал что надо-другая.
...
Рейтинг: 0 / 0
04.02.2005, 17:35
| Ответить | Цитировать | Написать  
Excel
    #32902063
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
nk_81, в моем проекте есть нечто подобное, но я даже и думать не стал над тем, как размещать заголовок столбца... Пользователи должны понимать (хоть и не программеры), что ширина столбца ограничена. Короче у меня они просто набивают заголовок столбца, я его вставляю в нужную ячейку, а дальше дело Excell. Если будут возмущаться, открой Excell, сделай колонку нужной ширины и попроси их показать какой должен быть заголовок колонки. Хочу посмотреть как им удастся разместить целое социнение в ограниченных рамках.
...
Рейтинг: 0 / 0
04.02.2005, 17:43
| Ответить | Цитировать | Написать  
Excel
    #32902073
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
kms_nk_81, в моем проекте есть нечто подобное, но я даже и думать не стал над тем, как размещать заголовок столбца... Пользователи должны понимать (хоть и не программеры), что ширина столбца ограничена. Короче у меня они просто набивают заголовок столбца, я его вставляю в нужную ячейку, а дальше дело Excell. Если будут возмущаться, открой Excell, сделай колонку нужной ширины и попроси их показать какой должен быть заголовок колонки. Хочу посмотреть как им удастся разместить целое социнение в ограниченных рамках.
это не заголовок столбца, а заголовок отчета, но рамки тоже ограничены.
...
Рейтинг: 0 / 0
04.02.2005, 17:47
| Ответить | Цитировать | Написать  
Excel
    #32902092
kms_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kms_
Гость
Смысл тот же. Пусть разбивает Excel, только предварительно, конечно, было бы неплохо объединить ячеки первой строки в n столбцах, где n-это количество столбцов в отчете.

То есть если в отчете 5 столбцов, то ты объединяешь A1:E1 и там размещаешь заголовок, тогда можно будет без труда и оцентрировать заголовок относительно всей ширины отчета.

Далее извини - должен бежать.

Но обязательно на днях посмотрю чем это все закончилось.

Удачи.
...
Рейтинг: 0 / 0
04.02.2005, 17:54
| Ответить | Цитировать | Написать  
Excel
    #32902821
vl2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vl2000
Участник
Есть такой вариант.
Заранее создается шаблон документа, например
мой_документ.xlt
В этом шаблоне заранее определяешь ячейку для заголовка и форматируешь её нужным образом (переносить по словам, автоподбор высоты строки и т.п.).

А в фоксе используешь этот шаблон при создании отчета:

my_doc='мой_документ.xlt'
XLApp=CREATEOBJECT('Excel.Application')
XLApp.WorkBooks.Add(my_doc)
XLApp.Cells(13,2).Value = "Мой заголовок"
...
Рейтинг: 0 / 0
05.02.2005, 22:20
| Ответить | Цитировать | Написать  
Excel
    #32903084
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AleksMed
Участник
2 vl2000

Этот вариант ему не подойдет.
У него отчет динамичный и заголовок юзеры сами определяют.
...
Рейтинг: 0 / 0
06.02.2005, 17:17
| Ответить | Цитировать | Написать  
Excel
    #32903148
vl2000
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vl2000
Участник
81-му
Честно говоря, я так и не понял, почему в одну ячейку нужно выводить весь текст. Почему нельзя объединить ячейки в одной строке, или вывести в шапку в несколько строк? Ты же всё равно анализируешь строку когда убираешь chr(13)? А если и нет, что мешает разобрать строку на предмет chr(10)?
Т.е. всегда можно определить, сколько у тебя строк будет в шапке и с какой строки начинать вывод данных.
Если отчет для печати- на бумаге, всё равно не будет видно, в одной строке/ячейке или нет распологается шапка. Если для последующих манипуляций с файлом, то же проблем не вижу для варианта из нескольких ячеек. Удаляются/вставляются/копируются без проблем.

Что бы заголовок уместился в ширину листа в Эхеле- достаточно нескольких экспериментов. Нужно подобрать ширину поля ввода заголовка так, что бы она была немного меньше длины текста, умещающегося в ширину листа в Эхеле. Тогда пользователь сам буде нажимать ENTER при вводе заголовка.
...
Рейтинг: 0 / 0
06.02.2005, 19:58
| Ответить | Цитировать | Написать  
Excel
    #32903574
nk_81
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
nk_81
Гость
На данный момент оставляю: объединяю ячейки первой строки на ширину отчета и туда записываю заголовок, НО вылезла еще одна штука, блин:
Если пользователь вводит:
Отчетность ...
форма№....
, то в эксель выводится все нормально, как он и написал, если вводит:
Отчетность...
По форме ...
(то есть выравнивает положение заголовка ПРОБЕЛАМИ, исключительно пробелами), то в эксель выводится:



Отчетность...
По форме ...
(то есть появляются ЛИШНИЕ пустые строки), хотя в макросе смотрю написано:" Отчетность..."+chr(10)+" По форме ...", получается лишним строкам неоткуда взяться, так откуда же они вылазиют?????????? :-(((
...
Рейтинг: 0 / 0
07.02.2005, 11:02
| Ответить | Цитировать | Написать  
Excel
    #32905003
Igor Korolyov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Igor Korolyov
Участник
Hi nk_81!

Ну тут тебе уже сказали, что есть только 1 вариант - установить WrapText=.T.
для этой ячейки - только тогда твои CHR(10) будут "работать" а не
"квадратики" рисовать.
А вообще есть простой способ - приходишь к пользователю и говоришь - "сделай
мне в Excel так как ты это себе представляешь, я потом сделаю так-же". Тогда
они воочию увидят ограничения Excel и больше приставать с невыполнимыми
требованиями не будут :)

Posted via ActualForum NNTP Server 1.1
...
Рейтинг: 0 / 0
07.02.2005, 23:04
| Ответить | Цитировать | Написать  
54 сообщений из 54, показаны все 3 страниц
  все  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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