ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   code line with two conditions (https://www.excelbanter.com/excel-discussion-misc-queries/135133-code-line-two-conditions.html)

TUNGANA KURMA RAJU

code line with two conditions
 
I am not an expert in Vba code.I have a line code
If cell.offset(0,2).value< _
Worksheets(cell.value).Range("A1").End(xlDown) Then
Set Sh1=nothing
I would like to add one more condition to the above line,apart from the
above condition, If cell.offset(0,1) .value= "EQ" or "BE".How to modify my
line code ?
If my coditions are not met ,the sub should exit by prompting message
"Conditions are not met,Updation not required" with one "ok" button.Where
this message code line has to incorporate.Thanks whole community in advance.


joel

code line with two conditions
 
I coded exactly what yuo asked for. Can't guarentee it will work.

If (cell.offset(0,2).value< Worksheets(cell.value).Range("A1").End(xlDown)
_
or (cell.offset(0,1) .value= "EQ") _
or (cell.offset(0,1) .value= "BE") Then

"TUNGANA KURMA RAJU" wrote:

I am not an expert in Vba code.I have a line code
If cell.offset(0,2).value< _
Worksheets(cell.value).Range("A1").End(xlDown) Then
Set Sh1=nothing
I would like to add one more condition to the above line,apart from the
above condition, If cell.offset(0,1) .value= "EQ" or "BE".How to modify my
line code ?
If my coditions are not met ,the sub should exit by prompting message
"Conditions are not met,Updation not required" with one "ok" button.Where
this message code line has to incorporate.Thanks whole community in advance.


TUNGANA KURMA RAJU

code line with two conditions
 
This gives if any one condition is true,Then ...the asked results will
come.My question is If first condition and any one of second and third
condition is true,then....so. Can it be used with "and" and "or".
What about my 2nd part of my question?.

"Joel" wrote:

I coded exactly what yuo asked for. Can't guarentee it will work.

If (cell.offset(0,2).value< Worksheets(cell.value).Range("A1").End(xlDown)
_
or (cell.offset(0,1) .value= "EQ") _
or (cell.offset(0,1) .value= "BE") Then

"TUNGANA KURMA RAJU" wrote:

I am not an expert in Vba code.I have a line code
If cell.offset(0,2).value< _
Worksheets(cell.value).Range("A1").End(xlDown) Then
Set Sh1=nothing
I would like to add one more condition to the above line,apart from the
above condition, If cell.offset(0,1) .value= "EQ" or "BE".How to modify my
line code ?
If my coditions are not met ,the sub should exit by prompting message
"Conditions are not met,Updation not required" with one "ok" button.Where
this message code line has to incorporate.Thanks whole community in advance.


joel

code line with two conditions
 
If (cell.offset(0,2).value< Worksheets(cell.value).Range("A1").End(xlDown)
_
or (cell.offset(0,1) .value= "EQ") _
or (cell.offset(0,1) .value= "BE") Then

'your code

else

msgbox("Conditions are not met,Updation not required")
exit sub

end if


"TUNGANA KURMA RAJU" wrote:

This gives if any one condition is true,Then ...the asked results will
come.My question is If first condition and any one of second and third
condition is true,then....so. Can it be used with "and" and "or".
What about my 2nd part of my question?.

"Joel" wrote:

I coded exactly what yuo asked for. Can't guarentee it will work.

If (cell.offset(0,2).value< Worksheets(cell.value).Range("A1").End(xlDown)
_
or (cell.offset(0,1) .value= "EQ") _
or (cell.offset(0,1) .value= "BE") Then

"TUNGANA KURMA RAJU" wrote:

I am not an expert in Vba code.I have a line code
If cell.offset(0,2).value< _
Worksheets(cell.value).Range("A1").End(xlDown) Then
Set Sh1=nothing
I would like to add one more condition to the above line,apart from the
above condition, If cell.offset(0,1) .value= "EQ" or "BE".How to modify my
line code ?
If my coditions are not met ,the sub should exit by prompting message
"Conditions are not met,Updation not required" with one "ok" button.Where
this message code line has to incorporate.Thanks whole community in advance.



All times are GMT +1. The time now is 12:46 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com