Skip to main content

AccessTr.neT


taksitlendirmede ödeme günlerini ayın son günün olarak belirleme

taksitlendirmede ödeme günlerini ayın son günün olarak belirleme

Çözüldü #1
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
.rar t_ornek_999.rar (Dosya Boyutu: 91,22 KB | İndirme Sayısı: 25)
Cevapla
Çözüldü #2
Ö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:
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.
.rar t_ornek_999_mdemiral.rar (Dosya Boyutu: 179,15 KB | İndirme Sayısı: 58)
İnadına, ille de Accesstr.net...
Cevapla
Çözüldü #3
Yardımlarınız için teşekkür ederim, Mehmet hocam

kolay gelsin
Cevapla
Çözüldü #4
Yardımcı olabildiysen mutlu olurum.
İnadına, ille de Accesstr.net...
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task