Accesste yapılmış c:\teşvikler.mdb adlı veri tabanım var. Kayıtları girdikten sonra raporla adlı form aracılığıyla bazı kriterler girip buna uygun verileri sorgu kanalıyla elde ediyorum. Mesela Forma yazmış olduğum ilçeye ait yine forma yazmış olduğum tarihler arasındaki verileri "teşvikler" adlı sorguyla elde ediyorum. Bu sorgudaki süzülmüş verileri "C:\cetveller.xls" adlı çalışma kitabı kapalıyken açtırıp "veriler" sayfasına; access te "raporla" adlı forma koyacağım bir buton ve buna yazacağım kodlarla aktarmak istiyorum. Yardımcı olan olursa sevinirim.
-
DİKKAT DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
accessten excele
- Konbuyu başlatan aktif42
- Başlangıç tarihi
Haluk
Özel Üye
- Katılım
- 7 Temmuz 2004
- Mesajlar
- 12,406
- Excel Vers. ve Dili
-
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
- Altın Üyelik Bitiş Tarihi
- ∞
haluk bey, vba kodu yazmadan olacağını sanmıyorum. Accessin zaten excel ile çözümle diye menüsü var. Sorgu açıkken bu tuşu kullandığınızda access te varsayılan kayıt yerine sorgunun adıyla (genellikle bu belgelerim oluyor) bir xls dosyası açıyor zaten. Benim gayem "C:\cetveller.xls" adlı çalışma kitabı kapalıyken açtırıp "veriler" sayfasına verileri aktarmak.
Sayın aktif42,
Herkese baştan kodları yazıp yardımcı olmaya çalışıyorum. Siz de uygulamanızı ekleyin kodlarını yazayım.
Eğer kendiniz yapmak istiyorsanız ki o da kolay, dikkat etmeniz gereken bir kaç nokta var.
1. Uygulamaların içinde bir modülü ve bir tabloyu kendi uygulamanıza eklemeniz gerekiyor.
2. Referanslara dikkat etmeniz gerekiyor.
Modülün içinde gerekli açıklamalar var.
iyi çalışmalar
Herkese baştan kodları yazıp yardımcı olmaya çalışıyorum. Siz de uygulamanızı ekleyin kodlarını yazayım.
Eğer kendiniz yapmak istiyorsanız ki o da kolay, dikkat etmeniz gereken bir kaç nokta var.
1. Uygulamaların içinde bir modülü ve bir tabloyu kendi uygulamanıza eklemeniz gerekiyor.
2. Referanslara dikkat etmeniz gerekiyor.
Modülün içinde gerekli açıklamalar var.
iyi çalışmalar
linkte excele aktarma için desktop.zip in içinde kod yazılmış (Function fnTabletoExcel()) ama daha başlangıçta Dim xlApp As New Excel.Application
da can't find project or library hatası veriyor. ilginize teşekkür. en kısa zamanda hem access hem excel dosyalarını ekleyeceğim.
Sayın Modalı ve Haluk Bey Dosyayı ekledim. Yardımcı olmanız dileğiyle........
da can't find project or library hatası veriyor. ilginize teşekkür. en kısa zamanda hem access hem excel dosyalarını ekleyeceğim.
Sayın Modalı ve Haluk Bey Dosyayı ekledim. Yardımcı olmanız dileğiyle........