sglGuncelle = " update tablo1 set tatilgunleri=#" & CStr(Format(Me.Metin1, "mm\/dd\/yyyy")) & _
"# where AKTIF='AKTIF'"
CurrentDb.Execute sglGuncelle
temel mantık aynı, Sql kodlarını araştırırsanız görürsünüz