VBA KODLARIYLA VERİ SATIRI SİLME

slymnytm · 27 Tem 2021

"Veri Girişi" Sayfasından "A5:A100 "aralığındaki değerleri "Veri Dolaşımı" sayfasına alıp burada içerisinde bana lazım olan bilgileri parçalayıp "Veri Alımı" sayfasına yapıştırıyorum burada ise "I1" ve "J1" hücresindeki değerler arasındaki alanı silmek ve kopyala yapıştırma yaptıktan sonra atıl kalan "0" ve " " değerleri olan satırları silmek istiyorum. KISACASI "GRİ RENKLİ ALAN KALSIN İSTİYORUM" ve I1" ve "J1" arasındaki değerlere göre E sütunundaki kırmızı renkli değerlerin silinmesi.

Biraz karışık oldu kusura bakmayın. Şifre 1234567

slymnytm · 28 Tem 2021

Slymnytm' Alıntı:
"Veri Girişi" Sayfasından "A5:A100 "aralığındaki değerleri "Veri Dolaşımı" sayfasına alıp burada içerisinde bana lazım olan bilgileri parçalayıp "Veri Alımı" sayfasına yapıştırıyorum burada ise "I1" ve "J1" hücresindeki değerler arasındaki alanı silmek ve kopyala yapıştırma yaptıktan sonra atıl kalan "0" ve " " değerleri olan satırları silmek istiyorum. KISACASI "GRİ RENKLİ ALAN KALSIN İSTİYORUM" ve I1" ve "J1" arasındaki değerlere göre E sütunundaki kırmızı renkli değerlerin silinmesi.

Biraz karışık oldu kusura bakmayın. Şifre 1234567

??

Ömer BARAN · 28 Tem 2021

@Slymnytm
Bilgisayarda değilim.
Belgenize göz atmıştım.
Kendi yaptığınız işlemleri gözardı edersek benim anladığım şöyle:
-- Ham verilerin ortak özelliği karakter sayılarının hep aynı olduğu,
-- Ham verilerde, ikinci / simgesinden sonraki 4 karakter saat ve dakikayı gösteriyor.
-- Neticede bu saat bilgileri, diğer sayfadaki J1'den büyük, H1'den küçük olanların küçükten büyüğe sılanmış halini istiyorsunuz.
Tabi bu listeye giren satırlardaki hem verilerden bazı parçaları ayrı sütunlarda elde etmek istiyorsunuz.
Doğru anlamış mıyım?

slymnytm · 28 Tem 2021

Kısaca şöyle anlatayım 1. Kodda "E9:E108" aralığında değerler "I1" e eşit veya büyükse ve "J1"e eşit veya küçükse o satırlar silmek istiyorum.

2. Kodda ise "Veri Dolaşımı" sayfasından alıp "Veri Alımı" sayfasına yapıştırdığımda "B9:E108" aralığındaki fazlalık olan "0" ve " " değerleri olan satırları da silmek istiyorum.

slymnytm · 28 Tem 2021

Slymnytm' Alıntı:
Kısaca şöyle anlatayım 1. Kodda "E9:E108" aralığında değerler "I1" e eşit veya büyükse ve "J1"e eşit veya küçükse o satırlar silmek istiyorum.

2. Kodda ise "Veri Dolaşımı" sayfasından alıp "Veri Alımı" sayfasına yapıştırdığımda "B9:E108" aralığındaki fazlalık olan "0" ve " " değerleri olan satırları da silmek istiyorum.

1. RESİM 1. KOD / 2. RESİM 2. KOD

Ömer BARAN · 28 Tem 2021

Belgenize zaten baktığımı belirtmiştim.
Benim yazdığım mesajla ilgili net cevap yazarsanız iyi olur.
Benim anladığım doğruysa, ayrı sayfaya dahi gerek olmadan, belirttiğim koşullara göre listeleme yapılabilir.
Yani tümünü listele sonra gereksizleri sil şeklinde değil de doğrudan koşullara uyan verileri listele şeklinde işlem yapılabilir.

slymnytm · 28 Tem 2021

/ simgesinden sonra bazen saat verileri düşmüyor manüel giriyorum veya boş kalıyor bu şekilde sizin dediğiniz oluyorsa olabilir Ömer Bey

Ömer BARAN · 28 Tem 2021

Saat ve veya dakika kısmı olmadığında ne yapılmalı?
Diyelim
--veri hiç yok saat dakika ne olarak kabul edilecek
--1 karakter var sa saat dakika ne olacak,
o 1 karakter saate mi ait, dakikaya mı?
-- 2 karakter var ne olacak?

Yoksa ham veriye müdahale edip elle ekleme yaptıktan sonra mı işlem yapılacak?

slymnytm · 28 Tem 2021

Hiç veri olmayan kısımlar saat olarak kabul edebiliriz ama bazen kırmızı alanları da silmiyorum tercihe bağlı siliyorum diyelim.

Ömer bey

Sizlere de gönderdiğim gibi 2 kod halinde yapsak olmaz mı

Ömer BARAN · 28 Tem 2021

@Slymnytm
Ben en iyisi, örnek belgenize göre formüllü çözüm önerimi yapayım.
Kontrol edip, denemeler yaparsınız.
Sorun yaşarsanız, belgenizi, sorunlu haliyle ekleyip olması gereken durumu açıklarsanız çözüm gözden geçirilebilir elbette.

Ömer BARAN · 28 Tem 2021

Art arda ikinci cevabım oluyor @Slymnytm .
Önce bundan önceki cevabıma bakınız.

Şimdi ekleyeceğim dosya da ise SARI hücrelerin görünüp/görünmemesiyle ilgili
tercih imkanı mevcut (yani sadece kırmızı olanlar görünmüyor veya kırmızı veya sarı olanlar görünmüyor).

.

slymnytm · 28 Tem 2021

Ömer Bey iki dosyanızı da inceledim farklı bir yaklaşım ama size zahmet vba kodu ile 2 kısım da yapabilme imkanınız mevcut mudur.

Ömer BARAN · 28 Tem 2021

Formüllü yapının sonuçları tam olarak istenildiği gibiyse kodlama işine uygun vakitte bakmaya çalışırım @Slymnytm

slymnytm · 28 Tem 2021

Slymnytm' Alıntı:
Hiç veri olmayan kısımlar saat olarak kabul edebiliriz ama bazen kırmızı alanları da silmiyorum tercihe bağlı siliyorum diyelim.

Ömer bey

Sizlere de gönderdiğim gibi 2 kod halinde yapsak olmaz mı

#9 da belirttiğim gibi bazen kırmızı alanları silmiyorum o yüzden kodlama hususu üzerinde durdum.

İlgi alakanız ve zaman ayırıp uğraştığımız için çok teşekkür ederim.

Ömer BARAN · 29 Tem 2021

@Slymnytm

Ben isteğinizi hala SİLME değil, LİSTELEME olarak görüyorum.

Aşağıdaki kodlardan biri TEK kritere göre (SARI ve GRİ)
diğeri ise İKİ kritere göre (GRİ), VERİ GİRİŞİ sayfasında Q6 hücresinden itibaren listeler.

VBA:

İndirmek için giriş yapmanız gerekmektedir.
(36 satır)

.

slymnytm · 29 Tem 2021

1. Kodlama; Listeleme olarak görebilirsiniz saygı duyarım lakin daha önceden de belirttiğim gibi iki saat dilimi arasındaki verileri (satırları) silmek istiyorum bazen de silmiyorum çünkü içerisinden veri alma durumum oluyor.

2. Kodlama; Kopyalanıp yapıştırılan hücrelerin alt kısmında kalan "0" ve " " boşluk değerlerini de (satırları) otomatik silmek istiyorum.

Yazılan kodlar da aynı hatayı verdi olmadı.

Ömer BARAN · 30 Tem 2021

@Slymnytm
Dikkatten kaçtı sanırım.
Benim verdiğim kodlarda sadece VERİ GİRİŞİ sayfası kullanılıyor ve listelemeler de aynı sayfaya yapılıyor.
Kriter saat bilgilerinin de aynı sayfada olmasını düşünmüştüm.

Her neyse; hem formül hem de makro çözümün olduğu (her ikisi için de TÜMÜ, TEK KRİTER, İKİ KRİTER seçenekleri mevcut)
örnek belge yükleyeyim dedim.

Denemelerinizi bu belge üzerinden yapın ve hata/eksiklikle karşılaşırsanız,
o haliyle belgeyi kaydedip foruma eklerseniz kontrol/düzeltme yapılabilir.

.

slymnytm · 30 Tem 2021

Sn. Baran Bey;

Emekleriniz için teşekkür ederim.
Biraz iletişim aksaklığı yaşasak da sonunda ortaya çok güzel bir çalışma çıkmış.

Saygılarımla

	Excel VBA F2 Enter Kullanma ExcelDepo 29 Kas 2023 Makro Soruları
	Excel VBA Kapalı Dosyaya Veri Yazma Feyzullah 24 Ara 2024 Makro Soruları
	Vba kod revize talebi ycicek 28 Şub 2020 Makro Soruları
	vba kopyala yapıştır berkbaba 14 Ocak 2020 Makro Soruları
	Excel VBA ile DÜŞEYARA Kullanma boyaci 30 Eyl 2024 Makro Soruları