Excele veri aktarma

[Merhum İdris SERDAR]

Dosyanız ekte. umarım olmuştur.
Forma excel butonun click olayına aşağıdaki kodları koyun.

Private Sub Command26_Click()

Dim MyObject As Object
Set MyObject = GetObject(CurrentProject.Path & "\sevk.xls")

MyObject.Sheets("Sayfa1").Range("d28").Value = Me.adsoyad
MyObject.Sheets("Sayfa1").Range("d29").Value = Me.rutbe
MyObject.Sheets("Sayfa1").Range("d30").Value = Me.gorev
MyObject.Sheets("Sayfa1").Range("d31").Value = Me.dgmyeri
MyObject.Sheets("Sayfa1").Range("d32").Value = Me.dgmtar
MyObject.Sheets("Sayfa1").Range("d33").Value = Me.babaadi
MyObject.Sheets("Sayfa1").Range("d34").Value = Me.siclno
MyObject.Sheets("Sayfa1").Range("d35").Value = Me.emsicno
MyObject.Sheets("Sayfa1").Range("d36").Value = Me.tckimno
MyObject.Sheets("Sayfa1").Range("d37").Value = Me.verno


End Sub

Benden bu kadar.

Kolay gelsin.

 

[karaayhan]

kardeş ellerine sağlık ama sende görmüşündür olmamış kusura bakma
ellerine sağlık emeğine sağlık..
yine tablo,sorgu daki veriler excell sheet' teki hücrelere yerleşmiyor...


:?

 

[modalı]

Sayın karaayhan,

Ama bu sefer oldu. Personel formundan değilde sevk formundan sevk hazırla düğümesiyle iş hal oldu. En azından beş kere denedim ve oldu. Yalnız excel uygulaması access uygulamasıyla aynı yerde olması gerekiyor. Bir daha deneyin.

Bu arada yurttaşa da çok teşekkürler. İçine girip de çözemediğim problem olunca hırslanıyorum. :mutlu: :dua2:

 

[karaayhan]

kardeşim demişki:

Ama bu sefer oldu. Personel formundan değilde sevk formundan sevk hazırla düğümesiyle iş hal oldu. En azından beş kere denedim ve oldu. Yalnız excel uygulaması access uygulamasıyla aynı yerde olması gerekiyor. Bir daha deneyin.

herhalde yurtaşın örneğinden bahsetmişsin kardeş sevk hazırla düğmesiyle zaten mevcut tabloyu kullanarak işlem yapıyor ben oraya sicil bilgileri diye tablo ekledim bu tablodan veri almasını istiyorum bu bir ikincisi ise excel'le access aynı yerde olunca çalışmaz çünkü modülde yol C:\sevk.xls olarak belirtilmiştir. C'nin altındaki sevk.xls dosyasını sil tekrar dene bak olmayacaktır. Üçüncüsü ise hala başladığım yerdeyim inanın sizleri çok yoruyorum. emeğinizi ve hakkınızı helal edin.....

son kez tekrarlıyorum. boş bir veritabanı hazırlıyorum. bundan veri alın ve excel'e atın ilgili hücrelere .............dosya ekte......selam saygı...

 

[modalı]

Sevgili karaayhan,

En sonunda mutlu son :mutlu: :mutlu: :yazici: k::

Sanırım bu sefer istediğiniz oldu. :lol:

 

[icetiner]

Güzel bir örnek,teşekkürler.

 

[karaayhan]

Mükemmel bir çalışma ellerin dert görmesin.

aynı örnekte veriler çok olursa yani tablodaki tüm verileri excell sheet 'teki
ilgili hüclerden başlamak üzere listeletebilirmiyiz.. Yani dökülsün gelsin aşağı
doğru Formdaki kayıtla eşleşmesi tamam birde son olarak bunu yapabilirsen
% 100 tamamlanmış olacak işim ..

Ellerine sağlık tekrar tekrar teşekkürler.. :dua: k::

 

[modalı]

Yine başlangıç noktasına geldik.

Acaba excel sayfasını access tablosu gibi kullanıp başlamanın bir mahsuru var mı?
Hedef tam olarak ne? Boşu boşuna uğraşmayalım. Exceldeki veriler ne olacak, nasıl kullanılacak?

İyi çalışmalar!!!

 

[Merhum İdris SERDAR]

:alkolik: oldum. :mrgreen:

 

[karaayhan]

tüm kayıtların dökümünü istiyorum.

Yok kardeş başlangıcı çoktan geçtik. Tablomda _Kişiler_ altı (6) kayıt var. ve ben bunların tümünü görmek istiyorum excell sheet 'te
sizin yaptığınız (emek verip uğraştığınız ve benim için çok kıymetli) örnekte form üzerinde hangi kayıttaysak sadece onu veriyor. Yani kaydı süzüyor bu tamam mükemmel bir alternatif ....
bu kadar olduktan sonra tüm kayıtlarıda excell'e veremezmiyiz. yani aynı mantıkla ama süzmeden tümünü çünkü böyle olursa sorgular ve istediğimiz kriterlere göre sorguladığımız sorgular. tablolar excell'e atılmış olacak bu da olursa tamam bitti son........

sizi çok yordum hakkınızı helal edin kardeşler..
ancak bu tür kayıtlar forumda da çok önemli bir örnek olarak kalacak ve kim bilir kimlerin işini görecek....

tekrar tekrar sağolun var olun....
:arkadas:
örnek ekte

 

[karaayhan]

sevgili modalı örnek sizin için isim belirtmedim ama
bir aşama kaydettik sonunu getirelim lütfen...


:yardim:

 

[modalı]

İşlem tamam kodlar hazır. Ancak sizin örneğe göre ayarlanması gerekiyor. Bu gece veya yarın sabah hazır olur. Biraz değişik öncekinden ama sonuç muhteşem! :8)

 

[karaayhan]

Harikasın valla ne diyeceğimi bilemiyorum.
çoook çooook sağol kardeş....

Ellerin ve emeğine sağlık...




merakla bekliyorum.. k:: :keyif: :mutlu: :icelim:

 

[karaayhan]

sabırsızlandım ve tekrar yazdım...
kodlar hazırsa alabilirmiyim..belki ben uyarlayabilirim kardeş
saat geceyarısı oldu meraktan dayanamayıp yazdım
kusura bakma, heyecan ve mutlulukla bekliyorum...

Azmin elinden birşey kurtulamazmış... :hihoho: :hihoho: :hihoho:

 

[modalı]

Modüllerin içine mümkün olduğu kadar çok açıklama yazdım ki daha kullanışlı olsun. Yine de takıldığınız bir nokta varsa cevaplandırmaya hazırım.

Tüm verileri eklemekle, formdaki verileri excel taşıma yöntemini ayrı yaptım. Formdaki bilgileri gelişigüzel, değişik sayfa, sütun ve sıraya taşıyabiliyoruz. Tüm tablo verilerini ise tablo olarak belirli bir sayfanın belirli bir hücresinden başlamak üzere taşıyabiliriz.

Kendi uygulamanıza taşırken Referanslara dikkat edin. Yoksa uygulama çalışmıyor. :?

Sevgili karaayhan en sonunda artık bu sorunun cevabı tamamlanmış oldu.

Mutlu son!!!!!! :hey: :8)

 

[karaayhan]

EVET KARDEŞ MUTLU SON.........

Sevgili karaayhan en sonunda artık bu sorunun cevabı tamamlanmış oldu.

Mutlu son!!!!!! :hey: :8)

Soru için emeği geçen bütün forum üyelerine başta MODALI kardeşime
sonsuz teşekkür ederim...

Bu sorunda hallolduya artık cevapsız soru kalmaz bu forumda zannediyorum....

Heleki Modalı gibi gece gündüz çalışan araştıran bir üyemiz varken....


:dua: :arkadas:

:hey:
:hey:
:hey:
:hey:

 

[karaayhan]

sevgili modalı özel msg. attım ama dönmediniz. belkide ulaşmadı.
ben hala istediğimiz bir excell uygulamasının içine tüm verileri atamadım
kodları birleştirdim olmadı bir yer eksik kalıyor galiba
haberiniz olsun .... :düsün:

 

[modalı]

Sayı karaayhan dün akşam e-maille yolladım. Ama alamadınız herhalde? Öyleyse akşama evden tekrar buraya eklerim.

 

[karaayhan]

gelmiş kardeş aldım ve baktım
ENFES olmuş ellerine sağlık...
yok böyle birşey bir aralar umudumu kesmiştim forumdan
bu konuyu wordde çözmeye çalıştım yani access'te raporlayıp RTF dosyası olarak
yayınlayıp çıktı olmak istedim olmadı... rtf dosyaları (access içinde wordde yayınla diyor) ama rtf olarak yayınlıyor bu da çizgileri desteklemiyormuş... o yüzden excell'de olsun istedim olduda sayende...
konu başlığı uygun değil ama accesste çizilmiş bir rapor wordde yayınlanınca çizgilerininde çıkmasını sağlayacak bir bilginiz var mı?(BU EXRTA bir soru)
gerçekten mükemmel bir örnek oldu....
Tekrar sağol kardeş ve forumdan kopma lütfen ... :arkadas:

 

[ahmetyurtkan]

arkadaşım çok güzel örnek yalnız benim sormak istediğim bir sürü bilgiyi alt alta nasıl aktarabilir burdaki sadece o anki açık formdaki bilgiyi aktarıyor..tüm bilgileri aktarmak için ne yapmak lazım teşekkürler..