AccessTr.neT
Excele Gönderme. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Excele Gönderme. (/konu-excele-gonderme--83204.html)

Sayfalar: 1 2


Excele Gönderme. - metin02 - 21/08/2017

Günaydın. Ekte göndermiş olduğum dosya ile sorgulama yapıyorum. Çıkan sonucu excele nasıl gönderebilirim.
Teşekkürler.


Cvp: Excele Gönderme. - direnist - 21/08/2017

(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.


Cvp: Excele Gönderme. - metin02 - 21/08/2017

Teşekkürler.
Set xlWSh = xlWBk.Worksheets("Sheet1")

    If Len(strSheetName) > 0 Then

koyu renkli satırda hata veriyor.


Cvp: Excele Gönderme. - direnist - 21/08/2017

(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?


Cvp: Excele Gönderme. - metin02 - 21/08/2017

Teşekkürler. Kayıt yerini sorabilirmiyiz.


Cvp: Excele Gönderme. - direnist - 21/08/2017

Dataları excele atıyor sadece. Yani açılan Excel henüz kaydedilmemiş olan bir dosya. Siz istediğiniz yere kaydedebilirsiniz.