Raporda pazar günü otomatik boyama
Tarih
02/04/2012 09:10
Konu Sahibi
orhantanriverdi
Yorumlar
5
Okunma
1387
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
orhantanriverdi
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... T....
130
23/11/2010
8
Ankara
Ofis 2010 64 Bit
04/05/2017,10:21
Çözüldü 

Sayın hocalarım

Ekte raporlar kısmında bulunan "personneltimesheet" adlı raporda Mart-2012 ayına aıt personel saatleri mevcuttur. Benim yapmak istediğim raporda bulunan.
1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19-20......31 gunlerden o ay içinde hangi GÜN pazar gününe denk geliyorsa o kolonun rengini otomatik değiştirmek. (Mart ayı için 4-11-18-25 kolonlarının rengini değiştirmek)
Kolay gelsin, İyi Çalışmalar

Ek Dosyalar
database.rar

Cevapla

Kur@l
AccessTR.Net
Kullanici Avatari
Uzman
2.032
05/11/2008
KONYA
Ofis 2010
23/05/2017,21:00
Çözüldü 
Sponsor Reklam
Sayın Orhan Tanrıverdi;
Ekte istediğiniz yapılmıştır. Fakat Ay alanında o aya ait kısaltma yerine her ayın ilk gününü kayderderseniz daha rahat edersiniz. Ben çalışmamda sizin gönderdiğiniz veriyi Ayim adında bir değişkene atadım ve değer tarih değilse inputbox ile doğru tarih girilmesini istedim. (Raporunu Almak İstediğiniz Ay içinde herhangi bir gün girmeniz Yeterli). Böylece raporunuz doğru olarak açılıp biçimlendirmeleri yapılıyor. Kolay Gelsin.
Ek Dosyalar
personel_puantaj_kur@l.zip

Cevapla

orhantanriverdi
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... T....
130
23/11/2010
8
Ankara
Ofis 2010 64 Bit
04/05/2017,10:21
Çözüldü 

Sayın hocalarım

Sabah ekledeğim konuda eksiklikler olduğu için tekrar ekliyorum.


Ekte programda, formlarda bulunan (Orhan Tanrıverdi - şifre 123= TIME SHEET kısmına girdikten sonra TIME SHEET REPORT kısmına tıkladığımızda Monthly kısmından March-2012 yi seçtiğimde açılan "personneltimesheet" adlı raporda Mart-2012 ayına aıt personel saatleri mevcuttur. Benim yapmak istediğim raporda bulunan.
1-2-3-4-5-6-7-8-9-10-11-12-13-14-15-16-17-18-19-20......31 gunlerden seçtiğim ay/yıl içinde hangi GÜN pazar gününe denk geliyorsa o kolonun rengini otomatik değiştirmek. (Mart ayı için 4-11-18-25 kolonlarının rengini değiştirmek)
Kolay gelsin, İyi Çalışmalar

Ek Dosyalar
database.rar

Cevapla

orhantanriverdi
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... T....
130
23/11/2010
8
Ankara
Ofis 2010 64 Bit
04/05/2017,10:21
Çözüldü 
Sponsor Reklam
Kural hocam tesekkur ederim. Çok güzel olmuş. Emeğinize sağlık

(İkinci kez açtığım konuyu silebiliriz)
Cevapla

ayhan2122
accesstr.net , gayet net ;)
Kullanici Avatari
Uzman
681
30/10/2008
451
-
Ofis 2003
23/02/2017,01:00
Çözüldü 
1,2,3,....31 diye etiketlendirdiğiniz etiketlerin adları g1,g2 ,g3.....g31 diye adlandırın. Sonra

Alıntı:Private Sub Report_Open(Cancel As Integer)
Dim gTarih As Date
Dim gTarih2 As Date
Dim gMetin
Dim i As Integer
gMetin = Forms![datapuantaj]![Monthly]
gTarih = DateSerial(Year(gMetin), Month(gMetin), 1)
For i = 1 To 31
If Weekday(DateAdd("d", i - 1, gTarih)) = 1 Then
Me("g" & i).BackColor = vbBlack
Me("g" & i).ForeColor = vbWhite
Else
Me("g" & i).BackColor = vbWhite
Me("g" & i).ForeColor = vbBlack
End If
Next
End Sub

kodu rapora yazın.


Pardon ya Img-grin)) cevabı verilmiş.

Saygılar, iyi çalışmalar.
*********
Kod, formül vs bilmek önemlidir ama mantığını yürütebilmek, nerede ve nasıl kullanılacağını bilmek daha önemlidir.
Cevapla

orhantanriverdi
Aktif Üye
Kullanici Avatari
Aktif Üye
O.... T....
130
23/11/2010
8
Ankara
Ofis 2010 64 Bit
04/05/2017,10:21
Çözüldü 
Sponsor Reklam
Ayhan hocam tesekkur ederim. Sorunsuz calisiyor. Saygilar
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Worde Aktarımda Ön İzmele Ve Wordü Otomatik Kaydetme derzulya 5 76 4 saat önce derzulya
Çözüldü Otomatik Sms Gönderme kyskys_2017 2 58 Dün, 15:55 kyskys_2017
  Silinen Otomatik Sayının Yerini Doldurma serkandiker 7 179 02/05/2017, 10:42 serkandiker
  Bir Raporda Count İşleminin Yapılması adaletinsesi 9 158 28/04/2017, 20:07 atoz112
  Otomatik Mail Gönderimi temre 16 493 21/04/2017, 01:06 ozanakkaya


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status