[Yardım]  Checkbox'a göre Excelde sütun silmek veya silmemek

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#1)  gkhnozn0641 » 19 Eyl 2022 20:41

Öncelikle merhabalar, bir proje üzerinde çalışıyorum ve bir yerde takıldım çıldırmak üzereyim. Lütfen yardım.
İstediğim şey şu: Bir filtreleme işlemi gerçekleştiriyorum ve neticesinde bu filtrelediğim verileri istediğim bir klasöre aktarıyorum. Fakat aktarırken listbox içerisinde hangi kolonların yazdırılmasını checkbox'lar yardımıyla seçmek istiyorum. Ekteki çalışmamda göreceğiniz üzere yaptığım şey önce bütün sütunları eklemek ve seçmediğim checkboxa göre o seçmediklerimi excelden silmek, seçtiklerimin ise kalmasını sağlamak. Lakin yapmak istediğim işlem sağlıklı sonuç vermiyor. Lütfen Yardım. Teşekkür ederim şimdiden.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

Yıllık Maaş Bordrosu Hesaplama 2022

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#2)  gkhnozn0641 » 19 Eyl 2022 20:43

Bildirimi açmayı unutmuşum.
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#3)  gkhnozn0641 » 19 Eyl 2022 22:17

Sorunu buldum fakat çözümüne ulaşamıyorum. Sorun şu ben Checkbox1 isaretli degilse A sutununu sil diyorum checkbox2 isaretli degilse B sutunu sil diyorum ve bu sirayla 17 ye kadar devam ediyor. Fakat diyelim A silindi bu kez benim b dedigim aslinda c sutununa denk geliyor A silinip sütun kaydığı için. Bunu nasil engelleyebilirim, yani checkbox1 isaretli degilse A sutunu, checkbox2 isaretli degilse b sutunu, checkbox3 isaretli degilse c sutunu diye devam ederek silmek istiyorum. Yardim lütfen.
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#4)  gkhnozn0641 » 19 Eyl 2022 23:55

Yanlışlıkla şifreli göndermişim. Kusura bakmayın.

Şifre: gokhan0641
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#5)  şahin » 20 Eyl 2022 00:41

Ekte

EXCEL_FİLTRELEME.rar
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
şahin
Site Dostu
 
Kayıt: 30 Eyl 2016 23:24
Meslek: memur
Yaş: 33
İleti: 1234
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#6)  gkhnozn0641 » 20 Eyl 2022 00:52

Hocam elinize sağlık çok güzel olmuş fakat bunu checkboxlar ile yapmak mümkün değil miydi acaba?
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#7)  gkhnozn0641 » 20 Eyl 2022 00:54

Çünkü checkboxlara ayrıca başka şeylerde bağlamıştım fakat şimdi onlar olmayinca yaptığım diger calismalarda boşa gitmis oluyor
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#8)  şahin » 21 Eyl 2022 23:06

Kod: Tümünü seç
If CheckBox1.Value = False Then Columns("A:A").EntireColumn.Delete
'   If CheckBox2.Value = False Then Columns("B:B").EntireColumn.Delete

tek tek sildirmek yerine
bu şekilde sildir süntunları (yukardaki kodların yerine aşağıdakileri ekle)>>

Kod: Tümünü seç
sutunlar = Array("", "A:A", "B:B", "C:C", "D:D", "E:E", "F:F", "G:G", "H:H", "I:I", "J:j", "K:K", "L:L", "M:M", "N:N", "O:O", "P:P", "Q:Q")
For i = 1 To 16
      If Me.Controls("Checkbox" & i).Value = False Then
         silinecek = silinecek & sutunlar(i) & ","
      End If
Next i
    Range(Left(silinecek, Len(silinecek) - 1)).Delete Shift:=xlToLeft
Kullanıcı avatarı
şahin
Site Dostu
 
Kayıt: 30 Eyl 2016 23:24
Meslek: memur
Yaş: 33
İleti: 1234
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa

Cevap: Checkbox'a göre Excelde sütun silmek veya silmemek

İleti#9)  gkhnozn0641 » 22 Eyl 2022 16:23

Çok teşekkür ederim.
Kullanıcı avatarı
gkhnozn0641
Yeni Başlamış
 
Kayıt: 03 Eyl 2022 00:24
Meslek: Mühendis
Yaş: 28
İleti: 42
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Van


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Bing[Bot], nsynsy ve 0 misafir

Bumerang - Yazarkafe