Gelen Veride Boş Hücreleri Gizleme

Listeleme kutusu. Verileriniz klasör ve dosyalarınızı görsel olarak kontrol edebileceğiniz bir nesne modeli.

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#41)  feraz » 24 Eyl 2017 04:05

Bu dosyayı deneyebilirsiniz.

Excel aç - kapat düğmesi ekledim.

Yazdırmada görüntüleme ekranı geliyor oran yazdırabilirsiniz.
Koddaki .PrintOut Preview:=True yerine .PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False yazarsanız direkt yazma işlemi olur.

Excel bazen bende kapanmıyor sizdede aynısı oluyor mu?
Görev Yöneticinden kapatmak zorunda kalıyorum.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 19:36
Konum: Almanya
Meslek: İşçi
Yaş: 39
İleti: 5042
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#42)  feraz » 24 Eyl 2017 04:36

Veri eklemede de düzelttim biraz.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 19:36
Konum: Almanya
Meslek: İşçi
Yaş: 39
İleti: 5042
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#43)  gencturkk » 24 Eyl 2017 10:59

X tuşuna basınca dediğiniz gibi excel artık kapanmıyor. Sadece userform'u gizliyor. Ayrıca, artık userform ekrana ortalı açılmıyor. Koduna baktım önceki gibi ama ortalamıyor. Birşey olurken diğeri oynuyor [yummy]
Kullanıcı avatarı
gencturkk
Siteye Alışmış
 
Kayıt: 27 Arl 2016 23:05
Meslek: memur
Yaş: 39
İleti: 155
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#44)  gencturkk » 24 Eyl 2017 11:26

X'e basınca kapanmaası tamam ancak ortalamasını halledemedim. UserForm1.StartUpPosition = 2 ama UserForm1.StartUpPosition = 3 gibi açıyıor. Fark ederseniz ilk başta ortada açıyor ama ardından sola yaslıyor.
Kullanıcı avatarı
gencturkk
Siteye Alışmış
 
Kayıt: 27 Arl 2016 23:05
Meslek: memur
Yaş: 39
İleti: 155
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

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

Cevap: Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#45)  feraz » 24 Eyl 2017 12:01

gencturkk yazdı:X'e basınca kapanmaası tamam ancak ortalamasını halledemedim. UserForm1.StartUpPosition = 2 ama UserForm1.StartUpPosition = 3 gibi açıyıor. Fark ederseniz ilk başta ortada açıyor ama ardından sola yaslıyor.


Birde ben deneyeyim akşam ortada açılma olayını.

Eğer veriler çok olaçaksa veri güncelleme kodu bence kasar bilgisayarı.

Döngü yerine find komutuyla daha pratik olurdu.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 19:36
Konum: Almanya
Meslek: İşçi
Yaş: 39
İleti: 5042
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#46)  gencturkk » 24 Eyl 2017 12:31

Şuan ki verim 3038 satır. Daha da artacak. O bahsettiğiniz koda örnek verebilir misiniz?
Kullanıcı avatarı
gencturkk
Siteye Alışmış
 
Kayıt: 27 Arl 2016 23:05
Meslek: memur
Yaş: 39
İleti: 155
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#47)  feraz » 24 Eyl 2017 12:46

Dim bul as range
Set bul = sayfa1.Range ("B:B").find (TcNo Teextbox.Value,,,1)

İf not bul is nothing then
Bul.value=Textbox1.value + 0 ' 0 Yeşil hata için metinsel (yazmıştınız)
Bul.offset (0,1).value=Textbox2.value
Bul.offset (0,-1).value= Textbox3.value
Gibi......
Else
Mesajkutusu
Exit sub
End if

Kodları telefonda kafadan yazdığım için harf hatası felan olabilir.
Kod mantığı böyle.Yani döngüye gerek yok.
Kullanıcı avatarı
feraz
Site Dostu
 
Kayıt: 19 May 2014 19:36
Konum: Almanya
Meslek: İşçi
Yaş: 39
İleti: 5042
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Aksaray

Cevap: Gelen Veride Boş Hücreleri Gizleme

İleti#48)  gencturkk » 24 Eyl 2017 19:07

Tamam üstad. Deniyeyim.
Kullanıcı avatarı
gencturkk
Siteye Alışmış
 
Kayıt: 27 Arl 2016 23:05
Meslek: memur
Yaş: 39
İleti: 155
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Önceki

Forum ListView

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe