AccessTr.neT

Tam Versiyon: Excele Gönderme.
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Günaydın. Ekte göndermiş olduğum dosya ile sorgulama yapıyorum. Çıkan sonucu excele nasıl gönderebilirim.
Teşekkürler.
(21/08/2017, 06:33)metin02 Adlı Kullanıcıdan Alıntı: [ -> ]Günaydın. Ekte göndermiş olduğum dosya ile sorgulama yapıyorum. Çıkan sonucu excele nasıl gönderebilirim.
Teşekkürler.

Günaydın metin02;
İnternetten bulduğum kodları sizin uygulamanıza ekledim.
Bendeki testlerde formdaki sorgulamadan gelen sonucu excele başarılı olarak aktarıyor.
Ekli örneği incelemenizi rica ederim.
İyi çalışmalar.
Teşekkürler.
Set xlWSh = xlWBk.Worksheets("Sheet1")

    If Len(strSheetName) > 0 Then

koyu renkli satırda hata veriyor.
(21/08/2017, 18:53)metin02 Adlı Kullanıcıdan Alıntı: [ -> ]Teşekkürler.
Set xlWSh = xlWBk.Worksheets("Sheet1")

    If Len(strSheetName) > 0 Then

koyu renkli satırda hata veriyor.

Merhaba;
Bu örneği dener misiniz?
Teşekkürler. Kayıt yerini sorabilirmiyiz.
Dataları excele atıyor sadece. Yani açılan Excel henüz kaydedilmemiş olan bir dosya. Siz istediğiniz yere kaydedebilirsiniz.
Sayfalar: 1 2