Bir komut düğmesine formdaki verileri Excel'e aktarması için bilinen aktarma kodunu yazdım alan sayısı fazla olduğundan kod'da uzun oldu. Komutu çalıştırdığım vakit "Procedure too large" hatası alıyorum. Bu sorunun bir çözümü varmı. Varsa Bir örnekle açıklamasını siz değerli arkadaşlarımdan arz ediyorum. Saygılarımla iyi çalışmalar. (Kodu Word dökümanı olarak ekliyorum)
Procedure too large
benimde böyle bir sorunum vardı (exele atmak ile ilgili)
forumdaki arakadaşlarımdan öğrendiklerimi size aktarayım.
önce excele aktaracağınız verileri içeren bir sorgu hazırlayın ve adını AKTARMA_SORGUSU koyun. sonra mevcut butonunuzun click olayındaki kodu silin ve aşağıdaki kodu yapıştırın.
access belgenizin olduğu klasörün içinde BELGE isimli bir Excel oluşacak ve açınca AKTARILAN VERİ sayfasında istediğiniz verileri göreceksiniz...
forumdaki arakadaşlarımdan öğrendiklerimi size aktarayım.
önce excele aktaracağınız verileri içeren bir sorgu hazırlayın ve adını AKTARMA_SORGUSU koyun. sonra mevcut butonunuzun click olayındaki kodu silin ve aşağıdaki kodu yapıştırın.
Private Sub Komut35_Click()
On Error GoTo Err_aktar
Dim Klasor As String
Klasor = CurrentProject.path & "\BELGE.xlsx"
If MsgBox("Verileri Excele aktarmak istiyor musunuz? Bu işlem veri yoğunluğuna göre bir kaç dakika sürebilir.", 36, "BELGE.xlsx 'ye aktarılacak") = 6 Then
DoCmd.TransferSpreadsheet acExport, 10, "AKTARMA_SORGUSU", Klasor, True, "AKTRILAN VERİ"
MsgBox "Aktarma işlemi tamamlandı.", 10, "VERİ AKTARIMI"
Exit_aktar:
Exit Sub
Err_aktar:
MsgBox Error$
Resume Exit_aktar
End If
End Sub
access belgenizin olduğu klasörün içinde BELGE isimli bir Excel oluşacak ve açınca AKTARILAN VERİ sayfasında istediğiniz verileri göreceksiniz...
Hayat bu
ölsende yaşamaya mecbursun!
UNUTMA!!!
(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
ölsende yaşamaya mecbursun!
UNUTMA!!!
(hafta sonu mesai olmadığından mesajlardaki çözümleri ancak hafta içi uygulayabiliyorum)
sayın orderyazbim,
Olumlu ya da olumsuz geri bildirimde bulunmanızı bekliyoruz.
Olumlu ya da olumsuz geri bildirimde bulunmanızı bekliyoruz.
İlmiyle amel etmeyen hoca bülbül gibi ötse de kargayla bir tut.
Sn orderyazbim siteye girmenize rağmen geri bildirimde bulunmamışsınız. Probleminizi çözebildiniz mi? Devam ediyorsa konuya cevap vererek konunun tekrar gündeme gelmesini, dolayısıyla cevap alma şansınızı arttırabilirsiniz. Bazı konular gözden kaçabiliyor.
Saygılar...
Saygılar...
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.
Access için her zaman lazım olacak konu başlıkları listesi
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.
Access için her zaman lazım olacak konu başlıkları listesi
Konuyu Okuyanlar: 1 Ziyaretçi