I am trying to add some logic to a particular project I am working on. The form collects data basaed on a users input and then makes decisions based on certain criteria.
I am having some trouble getting a If (condition) and (condition) and (condition) then loop to give me my result. I feel that I am so close but am missing something pretty obvious.
Somebody please help.
The code is reading a excel database for a "true" or "false" input in a series of cells. If all the conditions are fullfilled, it routes the form to a particular user. The problem I am having when I step through the code is that the "and values" are all reading ok, but the "then" result is not tripping the value it should.
Sorry this is so long but I just want people to understand the problem.
code:
If anyone can help I would appreciate it.
I am having some trouble getting a If (condition) and (condition) and (condition) then loop to give me my result. I feel that I am so close but am missing something pretty obvious.
Somebody please help.
The code is reading a excel database for a "true" or "false" input in a series of cells. If all the conditions are fullfilled, it routes the form to a particular user. The problem I am having when I step through the code is that the "and values" are all reading ok, but the "then" result is not tripping the value it should.
Sorry this is so long but I just want people to understand the problem.
code:
Code:
ElseIf Range("d9").Value = "Fabricate F/G Wheel covers" And _
'((ActiveCell.Offset(0, 20) = "TRUE" Or _
'ActiveCell.Offset(0, 112) = "TRUE") And _
'(ActiveCell.Offset(0, 27) = "TRUE" Or _
'ActiveCell.Offset(0, 114) = "TRUE") And _
'(ActiveCell.Offset(0, 34) = "TRUE" Or _
'ActiveCell.Offset(0, 116) = "TRUE") And _
'(ActiveCell.Offset(0, 41) = "TRUE" Or _
'ActiveCell.Offset(0, 118) = "TRUE") And _
'(ActiveCell.Offset(0, 48) = "TRUE" Or _
'ActiveCell.Offset(0, 120) = "TRUE") And _
'(ActiveCell.Offset(0, 55) = "TRUE" Or _
'ActiveCell.Offset(0, 122) = "TRUE") And _
'(ActiveCell.Offset(0, 62) = "TRUE" Or _
'ActiveCell.Offset(0, 124) = "TRUE") And _
'(ActiveCell.Offset(0, 83) = "TRUE" Or _
'ActiveCell.Offset(0, 130) = "TRUE")) Then
'checked = True
'Exit Sub