AccessTr.neT
Günlük Mevcut Raporu Access'ten Excel'e - 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ığı: Günlük Mevcut Raporu Access'ten Excel'e (/konu-gunluk-mevcut-raporu-access-ten-excel-e.html)

Sayfalar: 1 2 3


Günlük Mevcut Raporu Access'ten Excel'e - hturkavci03 - 19/02/2021

Merhaba, işyerinde her gün Access ile mevcut hazırlıyorum ancak hazırladığım raporu excele aktarmam gerekiyor. Kullandığım accesste tüm personel listesine gidiş ve dönüş tarihleri ile mazeretlerinin girişini yapıyorum. Sonra rapor açılırken Dlookup kullanarak toplamları ilgili alanlara alıyorum. Raprun alt kısmında ise gayri mevcut olan personel listesini oluşturuyorum ancak bu raporu göründüğü gibi excele aktaramıyorum. Toplamları alarak oluşturduğum genel mevcut, hazır mevcut ve gayri mevcut alanları excelde dağııyor. Ek'teki örnekte Access ile veri girişlerini yaptıktan sonra mevcudu şablon olan Excel dosyasına aktarmam ve farklı kaydederek şablonun bozulmasını önlemem gerekli. Nasıl bir yol izlemem gerekir acaba?


Re: Günlük Mevcut Raporu Access'ten Excel'e - userx - 20/02/2021

Sayın hturkavci03

Ekteki örneği inceler misiniz?


RE: Günlük Mevcut Raporu Access'ten Excel'e - hturkavci03 - 20/02/2021

Sayın userx, çok teşekkür ederim ilginize. Bir ekleme daha yapabilirsek çok güzel olacak. Ekteki örnekte önce Tablo1 formu açılıyor. Paraf alanındaki bilgiyi ve İmzalayan Seç alanından seçime göre altındaki 3 metin kutusuna gelen isimleri de Excel en alt kısma alabilir miyiz? ŞABLON ÖRNEK Excel dosyasında sarı işaretli olan yerler. Bir de Excel alttaki tablo S.NO sütunundaki rakamları ortalayabilir miyiz? Tekrar teşekkür ediyorum.


RE: Günlük Mevcut Raporu Access'ten Excel'e - userx - 20/02/2021

Sayın hturkavci03

Loop ile rs.Close arasına alttaki kodları ekleyerek dener misiniz?

            
Excl.Range("A" & i + 1).Value = " Pers.Md. " & Dlookup ("ADI_SOYADI", "IMZA", "YETKISI='PATRON-2'")
Excl.Range("G" & i + 3).Value = Dlookup ("ADI_SOYADI", "IMZA", "YETKISI='PATRON-1'")
Excl.Range("G" & i + 4).Value = Dlookup ("GOREVI", "IMZA", "YETKISI='PATRON-1'")
Excl.Range("G" & i + 5).Value = Dlookup ("YETKISI", "IMZA", "YETKISI='PATRON-1'")
        Excl.Range("G" & i + 3, "G" & i + 5).HorizontalAlignment = xlCenter



RE: Günlük Mevcut Raporu Access'ten Excel'e - hturkavci03 - 20/02/2021

(20/02/2021, 16:53)userx yazdı: Sayın hturkavci03

Loop ile rs.Close arasına alttaki kodları ekleyerek dener misiniz?

            
Excl.Range("A" & i + 1).Value = " Pers.Md. " & Dlookup ("ADI_SOYADI", "IMZA", "YETKISI='PATRON-2'")
Excl.Range("G" & i + 3).Value = Dlookup ("ADI_SOYADI", "IMZA", "YETKISI='PATRON-1'")
Excl.Range("G" & i + 4).Value = Dlookup ("GOREVI", "IMZA", "YETKISI='PATRON-1'")
Excl.Range("G" & i + 5).Value = Dlookup ("YETKISI", "IMZA", "YETKISI='PATRON-1'")
        Excl.Range("G" & i + 3, "G" & i + 5).HorizontalAlignment = xlCenter

Oluyor ancak ben paraf ve imzalayan bilgilerini Tablo1 formundaki alanlardan çekmek istiyorum.
Ayrıca GAYRİ MEVCUT BEYANI listesindeki S.NO alanını ortalamak, MAZERETİ alanını sola yaslamak istiyorum.
Yanlış anlamayın, bu uygulamayı Access bilmeyen 3 kişi daha kullanacak, Paraf ve imzalayan değiştiğinde seçimlerle yapsınlar istiyorum.


RE: Günlük Mevcut Raporu Access'ten Excel'e - userx - 20/02/2021

İmzalayan bilgilerini seçerek mi alacaksınız yoksa sabit kişler mi?