Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   Formu Pdf Olarak Kaydetme

Formu Pdf Olarak Kaydetme
snapper
Aktif Üye 40-100

*
Kayıt Tarihi: 22.05.2016
Toplam 14 konu açtı.
Toplam 58 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013 TR,
Beğeniler: 0 / 1
#7
01-11-2023, 14:30
(01-11-2023, 11:23)dsezgin demiş ki:
(01-11-2023, 11:08)snapper demiş ki: hocam, denedim yine olmadı. kaydedilen rapordaki veriler boş görünüyor.

Ayrıca sizin dediğiniz gibi yaparsam, rapora toplam 5 adet alt form eklemem lazım. Hepsinde aynı işlemi yaparsam, tüm metin adlarını ve sql kodlarında ki adları değiştirmem gerekiyor Nah

Taşımanız gereken nesneler, ilişkisiz veri işlediğiniz kutular.
A2 alanı güncellediğinde formdaki veriler nasıl değişiyorsa tek raporda da değişir.
Önceki mesajıma örneğinizi ekledim.

Hocam, 

Normalde 5 farklı tablo için ayrı ayrı userform oluşturdum. Hepsinin içerisine sql kod ile veri çekiyorum.
Onları da alt form olarak anasayfaya ekledim.
Bir tane yenile butonuna "altformadı.requery" altformların yenilenmesini bu şekilde ekledim.  Yıl,ay vs değiştirdikten sonra yenile dediğimde altformlar da değişiyor.  Ama aynı mantık rapor sayfasında işlemedi nedense.

Bu şekilde de yaparım ama alt formların metin isimleri çakıştığı için hepsinde tek tek düzenleme yapmam gerekiyor.

Teşekkür ederim yine de . Saygılar,



  Bul
  Alıntı
Bu mesajı beğenenler:
snapper
Aktif Üye 40-100

*
Kayıt Tarihi: 22.05.2016
Toplam 14 konu açtı.
Toplam 58 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013 TR,
Beğeniler: 0 / 1
#8
01-11-2023, 15:57
Hocam,

O mantıkla 2 formun kodunu ayrıntıya eklediğimde 2.tablonun verileri çalışmadı malesef.

Aşağıdaki kodda select'i ikinci satıra kaydıramadım. Bu konuda yardımcı olabilirseniz en azından tüm verileri tek sql ile toplayabilirim. İkinci satıra kaydıramayınca sütn sayısı doluyor.

Visual Basic
  1. xSQL = xSQL & " SELECT Month([tarih]) AS Ay, Sum(IIf([durum]=""Geçersiz"",1,0)) AS txtGz, Count(Sheet1.veri) AS txtTp"
  2. xSQL = xSQL & vbNewLine & " FROM Sheet1"
  3. xSQL = xSQL & vbNewLine & IIf(Len(trh() & "") > 0, " WHERE (((Year([tarih])) = trh()", "")
  4. xSQL = xSQL & vbNewLine & " GROUP BY Month([tarih]);"



Aşağıdaki şekilde olmalısını istiyorum.

Visual Basic
  1. xSQL = xSQL & " SELECT Month([tarih]) AS Ay, Sum(IIf([durum]=""Geçersiz"",1,0)) AS txtGz, Count(Sheet1.veri) AS txtTp"
  2. xSQL = xSQL & " 'and SELECT' .................................................."
  3. xSQL = xSQL & vbNewLine & " FROM Sheet1"
  4. xSQL = xSQL & vbNewLine & IIf(Len(trh() & "") > 0, " WHERE (((Year([tarih])) = trh()", "")
  5. xSQL = xSQL & vbNewLine & " GROUP BY Month([tarih]);"





  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.026 yorum yaptı.
Toplam 1.068 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 52 / 233
#9
01-11-2023, 22:59
Visual Basic
  1. xSQL = "SELECT Month([tarih]) AS Ay, Sum(IIf([durum]='Geçersiz',1,0)) AS txtGz, Count(Sheet1.veri) AS txtTp  FROM Sheet1 " & IIf(IsNull(trh()), vbNullString, " WHERE Year([tarih]) = " & trh()) & " GROUP BY Month([tarih])"



vbnewline iif(... koşulu SQL satirini olumsuz etkiliyor. Yukarıdaki gibi düzenlenebilir.

UNION ile farklı tabloları birleştirip soruda tablo adlarını gruplama yaparak, raporda kullanılabilir.



.rar   Örnek_.rar (Boyut: 177,36 KB / İndirilme: 38) Farklı yöntem
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [FORM] Mouse Ile Açık Formu Kapatmak hmuratg 1 176 06-11-2024, 16:08
Son Mesaj: kahramanselim
  [SORGU] çarpraz Sorguda Sütun Değeri Olarak Birden çok Alan Seçebilir Miyiz? abkbek 2 252 13-08-2024, 21:18
Son Mesaj: abkbek
  [RAPOR] Access De Ki Raporu Word Belgesi Olarak Vba Kodu Ile Açma Ahmet51 10 512 01-08-2024, 10:28
Son Mesaj: dsezgin
  [FORM] Onay Kutususun şarta Bağlı Olarak Otomatik Olarak Işaretlenmesi Samih KARSLI 2 316 06-04-2024, 18:49
Son Mesaj: Samih KARSLI
  [TABLO] Formu Tabloda Filtreleme soss 2 347 27-03-2024, 20:04
Son Mesaj: soss
  Virgülle Ayrılmış Verilerin Her Bir Değerini Yeni Kayıt Olarak Ekleme adnnfrm 5 439 28-11-2023, 01:37
Son Mesaj: dsezgin
  12 Saatlik (am-pm) Metin Olarak Girilmiş Saat Verisini 24 Saatlik Olarak Gösterme Hk. adnnfrm 2 345 05-10-2023, 03:16
Son Mesaj: adnnfrm
  Raporları Gezinme Araçlı Pdf Olarak Dışarı Aktarmak Hk. adnnfrm 4 323 04-10-2023, 10:34
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi