Hayırlı günler
Benim uygulamada siparişnu alanındaki kelimenin içinde I,M var ise günekle kutusu otomatik olarak 730 yazsın. 
siparişnu alanındaki kelimenin içinde O,Y var ise günekle kutusu otomatik olarak 365 yazsın. 
siparişnu alanındaki kelimenin içinde E,H var ise günekle kutusu otomatik olarak 0 yazsın.
Ben sadece sayenizde 
Me.günekle = IIf([siparişnu] Like "*k*" Or [siparişnu] Like "*y*" Or [siparişnu] Like "*j*", 365, 730) 
yaptım ama bu nu zenginleştiremedim. bu konuda bana yardımcı olabilirmisiniz.