- Excel Versiyonu
- Excel 365
- Excel Sürümü
- 64 Bit
- Excel Dili
- Türkçe
Ekteki dosyada daha önce vba kodu yazıldı.Kod şu anda çalışmıyor.Sebebi ne olabilir.Yardımlarınız için teşekkürler
Borç ve Alacak Karşılaştırma
- Konuyu başlatan smmmserkan
- Başlangıç tarihi
Çözüm
İlgili satırı şöyle değiştirerek deneyin.
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
Çözüm
sonsatir = Sayfa6.Cells(Rows.Count, 2).End(xlUp).Row benim çalışma sayfalarında sayfa6 isimli çalışma sayfası yok ama bu kodu çalışma sayfasında kodlarda nereye yazmam gerekiyor
Alt + F11 kısayolu ile VB ekranına geçin.
Sol kısımda göreceğiniz üzere, sizin ön sayfada "Sayfa1" olarak gördüğünüz sayfanın kod adı "Sayfa6" şeklindedir.
Sağ kısımda renklendirdiğim kodu, Ömer hocamın yazdığı kod ile değiştirin.
Kod zaten dosyada mevcut.
Mevcut kod satırında, kırmızı renklendirdiğim yerdeki 1 sayısı 2 olarak değişecek o kadar.
Mevcut hali >>> sonsatir = Sayfa6.Cells(Rows.Count, 1).End(xlUp).Row
Olması gereken >>> sonsatir = Sayfa6.Cells(Rows.Count, 2).End(xlUp).Row
Mevcut kod satırında, kırmızı renklendirdiğim yerdeki 1 sayısı 2 olarak değişecek o kadar.
Mevcut hali >>> sonsatir = Sayfa6.Cells(Rows.Count, 1).End(xlUp).Row
Olması gereken >>> sonsatir = Sayfa6.Cells(Rows.Count, 2).End(xlUp).Row
- Durum
Benzer Konular
Popüler İçerikler
Daha Fazlası