Kodu aşağıdaki ile değiştirip deneyebilir misin ?
DoCmd.RunSQL "DELETE [Operasyon Kayitlari].Tip, IIf(IsNull([Tip]),'1','2') AS İfade1 FROM [Operasyon Kayitlari] WHERE (((IIf(IsNull([Tip]),'1','2'))='1'));"
Sn ozanakkaya,
Elinize sağlık, tam istediğim gibi çalışıyor.