taksitlendirmede ödeme günlerini ayın son günün olarak belirleme
Tarih
18/04/2009 16:57
Konu Sahibi
macaliskan
Yorumlar
3
Okunma
1380
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



macaliskan
Aktif Üye
Kullanici Avatari
Aktif Üye
109
17/01/2009
14
İstanbul
Ofis 2003
11/03/2013,23:29
Çözüldü 
Merhaba Arkadaşlar;

ekteki tabloda taksitlendirme yapılıyor ayın herhangi bir günü işlem yapılıyor

örneğin

başlama tarihi 13/01/2009 olan bir kaydın taksitlendirmesinde
taksit işlemi bir sonraki ayın son günü olarak başlamasını istiyorum
mevcut örneklerde taksitlendirmede 5 taksit yaptığımızı varsaydığımızda

başlama 13/01/2009 ise

taksitler 13/02/2009
13/03/2009
13/04/2009
13/05/2009
13/06/2009
olarak taksitlendiriliyor
burada taksitleri
28/02/2009 ----> şubat 29 ise 29/02/2009
31/03/2009
30/04/2009
31/05/2009
30/06/2009 olarak nasıl yapabilirim.

kolay gelsin


Ek Dosyalar
.rar   t_ornek_999.rar (Dosya Boyutu: 91,22 KB / İndirme Sayısı: 23)
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.732
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Bugün,02:10
Çözüldü 
Öncelikle söz konusu ayın son gününü belirleyelim. Bunun için işlem tarihinden hareket edeceğiz. Ben olsan bunları hep değişkenlere atardım

Kod:
dim islemtarihi, aysonu as date
dim ay as integer


Böylece tarih formatında islemtarihi ve aysonu adında iki değişken ve ay adında sayısal bir değişken tanımladık

Şimdi işlem tarihinin bulunduğu ayın son gününü bulalım:

Kod:
1
2
3
4
5
6
7
Sub SonGün()
    Dim i As Date
    Dim x As Date
    i = islemtarihi 
    x = DateAdd("m", 1, i - (Day(i) - 1))-1
    msgbox x 
End Sub


Bu alt yordamı herhangi bir yerden çağırarak ayın son günün bulabilirsiniz. Kullanımı için

Kod:
songün


yazmanız yeterlidir.

Değişken hangi ayı aldıysa o ayın son günü de aysonu değişkenine atanacaktır. Bunun için msg olan satırda düzenleme yapın ve değeri aysonu değişkenine atayın. Artık ay sonlarına taksit yükleyebilirsiniz. Bu iş için yine dateadd kullanmalısınız.

Not: Örneğinizi henüz görebildim. Sanırım sonradan yüklediniz. Şimdi inceliyorum.


Ben örneğinize yukardaki kodları uyarladım. Örneğiniz aşağıdadır.

Kolay gelsin.


Ek Dosyalar
.rar   t_ornek_999_mdemiral.rar (Dosya Boyutu: 179,15 KB / İndirme Sayısı: 54)
İnadına, ille de Accesstr.net...
Cevapla


macaliskan
Aktif Üye
Kullanici Avatari
Aktif Üye
109
17/01/2009
14
İstanbul
Ofis 2003
11/03/2013,23:29
Çözüldü 
Yardımlarınız için teşekkür ederim, Mehmet hocam

kolay gelsin
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.732
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Bugün,02:10
Çözüldü 
Yardımcı olabildiysen mutlu olurum.
İnadına, ille de Accesstr.net...
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  iş planı için termin tarihi belirleme brsknm 4 183 26/11/2016, 01:10 brsknm
  Formdaki seçili / aktif kayda göre pdf olarak kaydetmek mehmetb84 3 154 07/11/2016, 14:08 mehmetb84
  raporu pdf olarak kayıt etmek mehmetb84 4 122 04/11/2016, 14:22 mehmetb84
  Raporu Pdf Olarak Kayıt etmek m_demir 8 263 04/11/2016, 13:07 atoz112
  Seçilen Ayın Kaçıncı Ay Olduğu başka Sütunda Cevap Versin hgsoftware 6 174 19/10/2016, 10:29 hgsoftware


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya