(19/08/2020, 23:46)berduş yazdı: (19/08/2020, 23:26)kadirtr yazdı: Zaten arkada Excel açık olsa neden verileri indirmek için ayrı bir şey için kod istensin ki.
verileri Access dosyasından almak istediği için excele indirmeyi istemiş ki zaten bu haliyle verileri indiriyor sorun şu bu veriler başka kitaba mı aktarılacak, yoksa bunları yazıcıya göndermek/pdf olarak kaydetmek için mi kullanacak? Eğer başka bir kitap olarak gönderilecekse sayfa yıllara göre oluşturulmuş bir kitaba mı aktarılacak yoksa her her defasında bağımsız bir kitap mı oluşturulacak?
ben çalışma prensibinizi yada amacınızı bilemem o nedenle soru net olmalı iyi açıklanmalı ki en kısa zamanda en doğru cevabı bulabilelim. yoksa verilen cevaptan çok anlamaya çalışmak için sorularla doluyor konu ve bir yerden sonra ipin ucu kaçıyor artık mesajları takip edemez oluyorsunuz.
Şimdi sizden istediği aylık bazda garfikleri göstere bilmek için excele akarmış onları grafiklerle halletmiş. Program olarak çalışacağı için arkada aktardığı verileri göremez bu nedenle ayrıyetten verileri indirmek istiyor. Örnek haziran ayı verisi programı kim kullanacaksa ona bırakmış pdf olaramı işlem yapacaksa
Excel olaramı kim kullanacaksa o istediği şekilde veri alsına getiriyor. Ama tabiki yıllık olarakda indirecek isterse aylık olarakta ayrıca seçtiği tabloyu indirecek. Ayrı ayrı
Excel sayfası olarak onu konuyu açan arkadaş bilir isterseniz aylara göre
Excel inecek kitaba ay adlarını verirsiniz. Ayrı sayfalarda olur yılsa hangi yılınkini indirecekse o yılın adını verirsiniz. Ama sizin değiniz gibi şuan aktarılmış olan veriyi program bittiğinde göremez o neden ile veri indrimesi olmalı yapılırsa kesin kodu alırım saklarım yani hatta bu programın bitmiş halini isterim.
(19/08/2020, 23:35)berduş yazdı: pdf yapma kod:
mesela verileriniz barajtablo Excel sayfasında ise bahsettiğim dosyadaki grafikformuna bir buton ekleyip butona aşağıdaki kodu yazıp deneyin
dosyaAdıAdresi = ThisWorkbook.Path & "\PdfYap.pdf"
Sheets("barajtablo").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=dosyaAdıAdresi, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True
işte arkadaş orada image koymuş sanırım ona uyarlayacak. ben bi deneyim. Ayrıca tabloların başlıklarınıda istemiş. Sizin yazdığınızda
Access den gelen verilerde başlıklar yok.
