Son Satır Problemi

Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Arkadaşlar merhaba,

Benim şöyle bir problemim var. Kullanmakta olduğum bir excel çalışma kitabının boyutu normalde olması gerekenden çok fazla büyüdü. Yaptığım kontrollerde bir sayfanın buna neden olduğunu tespit ettim. Sayfada CTRL + END tuşlarına bastığımda 415743'üncü satırdaki XEV sütununa konumlandığını gördüm. Ve ne yaptıysam bu sayfadaki son değer olan hücreyi düzeltemedim.

Sayfalar arasında formüller olduğu için de yeniden sayfa oluşturup, verileri oraya almak çözüm olmuyor.

Sayfanın örneğini gönderiyorum. göreceğiniz üzere sadece 2 satır ve 3 sütundan oluşan bu dosyanın boyutu 2 MB'ın üzerinde..

Bu dosyayı normal boyuta getirmek için neler yapabiliriz?

Dosyayı http://s3.dosya.tc/files/kYZNcF/Kitap1.xlsx.html linkinden indirebilirsiniz...
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
son verinizin olduğu sütunun sağ tarafındaki sütunu üzerine tıklayarak seçin.
ctrl+shift tuşları basılı iken sağ ok tuşuna basın. bu sayfayı en sona kadar sütun bazında seçecektir. sütun başlıklarının üzerinde iken sağ klik, sil, tamam.

son verinizin olduğu satırın bir atındaki satırı satır numarası üzerine tıklayarak seçin.
ctrl+shift tuşları basılı iken alt ok tuşuna basın. bu sayfayı en sona kadar satır bazında seçecektir. satır numaralarının üzerinde iken sağ klik, sil, tamam.
 
Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Yapmayı denediniz mi? Yoksa standard'ında nasıl yapıldığını söylüyorsunuz?

Çünkü yapmayı denediğimde "Excel kullanılabilir kaynaklar ile bu görevi tamamlayamıyor. Daha az veri seçin veya diğer uygulamaları kapatın." hatası veriyor.

Ayrıca azar azar silmeyi de denemiştim ama 1 satır bile üste getiremedim son hücreyi, yani 415742 bile olmuyor...
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
daha önce defalarca yaptım.
üstelik gerçek verilerin bulunduğu 400-500 bin satır X 50 sütunluk sayfada.
o uyarıyı verip yine de işlemi "geri alamazsınız" diyerek yerine getirmesi lazım.

yalnız bazı işlemleri yine de yapmıyor. örneğin tabloda bazı verileri filtreleyerek başka bir yere kopyalamak istediğinizde tüm verileri kopyalıyor. sıralanmış bile olsa.

şöyle dener misiniz?

diyelim ki tüm verileriniz A1:J500 aralığında olsun.
K1 hücresini seçin. ctrl+shift basılı iken önce sağ ok, sonra aşağı ok'a basın. peşinden "del" tuşuna basarak silmeyi deneyin.
aynı işlemi A501 hücresinde iken de yapın.
 
Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Söylediğiniz şeyi en az 10 defa denedim. Malesef olmuyor..

İsterseniz dosyayı indirip bir deneyin.. Çok vaktinizi almayacaktır...

Geri alma durumu olmadan işleme devam etme daha az veri seçince çıkıyor.. Devam et dememe rağmen 1 satır veya 1 sütun bile geri gelmedi..
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
dosyanızı indirdim.
evet ilginç bir durum.
bir kaç kod çalıştırdım.

cevap vermedi. ben kendi çalışmalarımda 300-400 MB'lık dosyalarımda 400-500 bin satırlık formüller kullanıyorum. bir şekilde çözüm üretiyorum.

sizin dosyada muhtemelen tün sayfaya biçimlendirme yapılmış iptal edilmiş vb.

uzman olmamakla birlikte olay benim başıma gelse ne yapacağımı anlatayım. konuya hakim bir arkadaşımız yönlendirme yaparsa daha uygun olabilir.

excel 2007 Türkçe kullnıyorsunuz anladığım kadarı ile...
ofis düğmesi, excel seçenekleri, formüller.
burada çalışma kitabı hesaplaması seçeneğini "el ile" olacak.

sorun yaratan sayfa silinecek, aynı isimde ve aynı verileri içeren yeni bir sayfa seçilecek.
dosya save edilecek ve yukarıdaki seçenek "otomatik" olarak tekrar düzeltilecek.

dosyanızdaki 2 satırlık tabloda yer alan rakamlar "metin olarak saklanan sayı" hatası verdiğinden, buradaki verilerin başka bir kaynaktan kopylanarak alındığını düşündürtüyor. eğer böyle ise, yukarıdaki önerimi uygulamak işe yaramaz.

forumda web sitesinden veri almak şeklinde arama yapabilirsiniz. bir çok örnek var.
 
Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Ne yazık ki, söylediğiniz şeyi de denemiştim. hesaplama seçeneği "el ile" bile olsa sorunlu sayfa silindiği anda oradan veri alan tüm formüllerde #BAŞV! hatası çıkıyor.

Gönderdiğim sayfadaki veriler aslında orjinal veriler değil. Veriler biraz özel veriler olduğu için değiştirmek durumunda kaldım. Ama sorunun verilerin içeriğinden kaynaklandığını düşünmüyorum. Sayfada normalde 33 satır ve 6 sütundan oluşan bir tablo var.

Aslında dikkat ettiyseniz 2009 yılında siteye üye olmuş olmama rağmen ilk kez soru soruyorum. Öncelikle internet üzerinde konuyla ilgili olan bulabildiğim tüm İngilizce ve Türkçe çözümleri denemeye çalıştım. Ancak bunlardan sonuç alamadığım için konuyu burada paylaşıyorum.

Ayrıca konunun Web sitesinden veri alma ile ilgisini tam olarak anlayamadım. Gönderdiğim sayfanın orjinalinde de kesinlikle Web sitesinden veri alma (Dış Veri Al) gibi bir işlem yapılmamıştır.

Umarım bir çözüm bulabiliriz, çünkü bu şekildeyken sayfa üzerinde çalışmak gerçekten çok zorlaşıyor.

Teşekkürler,
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
haklısınız. referans alınan hücreler, sayfalar silindiğinde başvuru hatası verecek.

2 yöntem önerebilirim.

asıl dosyanız bir kenarda dursun. bir yedeği üzerinde çalışın.

1- sayfayı silin. #BAŞV! hatasını alın. aynı isimde yeni bir sayfa ekleyin. verilerinizi yazın veya kopyalayın. sildiğinizi dosyayı şişiren sayfanın ismini verin.
#BAŞV! hatası veren sayfalara dönün. Ctrl+H, bul değiştiri kullanarak Aranan Değer kutusunua #BAŞV ve değiştir kutusuna Sayfa2 (silinen sayfanın adı) yazın. Tümünü değiştirin. Çözülmesi lazım.
Not: #BAŞV! yazarsanız, Sayfa2! ile değiştirmelisiniz.

2- Makro ile yapılabilir.

aşağıdaki kodu çalıştırın
Kod:
Sub formul_degis()

    Dim hcr As Range
    Dim sh As Worksheet
    
    For Each sh In ActiveWorkbook.Worksheets
        If sh.Name <> "Sheet2" Then
            For Each hcr In sh.UsedRange
                hcr.Formula = "xx" & hcr.Formula
            Next
        End If
    Next
    
End Sub
sayfanızı silin.
yeni sayfayı ekleyin.
silinen sayfanın ismini verin.
aşağıdaki kodu çalıştırın.

Kod:
Sub formul_geri()

    Dim hcr As Range
    Dim sh As Worksheet
    
    For Each sh In ActiveWorkbook.Worksheets
        If sh.Name <> "Sheet2" Then
            For Each hcr In sh.UsedRange
            hcr.Formula = Replace(hcr.Formula, "xx", "")
            Next
        End If
    Next

End Sub
 
Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Bu çözüm yolu benim de aklıma gelmişti aslında. Ama sorunları bu şekilde çözmek hoşuma gitmiyor nedense, o yüzden yapmak istemedim açıkçası..

Ama başka bir seçenek yok gibi gözüküyor sanırım.

Çok teşekkürler,
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
sayın şenolçakır.

rica ederim...

ancak çözüm yolunda aklınıza gelen tüm hususları konu açmadan önce deneyiniz.
buna rağmen çözüm üretemedi iseniz, yaptıklarınızı yapış şekli ile anlatarak konu açınız.

böyle son derece kısıtlı olan zamanımızı daha etkin kullanmış oluruz.
 
Katılım
1 Nisan 2009
Mesajlar
8
Excel Vers. ve Dili
Excel 2007 - 2010 Türkçe
Siz de haklısınız. Zamanınızı aldım kusura bakmayın.

İyi çalışmalar,
 
Katılım
5 Ocak 2009
Mesajlar
81
Excel Vers. ve Dili
2003-2007 / türkçe
bu şekilde dosya boyutu minimum seviyeye indi

son verinizin olduğu sütunun sağ tarafındaki sütunu üzerine tıklayarak seçin.
ctrl+shift tuşları basılı iken sağ ok tuşuna basın. bu sayfayı en sona kadar sütun bazında seçecektir. sütun başlıklarının üzerinde iken sağ klik, sil, tamam.

son verinizin olduğu satırın bir atındaki satırı satır numarası üzerine tıklayarak seçin.
ctrl+shift tuşları basılı iken alt ok tuşuna basın. bu sayfayı en sona kadar satır bazında seçecektir. satır numaralarının üzerinde iken sağ klik, sil, tamam.
çok teşekkürler gerçekten veri girdikçe şişen ; son olarak 10,5 mb boyutu kazanan dosyam şimdi 137 kb.ölçüsüne indi ve hafifledi rahat çalışıyor.:)
 

mancubus

Destek Ekibi
Destek Ekibi
Katılım
6 Ocak 2010
Mesajlar
2,224
Excel Vers. ve Dili
İŞ: 2021 Win Eng
çok teşekkürler gerçekten veri girdikçe şişen ; son olarak 10,5 mb boyutu kazanan dosyam şimdi 137 kb.ölçüsüne indi ve hafifledi rahat çalışıyor.:)
verileri silmediniz değil mi? :)
yaklaşık %99 küçülmüş dosyanız.
 
Üst