Quotation mark inside quotations

D

Dan

I need to have it search until it finds the quotation mark?
This is what I have and it work for eveything excep a quotation mark(").

MsgBox Left(Me.Height, (InStr(1, Me.Height, " Quotation Mark")) - 1)
 
D

Douglas J. Steele

Left(Me.Height, (InStr(1, Me.Height, Chr$(34))) - 1)

or

Left(Me.Height, (InStr(1, Me.Height, """")) - 1)

(that's 4 double quotes in a row)
 
Top