• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Kapalı Dosyalardan Veri Silmek Hk.

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
M

murat_8181

Excel Dostu
Katılım
17 Nis 2021
Mesajlar
532
Çözümler
38
Aldığı beğeni
237
Excel V
Office 2016 TR
Konu Sahibi
Değerli arkadaşlar AÇIK kitap isimli sayfamın "A" sütununa yazdığım TC kimlik numaralarını kapalı olan çalışma kitaplarında bulup TC kimlik numaralarının bulunduğu satırları komple silmek istiyorum. Kapalı olan çalışma kitapları aynı formatta bulunmaktadır. Kapalı olan çalışma kitabı sayım yaklaşık 50 adettir. Saygılarımla
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Tarihe göre sırala Oylara göre sırala
yanlış biliyor olabilirim ama bildiğim kadarıyla kapalı exceli açmadan veri silinemiyor, kapalı excellerin arka planda açılması sorun olur mu
 
Olumlu oy 0 Negatif oyla
tüm dosyalarda tek sayfa mı olacak?
hepsinin adı AAA mı olacak yoksa değişke mi?
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
yanlış biliyor olabilirim ama bildiğim kadarıyla kapalı exceli açmadan veri silinemiyor, kapalı excellerin arka planda açılması sorun olur mu
Genişletmek için tıkla...
Sorun olmaz halil bey bu makroya ek olarak kapalı dosyaların belirli sütunlarınıda sildirebilirmiyiz örneğin D,G,H,K,M sütunlarını yoksa onu ayrı bir başlık altındamı sorayım
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
tüm dosyalarda tek sayfa mı olacak?
hepsinin adı AAA mı olacak yoksa değişke mi?
Genişletmek için tıkla...
Hepsi AAA olacak ancak makronun kullanışlılığı açısından belki farklı sayfalarda da makroyu kullanmak açısından daha iyi olur sanırım. Ancak zor olacaksa da önemli değil
 
Olumlu oy 0 Negatif oyla
hepsinin AAA olması sorun çıkarmaz
 
Olumlu oy 0 Negatif oyla
murat_8181' Alıntı:
ek olarak kapalı dosyaların belirli sütunlarını da sildirebilirmiyiz örneğin D,G,H,K,M sütunlarını
Genişletmek için tıkla...
sildirilebilir tabi ki bu soruyla mı ilişkili
daha ayrıntılı bir açıklama yapar mısınız?
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
sildirilebilir tabi ki bu soruyla mı ilişkili
daha ayrıntılı bir açıklama yapar mısınız?
Genişletmek için tıkla...
Bu soruyla ilişkili Halil bey aynı zamanda kapalı dosyaların belirttiğim sütunlarını da sildirebilir sek daha iyi olur. Yani makro hem bulduğu TC kimlik numaralarının olduğu satırları silecek hemde belirtilen sütunları
 
Olumlu oy 0 Negatif oyla
aşağıdaki kodu dener misiniz?
tüm dosyalar aynı klasörde olmalı
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Kusura bakmayın bir yerde hata yapmışım
Sht.Range("A2:a" & 1000) satirinda orası 1000 olmayacaktı aslında son satir bulunup oraya o sayı yazılacaktı unutmuşum.
 
Olumlu oy 0 Negatif oyla
Konu Sahibi
halily' Alıntı:
Kusura bakmayın bir yerde hata yapmışım
Sht.Range("A2:a" & 1000) satirinda orası 1000 olmayacaktı aslında son satir bulunup oraya o sayı yazılacaktı unutmuşum.
Genişletmek için tıkla...
xDzTcNo = Sayfa1.Range("A2:A5")
Hali bey örneğin aranacak TC kimlik numarası sayısı 100 ise bu paylaştığım satırı xDzTcNo = Sayfa1.Range("A2:A100") olarakmı güncelleyeceğim
 
Olumlu oy 0 Negatif oyla
O kısmı da unutmuşum
2 yerde de önce son satir bulunmalı çalışıp çalışmadığını kontrol ederken onları unutmuşum
Bu 2 yerde de
xDzTcNo = Sayfa1.Range("A2:A" & tcolansayfaninsonsatiri)
Sht.Range("A2:a" & acilankitabinsonsatiri)
sitede son satırı bulmaya ilgili kodlar mevcut araştırın yapamazsanız yardımcı olmaya çalışırız.
 
Olumlu oy 0 Negatif oyla
sorun çıkmadı değil mi iyice kontrol ettiniz mi?
ben aşağıdaki şekilde düzenledim
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Olumlu oy 0 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst