Enlver les Y et Au dans une colonne

Bonjour,

Dans ma macro le voulais supprimer les Y dans la colonne AG et cela fonctionnait tres bien. Mais maintenent je dois enlever aussiles AU dans la meme colonne. J'ai essayé de mettre, apres le "Y","AU" mais ca ne fonctionne pas. que dois-je écrire pour pouvoir enlever les y et aussi les AU (If Range("A" & n) <> "" And Range("AG" & n) = "Y" Then)

Sub supprime()
Dim DernLigne As Long
DernLigne = ActiveSheet.Range("A" & Rows.Count).End(xlUp).Row
For n = DernLigne To 1 Step -1
If Range("A" & n) <> "" And Range("AG" & n) = "Y" Then
Rows(n & ":" & n).Select
Selection.Delete Shift:=xlUp
End If
Next n
End Sub

Merci beaucoup de votre aide
Bonne soirée