silme sorgusu

[arifbirgen]

değerli hocalarım
Silme sorgusu nasıl yapılmakta,birleştirme sorgusu gibi formül mü girilmekte
bu konularda acemiyim.Yardımcı olursanız memnun olurum

 

[ayhan2122]

Sn arifbirgen;
1.Tasarım görünümünde yeni bir sorgu açın.
2.Hangi tablodan kayıt silecekseniz o tabloyu ekleyin.
3.Ölçüt olarak kullanacağınız alan/alanları sorgu alanlarına ekleyin. (örn: SıraNO'ya göre bir kayıt seçip o kaydı silmek istiyorsanız "SıraNO" alanını ekleyin.
4.Tablodaki silinecek kaydı hangi ölçüte göre belirlemek istiyorsanız o ölçütü "ölçüt" satırına yazın. (örn: [Kaçıncı kaydı silmek istiyorsunuz?] veya [Formlar]![Form1]![Metin0])

Bu şekil silme sorgusunun en basit şeklidir.
Saygılar, İyi Çalışmalar.

 

[arifbirgen]

Değerli hocalarım
Özellikle cevap veren Ayhan 2122 hocama teşekkür edrim.Silme sorgusunda
amacım verilerin tıklandığında hepsini silmek.Bunu yapamadım yardımcı olursanız sevinirim.

 

[ayhan2122]

Sn arifbirgen;
Yapmak istediğiniz sorguyu daha açık bir ifade ile, bir de örnek ekleyip gönderirseniz çok iyi olur. "Silme sorgusunda
amacım verilerin tıklandığında hepsini silmek" ne demek anlamadım. Daha doğrusu buna, değişik on tane cevap yazılabilir ve acaba hangi cevap size uyar. Lütfen örnek ekleyin.
Saygılar, İyi Çalışmalar.

 

[arifbirgen]

silme sorgu

Değerli hocam Ayhan2122
Öğrenci kurs ücret taksit form ve altformdan verileri girmekteyim.Bu forma bir düğme ekleyip verilerin tümünü tek tıklamayla
hepsini silmek istiyorum.Örneği winrar olarak göndermek istedim gönderemedim(1,41 MB).İyi çalışmalar.

 

[noxious]

Veriler hangi hücreden başlayıp hangi hücrede son buluyor bunu belirtirsenin silme işlemi için gerekli macro o hücrelere göre yazılabilir

 

[beab05]

Merhabalar;

CurrentDb.Execute ("DELETE * FROM [tablo adı] ")

Bu kodu herhangi bir düğmenin click olayına yazarsanız, tıklayınca hangi tabloyu belirttiyseniz tüm veriler silinir..

 

[noxious]

Size iki ayrı macro

Sub sil() 'B3 ile L37 hücrelerinin tümünü seçer siler ve B3 hücresine döner
Range("B3:L37").Select
Selection.ClearContents
Range("B3").Select
End Sub

Sub sil1() 'B3:B32, D3: D32, F3:F32,H3:H32, J3J32 ve L3:L32 hücrelerini seçer ve içeriğini temizler
Range("B3:B32,D3: D32,F3:F32,H3:H32,J3:J32,L3:L32").Select
Range("L3").Activate
Selection.ClearContents
Range("B3").Select
End Sub

kendinize göre uyarlıyabilirsiniz


Başlığa dikkat etmemişim özür dilerim kusura bakmayın

 

[beab05]

Sayın noxious;

Soru Access sorusu, Excel değil

 

[modalı]

Güzel ama burası Access bölümü Excel değil.

Biraz dikkat lütfen.

 

[gitarisyen]

Merhabalar;

CurrentDb.Execute ("DELETE * FROM [tablo adı] ")

Bu kodu herhangi bir düğmenin click olayına yazarsanız, tıklayınca hangi tabloyu belirttiyseniz tüm veriler silinir..

Sayın beab05;

Kod için çok teşekkürler. Düğmeye bu kodu yazdığım zaman bütün verileri siliyor ve #Silindi uyarısını bütün alanlarda veriyor. Buralara tekrar veri girilemiyor. Ancak programı kapatıp açınca üstelik otomatik sayıyı da tekrar 1'den başlatarak taptaze ve bomboş bir veritabanımız oluyor...

Tekrar teşekkürler...

 

[beab05]

Sayın beab05;

Kod için çok teşekkürler. Düğmeye bu kodu yazdığım zaman bütün verileri siliyor ve #Silindi uyarısını bütün alanlarda veriyor. Buralara tekrar veri girilemiyor. Ancak programı kapatıp açınca üstelik otomatik sayıyı da tekrar 1'den başlatarak taptaze ve bomboş bir veritabanımız oluyor...

Tekrar teşekkürler...

Güzel koddur gerçekten ama otosayıyı başa döndürmüyor sanırım. Silindi uyarısını form ya da altformdan kaldırmak için de kodun hemen altına "requery" iyi gider

 

[ayhan2122]

Ben de bir deneme yapıp olay yordamına şunu yazdım. (Formu kapatıp tekrar açmayı da ekleyerek).
CurrentDb.Execute ("DELETE * FROM [Tablo1] ")
DoCmd.Close
DoCmd.OpenForm "Form1"
Ancak OtomatikSayı alanı 1'den başlamadı. Acaba bende mi bir hata var yoksa Sn gitarisyen mi yanlış anlattı !

(Bu arada Sn beab05 de benden önce aynı şeyi yazmı&#351

Saygılar, İyi Çalışamalar.

 

[gitarisyen]

Sayın beab05 ve Sayın ayhan2122;

Çok çok özür diliyorum. Çok hızlı hareket etme, heyecanlanma ve fikirlerimi hemen yazabilmeye çalışmanın kurbanıyım. Otomatik sayı 1'den başlamıyormuş... Tekrar tekrar özürlerimi sunuyorum...

 

[beab05]

Formu tekrar açıp kapatmaya gerek yok yukarıda da dediğim gibi requery dir en iyi yolu..

 

[gitarisyen]

Ben de bir deneme yapıp olay yordamına şunu yazdım. (Formu kapatıp tekrar açmayı da ekleyerek).
CurrentDb.Execute ("DELETE * FROM [Tablo1] ")
DoCmd.Close
DoCmd.OpenForm "Form1"
Ancak OtomatikSayı alanı 1'den başlamadı. Acaba bende mi bir hata var yoksa Sn gitarisyen mi yanlış anlattı !

(Bu arada Sn beab05 de benden önce aynı şeyi yazmış)

Saygılar, İyi Çalışamalar.

Sayın ayhan2122;

Denedim ve çok güzel çalışıyor... Çok teşekkür ederim...

 

[ayhan2122]

Kızmayın hocam, yaptık bi hata.

CurrentDb.Execute ("DELETE * FROM [Tablo1] ")
Forms!Form1.Requery

Saygılar , İyi Çalışmalar.

 

[beab05]

Kızmayın hocam, yaptık bi hata.

CurrentDb.Execute ("DELETE * FROM [Tablo1] ")
Forms!Form1.Requery

Saygılar , İyi Çalışmalar.

Böylesi daha kullanışlı değil mi?

 

[arifbirgen]

Değerli hocalarım
Cevaplarınızdan dolayı hepinize ayrı ayrı teşekkür ederim.İyiki bu site
ve sizler varsınız.Birde tüm verileri silmeden önce MsgBox uyarısı almak
alabilirmiyim.Koda eklemeye çalıştım MsgBox uyarısı vermedi.İyi çalışmalar.

 

[beab05]

Niye burdan devam etmiyorsunuz!!??

http://www.excel.web.tr/showthread.php?t=40011