Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Diğer Excel Soruları
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Diğer Excel Soruları Yukarıdaki başlıklara uymayan Excel sorularınızı bu bölüme gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 30-09-2010, 11:31   #1
modoste
Altın Üye
 
Giriş: 31/05/2008
Şehir: TRABZON
Mesaj: 2,648
Excel Vers. ve Dili:
2010
Varsayılan ad çakışmasi ve çakışan adları tek tek silme güçlüğü

merhaba sayın hocalarım
daha önceleri sorudum bi sorumda ad çakışmasında neler yapılmalı diye ve hocalarımdan cevağlam şöyle gelmişti
tanımla / Ad ile adları tek tek siliceksin dendi
uyguladığım basit sayfalar(bi kaç addan oluşan) ama şimdi öyle bi çalışma elime ulaştı ki 10 dakikadır isim seçip siliyorum bitmek bilmiyo
tüm adları tek celsede silebilecek bi kolaylık var mı ?

bir diğer sorum bu ad çakışmaları ne ile oluşur yada 300 tane kadar ad çakışması nasıl oluşabilir.
modoste Çevrimdışı   Alıntı Yaparak Cevapla
Eski 30-09-2010, 13:26   #2
hamitcan
Uzman
 
hamitcan kullanıcısının avatarı
 
Giriş: 01/07/2004
Mesaj: 7,054
Excel Vers. ve Dili:
Excel 2007 Türkçe
Varsayılan

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub IsimleriSil()
    For i = 1 To ActiveWorkbook.Names.Count
        ActiveWorkbook.Names.Item(i).Delete
    Next
End Sub
__________________
Yolda Yürüme Kuralları







hamitcan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 30-09-2010, 15:22   #3
uzmanamele
Uzman
 
uzmanamele kullanıcısının avatarı
 
Giriş: 26/09/2007
Şehir: Süleyman Özyüksel / Ankara
Mesaj: 8,795
Excel Vers. ve Dili:
excel 2010
Varsayılan

merhaba

hatalı tanımlı adların bulunduğu dosyada bunları temizlemek bazen sorun olur.
kod ile tanımlı ad silindiğinde silinmesini istemediğimiz tanımlı adlar olabilir.
alternatif kod.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub T_Ad_Sil()
Dim ONAY As Byte
For Each adlar In ThisWorkbook.Names
    ONAY = MsgBox(adlar & vbCrLf & vbCrLf & _
    "Tanımlı Ad Silinsin mi?", vbInformation + vbYesNo)
    
    If ONAY = vbYes Then
        adlar.Delete
    ElseIf ONAY = vbNo Then
    End If
    Next
End Sub
__________________
Türk genci, İnkılapların ve rejimin sahibi ve bekçisidir.
Atatürk
uzmanamele Çevrimdışı   Alıntı Yaparak Cevapla
Eski 03-10-2010, 15:17   #4
modoste
Altın Üye
 
Giriş: 31/05/2008
Şehir: TRABZON
Mesaj: 2,648
Excel Vers. ve Dili:
2010
Varsayılan

sayın uzmanamele ve diğer hocalarım
bugün 3 sekmeden oluşan çalışma dosyamda çalışırken 2 sekmeden oluşan başka bi dosyadan sekmeleri kopyala özel yapıştır (benim açık sayfamı seçmişken) sayfa sonuna yapıştır dediğim anda yine ad çakışması uyarısı belirdi yaklaşık 50 enter dan sonra çalışma sayfası kullanılır hale geldi.

şimdi ben bu durumda ad çakışma hatalarının sebeplerini bilmediğimden basit soru sorcam
benim zaten 3 sekmemde bu sorun yoktu başka bi yerden 2 sekme kopyaladım ve bu hata belirtisi yine geldi

bu yazılan kodu nasıl yazacağımı detaylı olarak yazabilirmisiniz
hangi sekme açıkken kod yazıcam ve bu kod olayını tam bilemiyorum hep unutuyorum
yardımcı olurmusunuz.
modoste Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-10-2010, 09:37   #5
hamitcan
Uzman
 
hamitcan kullanıcısının avatarı
 
Giriş: 01/07/2004
Mesaj: 7,054
Excel Vers. ve Dili:
Excel 2007 Türkçe
Varsayılan

Ben daha önce rastlamadığım için soruyorum, ad çakışması, aynı isimden birden fazla olduğunda mı oluşuyor ? Eğer böyle ise belki bir kod yardımıyla halledilebilir.
__________________
Yolda Yürüme Kuralları







hamitcan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-10-2010, 09:48   #6
uzmanamele
Uzman
 
uzmanamele kullanıcısının avatarı
 
Giriş: 26/09/2007
Şehir: Süleyman Özyüksel / Ankara
Mesaj: 8,795
Excel Vers. ve Dili:
excel 2010
Varsayılan

merhaba

hamitcan bey, tanımlı ad çakışmasından kaynaklanıyor.
şöyle örnekleyeyim: deneme tanımlı adını $A$1 hücresi için oluşturduğumuzu varsayalım. bu durumda sayfayı kopyaladığımızda, kopyalanan sayfada da deneme tanımlı adı $A$1 hücre değeri için olacaktır. bu durumda aynı adı kullanmak istiyor musunuz diye sorar.

sizin önerdiğiniz kod bütün tanımlı adları siler, benim önerdiğim ise bu silme işlemini seçebilirsiniz.
bütün tanımlı adlar silindiğinde mesela yazdırma alanı da tanımlı olacağından onu da siler, oysa bunu silmek istemeyebiliriz.
__________________
Türk genci, İnkılapların ve rejimin sahibi ve bekçisidir.
Atatürk
uzmanamele Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-10-2010, 09:49   #7
uzmanamele
Uzman
 
uzmanamele kullanıcısının avatarı
 
Giriş: 26/09/2007
Şehir: Süleyman Özyüksel / Ankara
Mesaj: 8,795
Excel Vers. ve Dili:
excel 2010
Varsayılan

Alıntı:
modoste tarafından gönderildi Mesajı Görüntüle
sayın uzmanamele ve diğer hocalarım
bugün 3 sekmeden oluşan çalışma dosyamda çalışırken 2 sekmeden oluşan başka bi dosyadan sekmeleri kopyala özel yapıştır (benim açık sayfamı seçmişken) sayfa sonuna yapıştır dediğim anda yine ad çakışması uyarısı belirdi yaklaşık 50 enter dan sonra çalışma sayfası kullanılır hale geldi.

şimdi ben bu durumda ad çakışma hatalarının sebeplerini bilmediğimden basit soru sorcam
benim zaten 3 sekmemde bu sorun yoktu başka bi yerden 2 sekme kopyaladım ve bu hata belirtisi yine geldi

bu yazılan kodu nasıl yazacağımı detaylı olarak yazabilirmisiniz
hangi sekme açıkken kod yazıcam ve bu kod olayını tam bilemiyorum hep unutuyorum
yardımcı olurmusunuz.
merhaba

syn modoste, önerdiğim kodları bir standart modüle yazın ve kodu çalıştırın.
__________________
Türk genci, İnkılapların ve rejimin sahibi ve bekçisidir.
Atatürk
uzmanamele Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-10-2010, 09:59   #8
modoste
Altın Üye
 
Giriş: 31/05/2008
Şehir: TRABZON
Mesaj: 2,648
Excel Vers. ve Dili:
2010
Varsayılan

sayın uzmanamele
syn modoste, önerdiğim kodları bir standart modüle yazın ve kodu çalıştırın
bu dediklerinizin nasıl yapıldığını unuttum.
tekrar madde madde yazarmısınızı lütfen hocam
ayrıca dosya 5 sekmeden oluşuyo
ilk 3 sekme varken bu uyarı yoktu son eklediğim (taşı-kopyala diğer dosya) 2 sekmede eklediğimde bu ad çakışması olmuştu
ben hangi sekme açıkken nasıl yapacağım bilemiyorum.
modoste Çevrimdışı   Alıntı Yaparak Cevapla
Eski 04-10-2010, 10:18   #9
uzmanamele
Uzman
 
uzmanamele kullanıcısının avatarı
 
Giriş: 26/09/2007
Şehir: Süleyman Özyüksel / Ankara
Mesaj: 8,795
Excel Vers. ve Dili:
excel 2010
Varsayılan

merhaba

örnek dosyada kırmızı sekme renkli sayfada bir ad tanımlanmıştır.
bu sayfayı; kopyala- sona kopya oluştur derseniz ad çakışması uyarısı alırsınız.
diğer sayfalarda bu ad olduğu halde çakışma olmaz.

kodu her hangi bir sayfadan çalıştırabilirsiniz, sayfaya bakmaz kitabın içindekilere bakar.
Eklenmiş Dosyalar
Dosya Türü: xls ad çakışması.xls (42.5 KB, 73 Görüntülenme)
__________________
Türk genci, İnkılapların ve rejimin sahibi ve bekçisidir.
Atatürk
uzmanamele Çevrimdışı   Alıntı Yaparak Cevapla
Eski 31-05-2012, 11:33   #10
designer41
 
Giriş: 29/02/2012
Şehir: kocaeli
Mesaj: 52
Excel Vers. ve Dili:
2007
Varsayılan

Alıntı:
hamitcan tarafından gönderildi Mesajı Görüntüle
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Sub IsimleriSil()
    For i = 1 To ActiveWorkbook.Names.Count
        ActiveWorkbook.Names.Item(i).Delete
    Next
End Sub
Sayın hamitcan hocam
Sadece aşağıdaki adları otomatik silmek için nasıl bir kod yazabiliriz?
DışVeri_1
DışVeri_1
DışVeri_2
DışVeri_3
DışVeri_4

yardımcı olabilirmisiniz acaba?
designer41 Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 06:35


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım -- Beylikdüzü mali müşavir - Lingerie - Dyeing Machine - Karton Bardak- Karton Bardak- Çorlu Dil ve Konuşma Terapisti- Çorlu Dil ve Konuşma Terapisti- Çorlu Özel Eğitim- Site Yönetimi- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Çorlu- Çorlu Araç Takip- Çorlu Su Arıtma- Gebze Emlak- Rampa- Rotary- Çorlu İnternet Sitesi- Çorlu Sürücü Kursu- Çorlu Sürücü Kursu- Şişli Avukat- Edirne Serbest Muhasebeci- Çorlu Etüt- İstanbul Botanik- Çorlu Sigorta- Kağıt Bardak- Kaplan Tekstil- Çorlu Perde- Çorlu Havuz- Makina- Danışmazlar-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden