• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

SİL BUTONU

R

rustemparlak

Katılım
30 Nisan 2005
Mesajlar
41
Excel Vers. ve Dili
office 2007 tr
ARKADAŞLAR KOLAYGELSİN....
FORMDA ARADIM AMA BULAMADIM BENİM İSTEDİĞM SAYFA1 DE A5:F6 ARLĞNI VE SAYFA2 DE B4:F6 ARALIĞINI TEK DÜĞME İLE SİLMEK İSTİYORUM. YARDIMLARINIZ İÇİN ŞİMDİDEM TEŞEKKÜR EDERİM..
 
Sheets("Sayfa1").Range("a5:f6").ClearContents
Sheets("Sayfa2").Range("b4:f6").ClearContents
Sheets("Sayfa").Select
 
yukarıdaki makroyu bir tuşa atasan sorunun çözülmüş olur...
 
Bu kodu bir deneyiniz.

Sub Düğme1_Tıklat()
[A5:F6] = ""
Sheets("Sayfa2").[B4:F6] = ""
End Sub
 
ACABA BU SİLİNEN VERİLERİ SİLMEDEN ÖNCE BAŞKA Bİ SAYFAYA KAYDEDİP SONRA SİLMEK MÜMKÜN MÜ? HEPSİ DEĞİL MESALE SAYFA1 DEN A6 B7 C4 SAYFA2 DEN DE E5 E6 F3 F4 HÜCRELERİNİ KAYDETSİN SONRA SİLMESİNİ İSTİYORUM..
 
tum satiri silme

arkadaslar hazi silme konusuna deginmisken ben mesela eger "b" sutununda herhangi bir satir bossa o satirin hepsini birden silmek istiyorum bunun icin bana yardim edermisiniz simdiden iyi calismalar


ozgurdeniz
 
Re: tum satiri silme

ozgurdenizlioglu' Alıntı:
arkadaslar hazi silme konusuna deginmisken ben mesela eger "b" sutununda herhangi bir satir bossa o satirin hepsini birden silmek istiyorum bunun icin bana yardim edermisiniz simdiden iyi calismalar


ozgurdeniz
Genişletmek için tıkla ...
daha dün sorulmuştu bu soru.
forumu arayın biraz
 
sayın ser973 ve sayın Seyit Tiken arkadaşların verdikleri kodları bir düğmeye atıyorum. normal çalışıyor. üzerinde bir değişiklik yapmak istedim olmadı. hata verdi. bende tekrar eski haline getirdem ancak hata vermeye devam ediyor. düğmeyi silip yeniden oluşturursam hata kayboluyor. bu neden olur acaba?

değiştirmeye çalıştığım ve beceremediğim şey ise şu idi. kodlarda verilen hücre adlarını ben başka bir hücreden aldırmak istiyorum. yani hangi hücreleri sileceğini belirlediğim bir hücreye başvurarak oradan alsın istiyorum.(örn:sayfa 1 de silecekleri yerleri a2 den, sayfa 2 de silecekleri hücrelerin neler olduğunu b2 den alsın) bu değişikliği nasıl yapabilirim? teşekkürler
 
Sayfa ismini bir kontrol edin. Hücre(lerin) kilitli olup olmadığına bir bakın.
Eğer yapamazsanız; ya hücre adreslerini yazın yada örnek bir dosya gönderin.
 
sayın Seyit Tiken, sorum ili ilgili örnek dosya ve ekte.
ayrıca sizin verdiğiniz
Sub Düğme1_Tıklat()
[A5:F6] = ""
Sheets("Sayfa2").[B4:F6] = ""
End Sub
koduna da uyarlarsanız sevinirim.
teşekkürler.
 
Eğer yanlış anlamadıysam : Farklı hücreleri silmek istiyorsunuz. Kodta bulunan hücre adreslerini(harf ve rakamlardan oluşuyor-bitişik) onlarla oynanarak, değiştirerek kendinize göre ayarlayın. Örnek hücre adresi :
[A1] tek hücre adresi. [A1:A20] A1 ile A20 arasındaki hücre aralığı adresi.
Ben soruyu bu şekilde anladım.
 
evet her seferde farklı hücreleri silmek istiyorum. ancak bunu kodla doğrudan oynamakla değil de; örnek dosyada olduğu gibi, kod mesela a2 ve b2 hücrelerine başvurarak nereleri sileceğine bakacak ve orada belirtilen hücreleri silecek şekilde yapmak istiyorum. teşekkürler.
 
Bu kodu bir deneyip kendinize uyarlayın. Mantığa dayalı silme işlemi için, belli bir kriterin olması gerek.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [a1].Value > 0 Then
[a2:b6].ClearContents
End If
End Sub
 
Selamlar,

Ekteki örneği incelermisiniz.
 
sayın COST_CONTROL, istediğim bu idi. emeğinize sağlık. teşekkürler.
sayın Seyit Tiken, sizden de farklı birşey öğrenmiş oldum. sizede çok teşekkür ederim.
 
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst