Tarih Aralıkla Makro ?

[igultekin2000]

iyi akşamlar; ANAGİRİŞ sayfasına mal alış-satış ' ları giriliyor. Hareket sayfası ile ilgili ürün kodunun hareket ve hareketli maliyeti hesaplanıyor. Stok raporu alındığında mevcut girişleri SABİTLER sayfasındaki mamüllere göre raporluyor. Kullanılan makro

Sub İŞLEM_BRN()
Set ul = Sheets("URUN_LISTE"): Set sb = Sheets("sabitler"): Set ha = Sheets("HAREKET")
ul.Range("A2:F" & ul.Cells(65536, 1).End(3).Row).ClearContents
Application.ScreenUpdating = False
sb.Range("B2:D" & sb.Cells(Rows.Count, "B").End(xlUp).Row).Copy ul.Range("A2")
For i = 2 To ul.Range("A65536").End(xlUp).Row
ha.Cells(1, 1) = ul.Cells(i, 1): ul.Cells(i, 4) = ha.Cells(1, "P"): ul.Cells(i, 5) = ha.Cells(1, "Q")
Next i
Application.ScreenUpdating = True
MsgBox "İşlem TAMAM.", vbInformation
End Sub

ile stok ve maliyet değerli rapor alınıyor. Bu makroya tarih aralığı girmek mümkün olabilir mi? Teşekkürler. örnek üzerinde ve sayfalar üzerinde ilave açıklama yaptım. Raporlamada HAREKET sayfasında oluşan son duruma göre maliyet ve stok listeleniyor. Bunu tarih sınırlaması ile yapmak gibi uygulama olabilir mi ?

 

[Ömer BARAN]

Merhaba.

Örnek belgenizde tarihe göre yapılmasını istediğiniz işlemi;
tarihler girip elle yazarak veya kopyala yapıştır şeklinde işlem yaparak olması gereken sonuçları olması gereken alanlara yazarak örneklendiriniz.
Bu sonuçlara nasıl ulaştığınızı; sayfa adı/sütun adı/satır numarası gibi net ifadeler şeklinde kısaca açıklayınız.
.