Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема вычисления диапазона при разном значении настройки "стиль ссылок" / 6 сообщений из 6, страница 1 из 1
22.03.2011, 22:40
    #37178332
densof123
densof123
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
Считается сумма диапазона при помощи :

ActiveSheet.Cells(1, colNo).FormulaR1C1 = ActiveSheet.Evaluate("=Sum(R" & (toRow - DocsRanges(docsIndex)(1)) & "C" & colNo & ":R" & (toRow - 1) & "C" & colNo & ")")

Если выставлен флаг настройки "Стиль ссылок R1C1" то значения считаются корректно. Если данный флаг убрать (колонки обзываются буковками...), то в ячейке отображается #знач!

Проверено и на 2003 и на 2010 офисе. Проблема и там и там наблюдается. Кто-нибудь подскажет в чем может быть дело ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.03.2011, 23:05
    #37178349
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
Ну так вы сами себе ответили - в формуле пишется либо "RxCx", либо типа "Axx...").
Хотя вы и пытаетесь вписать данные в свойство .FormulaR1C1, но не факт, что M$ нормально отработали VBA и объектную модель...
С другой стороны, если вы уже вписываете формулы макросом - то почему бы просто не рассчитать значения в том же макросе?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.03.2011, 23:08
    #37178352
прбуй камнем
прбуй камнем
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
densof123,
дело в ActiveSheet .Evaluate . И "проблема" останется вне зависимости от того, какое выражение слева от знака равенства. Как вариант решения "проблемы":
 
Код: plaintext
1.
2.
3.
4.
With ActiveSheet.Cells( 1 , colNo)
.FormulaR1C1 = "=Sum(R" & (toRow - DocsRanges(docsIndex)( 1 )) & "C" & colNo & ":R" & (toRow -  1 ) & "C" & colNo & ")"
.Calculate ' если включен автопересчет листа - можно закомментировать
.Formula = .Value
End With
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.03.2011, 00:42
    #37178401
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
Код: plaintext
1.
2.
3.
CurrentStyle = Application.ReferenceStyle
Application.ReferenceStyle = xlR1C1
ActiveSheet.Cells( 1 , colNo).FormulaR1C1 = ActiveSheet.Evaluate("=Sum(R" & (toRow - DocsRanges(docsIndex)( 1 )) & "C" & colNo & ":R" & (toRow -  1 ) & "C" & colNo & ")")
Application.ReferenceStyle = CurrentStyle
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.03.2011, 00:43
    #37178403
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
Ну ещё неплохо на время отрубить рефреш экрана - чтобы не дёргалось.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.03.2011, 22:06
    #37180095
densof123
densof123
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема вычисления диапазона при разном значении настройки "стиль ссылок"
прбуй камнем - не прокатывает такой вариант (
Akina - так да, ок ) Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Проблема вычисления диапазона при разном значении настройки "стиль ссылок" / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 465ms
Закрыть
start [/forum/topic.php?fid=61&tablet=1&tid=2177060]:
 0ms
get settings:
 9ms
get forum list:
 21ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 146ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 32ms
get tp. blocked users:
 1ms
others: 241ms
total:  465ms
x
x
Закрыть


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