2016-04-19 2 views
1

У меня есть столбец (W: W), который показывает год, когда что-то вступает в силу. Я пишу простой код VBA, чтобы определить, какие строки клиентов требуют «проверки», потому что их эффективная дата больше или равна году, который мы сейчас просматриваем. Я не хочу, чтобы каждый год редактировал код VBA, поэтому я вставил окно ввода, которое я хочу использовать позже в инструкции IF, чтобы отметить клиентов, которые нуждаются в «проверке». Я продолжаю получать «определенную приложением или объектно-обусловленную ошибку». Не уверен, что я делаю неправильно.Значение входного блока, используемое в IF-коде

'Ask question for year of testing 
Worksheets("Plan_Data").Activate 
Dim TestingYear 
TestingYear = Application.InputBox(prompt:="Which plan year end are you looking at (year only?)") 

Range("C2").Select 
ActiveCell.Formula = "=IF(W2>= & TestingYear &,""CHECK"","""")" 
+0

Добро пожаловать в СЦ! Несколько вопросов для уточнения. Как хранятся ваши данные? Вы захотите построить условное выражение в VBA, а не задавать формулу ячейки для оператора IF. Беспощадно и не нужно. Изменяется ли местоположение данных года? – StormsEdge

ответ

2

Попробуйте изменить его

ActiveCell.Formula = "=IF(W2>= " & TestingYear & ",""CHECK"","""")" 
Смежные вопросы