ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   vba using the OR operator (https://www.excelbanter.com/excel-programming/384076-vba-using-operator.html)

Mona

vba using the OR operator
 
Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!

RB Smissaert

vba using the OR operator
 
You need to do:

If Rows(iRow, 1) = "11/13/2005" Or Rows(iRow, 1) = "11/23/2005" Then


RBS


"Mona" wrote in message
...
Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!



Vergel Adriano

vba using the OR operator
 
Monda,

Try it this way:

If Rows(iRow,1).value = #11/13/2005# or Rows(iRow,1).value = #11/23/2005" Then
'* YOUR CODE HERE *
End if


"Mona" wrote:

Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!


Mona

vba using the OR operator
 
Thank you Vergel for reply but I am getting error on this code:

If Rows(iRow, 1).Value = "11/13/2005" Or Rows(iRow, 1).Value = "11/23/2005"
Then

**code**
end if

"Vergel Adriano" wrote:

Monda,

Try it this way:

If Rows(iRow,1).value = #11/13/2005# or Rows(iRow,1).value = #11/23/2005" Then
'* YOUR CODE HERE *
End if


"Mona" wrote:

Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!


merjet

vba using the OR operator
 
Firstly, Rows(iRow,1) won't work. Do you mean Cells(iRow,1)?

You could put all the dates in an array and then loop the array, e.g.

Dim bFlag As Boolean
myArray = Array(#11/15/2005#, #11/23/2005#)
For iCt = 0 To UBound(myArray)
If Cells(iRow, 1) = myArray(iCt) Then
bFlag = True
Exit For
End If
Next iCt
If bFlag = True Then
'do something
End If

Hth,
Merjet



RB Smissaert

vba using the OR operator
 
Should it not be:

If Cells(iRow, 1).Value

RBS


"Mona" wrote in message
...
Thank you Vergel for reply but I am getting error on this code:

If Rows(iRow, 1).Value = "11/13/2005" Or Rows(iRow, 1).Value =
"11/23/2005"
Then

**code**
end if

"Vergel Adriano" wrote:

Monda,

Try it this way:

If Rows(iRow,1).value = #11/13/2005# or Rows(iRow,1).value = #11/23/2005"
Then
'* YOUR CODE HERE *
End if


"Mona" wrote:

Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get
by
with just repeating the code 20 times but I wanted to do it using a
single
statement.

Thank you!!



Vergel Adriano

vba using the OR operator
 
Try using the Cells collection instead of Rows. So, use

Cells(iRow, 1)

instead of

Rows(iRow, 1)





"Mona" wrote:

Thank you Vergel for reply but I am getting error on this code:

If Rows(iRow, 1).Value = "11/13/2005" Or Rows(iRow, 1).Value = "11/23/2005"
Then

**code**
end if

"Vergel Adriano" wrote:

Monda,

Try it this way:

If Rows(iRow,1).value = #11/13/2005# or Rows(iRow,1).value = #11/23/2005" Then
'* YOUR CODE HERE *
End if


"Mona" wrote:

Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!


Don Guillett

vba using the OR operator
 
sub ifcells()
If cells(iRow, 1) ="11/13/2005" Or cells(irow.1)="11/23/2005") Then msgbox
"ok"
end sub

--
Don Guillett
SalesAid Software

"Mona" wrote in message
...
Here is my code that does not work:

I can get the code to work on a single date but not with multiple dates

using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!




Jay

vba using the OR operator
 
The Rows property does not take multiple arguments. If you want to search
all cells in each entire row, try the following:

If Not Range(Rows(1), Rows(iRow)).Find(DateValue("11/13/2005")) Is Nothing
Or _
Not Range(Rows(1), Rows(iRow)).Find(DateValue("11/23/2005")) Is Nothing Then

....Your code Here....

End If

Note also that the example above assumes you are searching for actual dates.
Your original example shows a search for a strings "11/13/2005" and
"11/23/2005." If you really want to search for the string, delete the
DateValue characters from the example.
--
Jay


"Mona" wrote:

Here is my code that does not work:

If Rows(iRow, 1) = ("11/13/2005" Or "11/23/2005") Then
blah blah

I can get the code to work on a single date but not with multiple dates
using "or". I have about 20 dates that I want to check and I could get by
with just repeating the code 20 times but I wanted to do it using a single
statement.

Thank you!!



All times are GMT +1. The time now is 11:32 AM.

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