AccessTr.neT
form'un boş bir excel'e aktarılması - 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ığı: form'un boş bir excel'e aktarılması (/konu-form-un-bos-bir-excel-e-aktarilmasi.html)

Sayfalar: 1 2


form'un boş bir excel'e aktarılması - severim - 15/03/2010

merhaba arkadaşlar ;

bir form içerisinde çektiğim verilerin Excel'in otomatik olarak açılarak Excel tablosu içine dahil edilmesi gerekiyor.

Verilerin aktarılacağı Excel dosyası belirli bir dosya olmayıp Excel'in yeni bir boş sayfa açması gerekiyor.

Örnek database olarak bu siteden indirdiğim bir veritabanını ekliyorum.. Ekteki veritabanı içerisinde yer alan "oran" adlı formun excele aktarılması gerekiyor.

Yardımlar için şimdiden teşekkür ; herkese kolay gelsiin.


Cvp: form'un boş bir excel'e aktarılması - hegu - 15/03/2010

sayın severim,
formda arama yaparak istediğiniz gibi örnek bulabilirsiniz. Bildiğim kadarı ile "seçerek filitreleyerek sıralayarak Excel e verme" konu başlıklı bir örnek var süper bir örnek. Excel istediğini atabiliyorsun. konu başlığı: tdsharun hocamın bir örneği var: aramayı Excel diye ara olur.
Kolay gelsin


Cvp: form'un boş bir excel'e aktarılması - severim - 16/03/2010

merhaba

söylediğiniz dosya gerçekten çok etkileyici ama benim istediğim son derece basic bir şey..

form verileri içerisinde yer alan tüm verileri bş bir excele atacak son derece basit bir makroya ihtiyaç duyuyorum. basit bir örnek kod görürsem kendime göre uyarlayabilirim diye düşünüyorum..

teşekkürler.


Cvp: form'un boş bir excel'e aktarılması - Nurullah_Serdar - 16/03/2010

Dim Ex As Excel.Application
Set Ex = New Excel.Application
With Ex
.Visible = True 'Görünmesini istemiyorsak False
.Workbooks.Add 'Yeni bir çalışma sayfası oluşturmak için kullanırız.
.Range("c4").Value = me.alan1
.Range("c5").Value = me.alan2
.Range("c6").Value = me.alan3
.Range("I4").Value = me.alan4
.Range("I5").Value = me.alan5
End With

bu kod size fikir verecektir
yalnız vb referanslarından Microsoft Excel 11.0 Object Library nin seçili olması gerekmektedir. bu office sürümüne göre 10.0 olabilir.


Cvp: form'un boş bir excel'e aktarılması - Seruz - 16/03/2010

Excel'de Veri menüsünde yer alan Dış Veri Al ile Access tablosu veya sorgusundan veri almayı da deneyebilirsiniz.


Cvp: form'un boş bir excel'e aktarılması - severim - 16/03/2010

Sayın Nurullah_Serdar ;

Verdiğiniz kodu çalıştırmak istediğimde hata alıyorum. Söz konusu library'yi nasılekleyebilirim ?..