(24-09-2019, 18:01)halily demiş ki: dilerim işinize yarar)

Visual Basic

Dim GeciciSql As String
 
    GeciciSql = CurrentDb.QueryDefs("[Mevcut Yaşlı Engelli]").sql
    DoCmd.OutputTo acQuery, "Mevcut Yaşlı Engelli", "MicrosoftExcel(*.xls)", "", True, "", 0
    CurrentDb.QueryDefs("[Mevcut Yaşlı Engelli]").sql = GeciciSql

önce sorgunun kodunu alıyor
sonra sorguya geri veriyor

aynı mantığı silinen diğer sorgularda da kullanmanız gerek

Üstadlarım sizlere çok teşekkür ediyorum.

Halil Hocam bu kod ile SQL olarak işlem yapıyor artık silinmiyor.

Onur Can Hocam sizin dediğinizgibi de çalışıyor sıkıntı yok.



  Ekran Alıntısı2.PNG (Boyut: 9,15 KB / İndirilme: 61)

(24-09-2019, 22:13)Ahmet51 demiş ki:

(24-09-2019, 18:01)halily demiş ki: dilerim işinize yarar)

Visual Basic

Dim GeciciSql As String
 
    GeciciSql = CurrentDb.QueryDefs("[Mevcut Yaşlı Engelli]").sql
    DoCmd.OutputTo acQuery, "Mevcut Yaşlı Engelli", "MicrosoftExcel(*.xls)", "", True, "", 0
    CurrentDb.QueryDefs("[Mevcut Yaşlı Engelli]").sql = GeciciSql

önce sorgunun kodunu alıyor
sonra sorguya geri veriyor

aynı mantığı silinen diğer sorgularda da kullanmanız gerek

Üstadlarım sizlere çok teşekkür ediyorum.

Halil Hocam bu kod ile SQL olarak işlem yapıyor artık silinmiyor.

Onur Can Hocam sizin dediğinizgibi de çalışıyor sıkıntı yok.



  Ekran Alıntısı1.PNG (Boyut: 8 KB / İndirilme: 57)