How to set range to text that includes quotation marks?

[lizsunnysideup]

Hello!

I'm currently having an issue with my code and below is the part I'm having trouble with:

Dim AA As Long

For AA = 1 To Cells(Rows.Count, "AF").End(xlUp).Row

If Range("AK" & AA).Value = "”USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR" And Range("AK" & AA).Value = "NON 0 VALUE REQUIRED FORVACCINE ADMIN" And Range("A" & AA).Value = "" Then

Range("A" & AA).Value = "COVID BILLING ERROR"

End If

Next AA

End Sub

I'm trying to flag as COVID billing errors, but the text in column AK is exactly "USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR

VBA won't let me use double quotation marks and I'm stuck as to how to fix this.

 

[Fluff]

Try changing it from And to Or.

 

[lizsunnysideup]

Try changing it from And to Or.

I tried changing from And to Or, but it's still telling me Compile error: syntax error.

 

[Fluff]

Just noticed you also have an extra set of quotes, try

If Range("AK" & AA).Value = "USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR" Or Range("AK" & AA).Value = "NON 0 VALUE REQUIRED FORVACCINE ADMIN" Or Range("A" & AA).Value = "" Then

 

[lizsunnysideup]

It's flagging the NON 0 VALUE text but not the "USE SCC 02.

 

[Fluff]

Does the USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR have the " at the start of phrase in the cell?

 

[lizsunnysideup]

Does the USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR have the " at the start of phrase in the cell?

Yes it does.

 

[Rick Rothstein]

Then you need to double it up inside of quote marks that delineate a text constant. Instead of this...

"”USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR"

use this...

"”"USE SCC 02 FOR INITIAL DOSE, SCC 06 FOR"

 

[lizsunnysideup]

It worked! Thank you so much.