Skip to main content

AccessTr.neT


Excel Veri Alma

Excel Veri Alma

Çözüldü #1
Arkadaşlar daha önce burda düzenlenen ecxel kopyala yapıştır yaptıktan sonra ay kısmından veri istendiğinde hata veriyor bir kontrol edebilirmisiniz.
.rar EDS İstatistik_hy.rar (Dosya Boyutu: 714,48 KB | İndirme Sayısı: 16)
Son Düzenleme: 30/08/2019, 16:55, Düzenleyen: HORZUM.
Cevapla
#2
yaptığınız herhangi  bir değişiklik oldu mu?
hücre birleştirme falan

sorunun sebebi "Ocak" sayfasında yer alan satırların 10767. satırdan itibaren birleşik hücre olarak biçimlendirilmiş olması. her ne kadar "mart" kayıtlarının sayısı 10759 tane görünse de kopyalamaya çalıştığı satır sayısı 10764.
kopyalamaya 8. satırdan başladığı için 10764+8=10772. satıra denk geliyor. bu fazladan 5 satırı birleştirilmiş hücreye kopyalamaya çalıştığı için hata veriyor
10767.satırdaki biçimlendirilmiş hücreleri daha aşağılara kaydırırsanız sorun kalmaz ben 5 satır eklediğimde sorun düzeldi
yada buton2nin kodunu aşağıdaki kodla değiştirip deneyin
Visual Basic Code
FSon = Worksheets("İhlal").Cells(Rows.Count, 6).End(xlUp).Row 'ihlal sayfası, F sütunudaki son veri olan son satırı bulur
If Worksheets("ocak").Range("L8").Value = "" Then
MsgBox ("Lütfen Eklenecek Dönemi Seçiniz")
Worksheets("ocak").Range("L8").Select
Exit Sub
End If
Worksheets("ocak").Range("B8:F10766").ClearContents
Worksheets("İhlal").Range("A3").AutoFilter Field:=6, Criteria1:=Worksheets("ocak").Range("L8").Value
Worksheets("İhlal").Range("A3:F" & FSon).SpecialCells(xlCellTypeVisible).Copy _
                Worksheets("ocak").Range("B8")
Worksheets("İhlal").AutoFilterMode = False
Cevapla
#3
sayın @HORZUM olumlu yada olumsuz konuya dönüş yapar mısınız?
Cevapla
#4
HALETTİM ARKADAŞLAR HEPİNİZ SAĞOLUN. İŞİM GEREĞİ SİTEYE GİREMEDİM BİRAZ GEÇ OLDU AMA
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da