Hocam ilgiliniz icin tesekkürler fakat yapmak istedigimi tam izah edemedim sanirim.Aşağıdaki kodu deneyin
VBA:Görüntülemek için giriş yapmanız gerekmektedir. (12 satır)
Bu dosyayi incelemenizi rica ederim, burada birazdaha detaylandirdim durumu.Aşağıdaki kodu deneyin
VBA:Görüntülemek için giriş yapmanız gerekmektedir. (12 satır)
Evet arşiv yapmak istiyorumİkinci sayfayı arşiv olarak mı kullanacaksınız? Her butondan sonra arşive yedekleme yapılıp birinci sayfadaki tablo silinecek mi?
Başka fonksiyonlar da var siz sadece arşiv işleminde yardımcı olmanız yeterliSilme işlemini ayrı buton ile mi yapacaksınız?
Görüntülemek için giriş yapmanız gerekmektedir.
(17 satır)
Üstad eline saglik gayet güzel calisiyor fakat L32 de yazdigim (Eger mümkünse Fatura tarihi ve numrasini da Detay sayfasina ilgili islemin karsina getirmesi) bu islemi detay sayfasina aktarmiyor. Acaba bunu da aktarmamiz mümkün mü ?Orjinal dosyada Detay sayfasında a sütununa tıklayıp bir adet sütun ekleyin. Yüklediğim dosyada ben ekledim.
Kodun en altındaki satırda tek tırnağı kaldırırsanız silme işlemini de yapar.
VBA:Görüntülemek için giriş yapmanız gerekmektedir. (17 satır)
Hocam elinize saglik mükemmel olduÖnceki mesajımdaki işlemi yapmak istiyorsanız; For next döngüsünün arasına aşağıdaki kod satırlarını yapıştırıp deneyin.
dty.Range("K" & i) = ft.Range("J5")
dty.Range("L" & i) = ft.Range("J6")
Hocam bir husus dikkatimi cekti Fatura sayfasinda 50.satir ve sonrasi hep sabit kalacak, silinme ve yukariya dogru tasima olmayacak. Size zahmet buna da bir bakabilirmisinizBu dosyayi incelemenizi rica ederim, burada birazdaha detaylandirdim durumu.
Sağolun, Düşünmeniz yeterli.Hocam elinize saglik mükemmel oldu
Nacizane tavsiye, Önceden cay/kahve ismarla butonu vardi keske bu devam etse, size bir kahve ismarlamak isterdim. Emeginiz cok büyük benim icin.
Tesekkürler@mtecimer
Mevcut kodun en sonundaki END SUB satırının üstündeki
aralik.Delete shift:=xlUp kısmını aralik.ClearContents olarak değiştirince istediğinizin olması lazım.
Belgeye değil, önceki cevaplarda kullanılan kodlara baktım.
Sağolun, Düşünmeniz yeterli.
Silme işleminde Ömer abinin verdiği yöntem işinize yaramış olması lazım, başka şekilde silme işlemi istiyorsanız yazarsınız.
Görüntülemek için giriş yapmanız gerekmektedir.
(31 satır)
Hocam hata benden kaynakli onu cözdüm, ama sizden bir ricam daha olacak butona bastigimda fatura numrasini otomatik 1 sayi artirabilirmiyiz?Hata hangi satırda? Birde dosya yükleyin.
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)
Bu yüzden sadece web sitemizin çalışması yönelik temel çerezleri ve deneyiminizi geliştirmek için isteğe bağlı çerezleri kullanıyoruz.
Çerezler hakkında daha fazla bilgi görüntülemek ve tercihlerinizi yapılandırmak için tıklayın