Help converting IF NOT OR AND to VBA IF statement

[Joyner]

Hello everyone, I am trying to convert the below working IF to VBA:

=NOT(OR(AND(LEFT($C6,1)="T",LEN($C6)=9,ISNUMBER(-RIGHT($C6,8))),AND(ISNUMBER(-$C6),LEN($C6)=9)))

What I have tried is:

  [FONT=Calibri][SIZE=3][COLOR=#000000]If Not ((Left(Cells(i + 1, 3), 1).Value = "T" AndLen(Cells(i + 1, 3)) = 9 And IsNumeric(-Right(Cells(i + 1, 3), 8))) Or(IsNumeric(-Cells(i + 1, 3)) And Len(Cells(i + 1, 3)) = 9)) Then [/COLOR][/SIZE][/FONT][FONT=Times New Roman][SIZE=3][COLOR=#000000][/Co[/COLOR][/SIZE][/FONT]de]

This is giving me a run time error 424 object required.

What am I missing?

Thank you

 

[Joyner]

If I am reading your original formula (Message #1 ) correctly, I believe this line of code will also work...

Thank you sir for all of the information. I tried to research how to use "Like" but couldn't figure in out. Because of the way the last nine characters are parsed, the value can be something like _12345678 and all that is acceptable is something like T12345678 or 123456789.

So I adapted yours to

 If Not (Cells(i + 1, 3) Like "[T]########" Or Cells(i + 1, 3) Like "#########") Then

And that. seems to work.

I couldn't figure out the conditional format thing either so again thanks for all of the information.


P,S. I also abandoned the conditional formatting thing because I thought the code route would be more efficient