Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / FormulaR1C1 в VBA / 5 сообщений из 5, страница 1 из 1
15.08.2016, 06:17
    #39291698
LiQuid
LiQuid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormulaR1C1 в VBA
Добрый день.
Прошу подсказать, где моя ошибка? Ругается что FormulaR1C1 не правильно написана.

HeaderRowsCount = 3
TotalRows = Cells(Rows.count, 4).End(xlUp).Row
CodeColumn = 5

Код: vbnet
1.
2.
3.
4.
5.
    For i = 1 To TotalRows - HeaderRowsCount
    
        Cells(i + HeaderRowsCount, CodeColumn).FormulaR1C1 = "=IF(OR($F$ & i=""Rotation 1"",$F$ & i=""Rotation 2""),$AL$ & i/11,$AL$ & i/8)"

    Next i
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 08:10
    #39291709
LiQuid
LiQuid
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormulaR1C1 в VBA
Ошибка: Run-time error '1004'
Application-defined or object-defined error
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 09:04
    #39291719
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormulaR1C1 в VBA
Замени
Cells(i + HeaderRowsCount, CodeColumn).FormulaR1C1 =
на
Debug.Print
и посмотри, какой бред ты пытаешься засунуть в качестве формулы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 09:06
    #39291721
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormulaR1C1 в VBA
LiQuid,

а сами-то не видите? Стиль формулы R1C1 указываете, а в тексте формулы используете ссылки типа А1. Отсюда и ошибки. Пишите уж тогда не .FormulaR1C1, а просто .Formula
Плюс, я смотрю с кавычками у Вас тоже не лады. Почему Вы амперсанд указываете внутри кавычек? Там переменная VBA? Она должна быть выделена из текста:
Код: vbnet
1.
"=IF(OR($F$" & i & '=""Rotation 1""...



дальше сами
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
15.08.2016, 09:07
    #39291722
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormulaR1C1 в VBA
The_Prist
Код: vbnet
1.
"=IF(OR($F$" & i & '=""Rotation 1""...


"=IF(OR($F$" & i & " =""Rotation 1""
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / FormulaR1C1 в VBA / 5 сообщений из 5, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 427ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2172981]:
 0ms
get settings:
 9ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 31ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 45ms
get tp. blocked users:
 2ms
others: 305ms
total:  427ms
x
x
Закрыть


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