Soru Günlük Finansal İşlemler Bakiyelerin Sonraki Güne Düğme İle Aktarımı

[ozanyakar]

Üstatlar günaydın, hayırlı işler.
Her iki firmanın da, günlük, kasa , çek senet, kredi kartı , banka işlemlerini raporlamaktayız. İşlemler bitince , hemen yandaki sekmeye sağ tuş taşı veya kopyala işlemi ile yeni bir günü açıyoruz. 13052022 Yi hemen 14052022 olarak açıyoruz.



13052022 de işlemler bitince ertesi güne düğme ile açılış bakiyeleri aktarılabilir mi ? Yani ;



Ertesi gün,(Yani 14052022) işlemleri bitince biz o sayfayı taşı veya kopyala yapıp 15052022 ye aktaracağız, işleyiş bu şekilde devam edecek.

Kıymetli yardımlarınızı rica ederim. İşlerinizde kolaylıklar ve başarılar dilerim.

 

[ozanyakar]

Dosyayı eklemişim özür dilerim Ekledim şimdi.

 

[YUSUF44]

Şimdi de eklememişsiniz

 

[ozanyakar]

Bilgilendirme için teşekkür ederim Üstat, kusura bakmayın.. Sanırım yüklerken hata oluştu. Yükledim şimdi.

 

[ozanyakar]

Bilgilendirme için teşekkür ederim Üstat, kusura bakmayın.. Sanırım yüklerken hata oluştu. Yükledim şimdi.

Sayın
YUSUF44

 

[ozanyakar]

Üstatlar çözüm bulabilecek miyiz ? Kıymetli yardımlarınızı rica ederim, saygılar sunarım.

 

[YUSUF44]

Aşağıdaki makroyu bir modüle kopyalayıp günlük sayfalarınızdan biri açıkken deneyiniz:

Sub gundevri()
    On Error Resume Next
    Set s1 = ActiveSheet
    gun = Format(Left(s1.Name, 2) + 1, "00")
    ay = Mid(s1.Name, 3, 2)
    yil = Right(s1.Name, 4)
    s1.Copy Before:=Sheets(Sheets.Count)
    Set s2 = ActiveSheet
    s2.Name = gun & ay & yil
    Range("D47").Select
    Sheets("15052022").Select
    s2.[E6] = s1.[E24]
    s2.[K6] = s1.[K24]
    s2.[E28] = s1.[E37]
    s2.[K28] = s1.[K37]
    s2.[E40] = s1.[E56]
    s2.[K40] = s1.[K56]
    
    s2.[B84:B93] = s1.[E84:E93].Value
    s2.[H84:H93] = s1.[K84:K93].Value
    
    s2.[A9:K22].ClearContents
    s2.[A30:K35].ClearContents
    s2.[A42:K54].ClearContents
    s2.[A62:K77].ClearContents
End Sub

 

[ozanyakar]

Sayın
YUSUF44 Ellerinize, emeğinize sağlık mükemmel.. Sağ tuğ kod görüntüleme yerine düğme atanabilir mi ? Dosyayı ekiple ortak kullanacağız makro bilgimiz hiç yok bir yanlışlık yapıp makroyu bozmaktan korkuyoruz. Düğme atayabilirsek çok seviniriz.

 

[ozanyakar]

Sayın
YUSUF44 Ellerinize, emeğinize sağlık mükemmel.. Sağ tuş kod görüntüleme yerine düğme atanabilir mi ? Dosyayı ekiple ortak kullanacağız makro bilgimiz hiç yok bir yanlışlık yapıp makroyu bozmaktan korkuyoruz. Düğme atayabilirsek çok seviniriz.

 

[YUSUF44]

Bunun için bana gerek yok ki, kodlar çalıştığına göre sayfada nasıl kullanacağınızı biliyorsunuz demektir. Düğmeyle çalıştırmak istiyorsanız sayfaya bir düğme ekleyin ve sağ tıklayıp makro ata deyin. Açılan listede makroyu seçip işlemi tamamlayın.

 

[ozanyakar]

Sayın
YUSUF44 , sayenizde düğme atamayı öğrendik. Çok teşekkür ederiz. Ellerinize sağlık.