Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VB, Excel: скрипт - добавление условия (and) для Target.Row / 4 сообщений из 4, страница 1 из 1
31.10.2012, 17:47
    #38020588
Excel-Starter
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB, Excel: скрипт - добавление условия (and) для Target.Row
Имеется следующий скрипт (при выполнении заданного условия - в соотв. ячейке формула, при невыполнении - значение данной ячейки):
If Target.Row = 9 Then
If Target.Value = "" Then Target.Offset(-5, 0).FormulaR1C1 = "=R[1]C+R[2]C/Data!R3C3" Else Target.Offset(-5, 0).Value = Target.Offset(-5, 0).Value
End If

Нужно добавить в скрипт условие, чтоб он выполнялся только, если значение в ячейке [- 3] от главного в том же ряду "пусто".

Т.е. что-то типа:
If Target.Row = 9 Then
If and ( Target.Value = "" ; Target.Row-3="") Then Target.Offset(-5, 0).FormulaR1C1 = "=R[1]C+R[2]C/Data!R3C3" Else Target.Offset(-5, 0).Value = Target.Offset(-5, 0).Value
End If

Как это можно сделать?

Заранее спасибо!
...
Рейтинг: 0 / 0
31.10.2012, 20:34
    #38020732
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB, Excel: скрипт - добавление условия (and) для Target.Row
Excel-Starter,

Код: vbnet
1.
If Target.Value = "" and len(Target.offset(,-3).value)=0 Then........
...
Рейтинг: 0 / 0
01.11.2012, 00:01
    #38020890
Excel-Starter
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB, Excel: скрипт - добавление условия (and) для Target.Row
R Dmitry,

Извиняюсь, ошибся в описании: нужно, чтоб привязка была к ячейке в том же столбце, а не ряду, т. е.:
"если значение в ячейке [- 3] от главного в том же столбце "пусто". "

Что нужно изменить в формуле?
...
Рейтинг: 0 / 0
01.11.2012, 10:34
    #38021225
R Dmitry
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VB, Excel: скрипт - добавление условия (and) для Target.Row
Excel-Starter,

Код: vbnet
1.
.offset(-3,)
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / VB, Excel: скрипт - добавление условия (and) для Target.Row / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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