Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
09/01/2009 14:44
Konu Sahibi
86126
Yorumlar
19
Okunma
7878
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

86126

Üye
Kullanici Avatari
Üye
20
6
29/10/2008
0
Aydın
Ofis 2010
14/09/2015,23:41
Çözüldü 
arkadaşlar elimde aşağıdaki şekilde kod var
Private Sub Komut79_Click()
On Error GoTo Err_aktar

Dim Klasor As String
Klasor = CurrentProject.Path & "\SONUÇLAR.xlsx"
If MsgBox("Verileri Excele aktarmak istiyor musunuz? ", 36, "SONUÇLAR.xlsx 'ye aktarılacak") = 6 Then

DoCmd.TransferSpreadsheet acExport, 8, "ARSAYGÖREKAZA TÜRLERİ SON", Klasor, True, "ARSAYGÖREKAZA TÜRLERİ SON"
DoCmd.TransferSpreadsheet acExport, 8, "SÜRÜCÜSAYISI", Klasor, True, "SÜRÜCÜSAYISI"
DoCmd.TransferSpreadsheet acExport, 8, "asli kusurlar son", Klasor, True, "asli kusurlar son"
DoCmd.TransferSpreadsheet acExport, 8, "HAVADURUMUSON", Klasor, True, "HAVADURUMUSON"
DoCmd.TransferSpreadsheet acExport, 8, "GÜNDURUMUSON", Klasor, True, "GÜNDURUMUSON"
DoCmd.TransferSpreadsheet acExport, 8, "YOLUNKAPLAMADURUMUSON", Klasor, True, "YOLUNKAPLAMADURUMUSON"
DoCmd.TransferSpreadsheet acExport, 8, "KAZAYAETKİEDENARAÇ AKSAMLARI SON", Klasor, True, "KAZAYAETKİEDENARAÇ AKSAMLARI SON"
DoCmd.TransferSpreadsheet acExport, 8, "ARAÇ CİNSLERİ SON", Klasor, True, "ARAÇ CİNSLERİ SON"
DoCmd.TransferSpreadsheet acExport, 8, "YOLUN YÜZEYİSON", Klasor, True, "YOLUN YÜZEYİSON"

MsgBox "Aktarma işlemi tamamlandı. Sonuçlar Excel sayfasını açıp sonuçları görebilirsiniz .Saygılar", 0, "VERİ AKTARIMI"

Exit_aktar:
Exit Sub

Err_aktar:
MsgBox Error$
Resume Exit_aktar

End If
End Sub

koda göre excele verileri aktara biliyorum. ancak benim isteğim tek sayfaya verileri göndermek. Excel de sayfa 1 de a1 den başlayarak boş bulduğu satır ve sütuna verileri aktarmak yardımlarınızı bekliyorum.
veya sayfa 1 de belirtiğim aralıklara ilgili sorguları aktarabilirmiyiz.


4158526, proud to be a member of AccessTr.neT since Oct 2008.
Cevapla

86126

Üye
Kullanici Avatari
Üye
20
6
29/10/2008
0
Aydın
Ofis 2010
14/09/2015,23:41
Çözüldü 
yokmu anlayan arkadaşlar


4158526, proud to be a member of AccessTr.neT since Oct 2008.
Cevapla

Seruz

Uzman
Kullanici Avatari
Uzman
S.... U....
1.550
7
30/10/2008
814
Tekirdağ
Ofis XP
13/09/2017,17:08
Çözüldü 
Access isteğinizi otomatik olarak yapmaz,
ancak access'te kod yazarak yapabilirsiniz.

Ekte buna benzer bir Bilanço örneği var inceleyebilirsiniz.

Veya Excel'deki Dış veri al ile bir sayfada Access teki verileri istediğiniz yerden başlatarak alabilirsiniz.


Ek Dosyalar
.rar   Bilanco_Excel.rar (Dosya Boyutu: 36,49 KB / İndirme Sayısı: 250)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

kadirdursun

Gümüş Üye
Kullanici Avatari
Gümüş Üye
K.... D....
1.282
12/01/2009
86
İstanbul
Ofis 2010 32 Bit
Dün,12:03
Çözüldü 
Arkadaşlar yukarıdaki kodları örneğime yapıştırdım. İstediğim gibi tüm sorguları tek kodla dışarı aktardı fakat xlsx uzantılı aktardı buda benim istediğim format. Ama ortada gariplik var xlsx dosyasını açmadı. Uzantıyı xls olarak değiştirince açıyor. Acaba xlsx uzantılı olarak açması için ne gibi bir değişiklik yapmalıyım?

[uyari] mesaj düzenlenmiştir. lütfen tümü büyük harflerle mesaj yazmayınız[/uyari]


Cevapla

yazaki

Aktif Üye
Kullanici Avatari
Aktif Üye
60
8
24/11/2008
0
İstanbul
Ofis 2007
21/07/2010,23:56
Çözüldü 
Merhaba ,
Kod tarafında yapman gerekeni bilemiyorum.Ama Giderek yaygınlaşan Office 2007 programı dosyaları default olarak xlsx,docx v.b. şeklinde kaydeder Eğer gelen dosyaları açmak istiyorsan Bunu aşağıda verdiğim linkteki convert çalıştırıp çok rahat bir şekilde açabilirsin.Her seferinde uzantıyı xls'e çevirmen gerekmez.
http://www.microsoft.com/downloads/detai...bb74cd1466

Ayrıca Office 2007 de sağ üsteki windows logo 'una tıklayıp.Excel seçeneklerine gelirsen buradaki save yada kaydet kısmında Excel dosyalarını nasıl kaydedeceğini sorar default'u xlsx dir bunu Excel 97-2003 seçersen bunan sonraki kaydettiğin her dosyayı offiice 2003 ve alt sürümlerin açabileceği bir şekilde kaydedebilirsin.
İsterseniz bunu bir deneyin.


Adres Tektir.
Doğru Yer Accesstr.net 'dir.
Cevapla

kadirdursun

Gümüş Üye
Kullanici Avatari
Gümüş Üye
K.... D....
1.282
12/01/2009
86
İstanbul
Ofis 2010 32 Bit
Dün,12:03
Çözüldü 
Satır ve sutun sayısı fazla olduğundan benim işimi gören office 2007. Ben 2007 de açmak istiyorum. Bunun için ne yapmalıyım.


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Formu Excele Bağladıktan Sonra Form Üzerinde Değişklik Yapamıyorum ankaram 4 259 09/06/2017, 09:21 ankaram
Çözüldü Formda Aktif Aramada Çıkanları Excele Gönderemedim ankaram 5 323 04/06/2017, 17:43 ankaram
Çözüldü excele aktarma, sutun başları ve hücre ayarları hknct 3 320 11/02/2017, 21:17 hknct
Çözüldü Verileri Excele Aktarma Hatası hknct 7 461 09/02/2017, 12:33 atoz112
Çözüldü Excele gönderme ates2014 18 930 04/02/2017, 23:59 ates2014

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.