if veritabanım boş ise     ////buraya ne yazmalıyım ki yada kodlarda başka hata varmıdır  teşekkür ederim
DoCmd.SetWarnings False 
DoCmd.OpenQuery "SQLTablo1Ekle"
DoCmd.SetWarnings True
Me.Liste5.Requery
Me.Recordset.MoveFirst
else
Me.Recordset.MoveFirst
rs.FindFirst "[odmtrh] Like '" & Me.Metin51 & "'"
If Not rs.NoMatch Then
Me.Bookmark = rs.Bookmark
MsgBox ("kayıt var")
Else
DoCmd.SetWarnings False 
DoCmd.OpenQuery "SQLTablo1Ekle"
DoCmd.SetWarnings True
Me.Liste5.Requery

kodunu dener misiniz?
yalnız gönderdiğiniz dosyada hem sorgu yanlış

(13/01/2019, 20:52)zaferlacin yazdı: DoCmd.OpenQuery "SQLTablo1Ekle"

doğrusu
olacaktı 
hem de liste ismi yanlış

(13/01/2019, 20:52)zaferlacin yazdı: Me.Liste5.Requery

doğrusu
olacak

ve emin değilim ama recordseti bu hali ile kullanamazsınız 
önceden tanımlamış olmanız gerek
mesela 
dim rs as dao.recordset
dim txtSQL as string
txtsql="" //// buraya sorgunuzun içeriği yazılacak
set rs=currentdb.openrecordset("txtSQL")
vs vs....

ayrıca kodlarınızın sonuna 1453 yazar iseniz tabloda veya sorgunuzda satır yok ise işlemi sonlandırır. hata almazsınız.

dim rs as new adodb.recordset  'rs adında bağlantı oluşturacağımızı belirtiyoruz

rs.open "Tabloadi", currentproject.connection, adopenkeyset, adlockoptimistic ' bağlantıyı kuruyoruz

if rs.eof=true then goto 1453  'tablo içine bakıyoruz. tablo içi boş ise 1453 numara ile bizi isteiğimiz yere göürüyor.

'Tablo içi boş değil ise alttaki kodları çalıştırıyor.

DoCmd.SetWarnings False 

DoCmd.OpenQuery "SQLTablo1Ekle"

DoCmd.SetWarnings True

Me.Liste5.Requery

Me.Recordset.MoveFirst

else

Me.Recordset.MoveFirst

rs.FindFirst "[odmtrh] Like '" & Me.Metin51 & "'"

If Not rs.NoMatch Then

Me.Bookmark = rs.Bookmark

MsgBox ("kayıt var")

Else

DoCmd.SetWarnings False 

DoCmd.OpenQuery "SQLTablo1Ekle"

DoCmd.SetWarnings True

Me.Liste5.Requery

1453

@ozguryasin  hocam 
dao.recordset ile sizin belirttiğiniz adodb.recordset  arasındaki  fark nedir
hangisini ne zaman tercih etmeliyiz?

özgüryasin hocam else without if  hatası geliyor
ilk else