Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
30/01/2009 19:51
Konu Sahibi
kdurmaz
Yorumlar
9
Okunma
3956
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

kdurmaz

Üye
Üye
 42
 28
 7
 06/01/2009
0
 İstanbul
 
 Ofis 2007
 24/02/2017,16:41
Çözüldü 
Selam sevgili forum üyeleri,

Bir acces tablosundaki verilerimi seçerek Excele göndermek istiyorum. Bu konuyla ilgili forumda yalnızca bir örnek görebildim. Fakat o dosyada ispanyolca çıktı. Dolayısıyla arkasındaki vb kodlarını çözemedim. Dolayısıyla da kendi veritabanıma uygulayamadım. Sorunumu daha da açabilirim, belki faydası olur.
Benim birçok sütundan oluşan bir veritabanım var. Fakat ben excele veri gönderirken bunların o anda işime yarayacak olan sütunlarını göndermek istiyorum. Bunu da bir ara form vasıtasıyla yapmak istiyorum. Yani önce bir seçim formu açılacak ben oradan istediğim verileri işaretleyeceğim ve yalnızca seçmiş olduğum sütunları içeren bir Excel dosyası yaratacak. Bu konuda yardımcı olursanız memnun olurum.

Bu konuda forumunuzdaki bulduğum örnek de şudur. Belki bu örnek ne demek istediğimi daha kolay anlatır. Ama dediğim gibi ben bunu çözemedim.

https://www.accesstr.net/accessten-excel...t-866.html

Saygılar,
Kadir



Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
 38
 6.120
 162
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 30/08/2018,18:18
Çözüldü 
Sayın Seruz abimizin bu konudaki örneğini inceleyin lütfen.

https://www.accesstr.net/carpraz-sorguda...ml#pid6577


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

kdurmaz

Üye
Üye
 42
 28
 7
 06/01/2009
0
 İstanbul
 
 Ofis 2007
 24/02/2017,16:41
Çözüldü 
Sevgili Alpeki99,

Vermiş olduğun linki inceledim. Sn. Seruz'un örneğini verdiği konu kendi kategorisinde çok güzel bir örnek fakat benim istediğim bu değil. Ben sorumu müsaadenle biraz daha açayım.

Benim Tablom şu şekilde Alan Adları içeriyor olsun:
[no] [tcno] [adı] [soyadı] [dogumtar] [dogumyeri] [adres]

daha fazla alan adı var ama uzatmamak çin kısa tutuyorum.(zaten amacım da bu uzun listeyi her seferinde excele göndermemek)
Ben şöyle bir ara form yaratayım

resim

resim burada

ve orada sadece istediğim alan adlarını seçeyim ve onları excele göndersin. Aslında eminim çok basittir ama bendeniz acemi olduğumdan yapamadım. Yardımlarınızı bekliyorum.

Saygılarımla,
Kadir



Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
 38
 6.120
 162
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 30/08/2018,18:18
Çözüldü 
O zaman istediğiniz şey bu adreste :

https://www.accesstr.net/secime-gore-yaz...ml#pid1042

Sevgili bilgisayarcı hocamızın eklediği kullanışlı bir Excel örneği. Tüm sütunları listeler ve istediklerinizi excele gönderir.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

kdurmaz

Üye
Üye
 42
 28
 7
 06/01/2009
0
 İstanbul
 
 Ofis 2007
 24/02/2017,16:41
Çözüldü 
Sevgili alpeki99,

İlgin için teşekkür ederim, aradığım tam olarak buydu, sağolasın.

Lakin bu uygulamayı aldım kendi veritabanıma uyarladım, fakat kodlarda hatayla karşılaştım. Önce kodu yazayım;
Alıntı: Private Sub ListeyiYukle(KaynakAdi As String)
Dim s As String
Dim i As Integer
Dim SutunSay As Integer
Dim lstItem As ListItem
If Len(KaynakAdi & "xx") <= 2 Then Exit Sub
TabloAdi = KaynakAdi
s = "Select * from " & KaynakAdi
If Not AdoAc1(s) Then
MsgBox "Tablo/Sorgu açılamadı", vbInformation
Exit Sub
End If

With ListView1
.ListItems.Clear
.ColumnHeaders.Clear
.View = lvwReport
.GridLines = True
.FullRowSelect = True
.Checkboxes = True
.ColumnHeaders.Add , , "Alan", .Width - 200
End With
SutunSayisi = Rs1.Fields.Count - 1
For i = 0 To SutunSayisi
Set lstItem = ListView1.ListItems.Add()
lstItem.Text = Nz(Rs1.Fields(i).Name, "-")
Next
AdoKapa 1
End Sub
Ben açılan kutudan ilgili tablo adını seçtiğimde "Dim lstItem As ListItem" satırında compile error: user-defined type not defined hatası veriyor.
Bu konuda sanırım bu kodların sahibi Bilgisayarcı bana yardımcı olacak.

Saygılarımla,
Kadir



Kullanici Avatari

ozanakkaya

sledgeab
Kurucu
OZ.... AK....
 41
 11.270
 464
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
Çözüldü 
kodda hata yok, aldığınız hatanın olası sebebi

Referanslarında eksik var

Microsoft Windows Common Controls 6.0 (SP6)
system32 içerisindeki MSCOMCTL.OCX


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Rapor Önizlemeyi Worde Gönderme bibib 12 429 28/07/2018, 02:46
Son Yorum: bibib
Çözüldü İdari Büro Excel Acess Aktarma Göksel Ataman 4 199 15/07/2018, 00:14
Son Yorum: myAccess
Çözüldü Excel'den Access'e Veri Aktarırken Tekrar Eden Kayıtları Aktarmasını Engelleme metbal 6 376 22/06/2018, 15:48
Son Yorum: ozanakkaya
Çözüldü Access Excel Tablo Bağlama Sorunu blake33 2 275 19/05/2018, 14:03
Son Yorum: A.Kadir.
Çözüldü Veri Tabanındaki Kayıtlı Bilgiyi 2. Veri Tabanında Bulunan Aynı Değişkenlere Kayıt cevahir1 10 402 24/04/2018, 12:03
Son Yorum: cevahir1

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.