• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Eşleşmeye göre satır ekleme

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

seng

Yeni Üye
Katılım
7 Nis 2021
Mesajlar
807
Çözümler
1
Aldığı beğeni
94
Excel V
Office 2013 EN
Konu Sahibi
Arkadaşlar herkese selamlar, ekteki excelde veri sayfasında olan verileri ozet sayfasına getirmek istiyorum. Eğer ozet sayfasında eklenecek c sütununda geçen değer ozet sayfasında B sütunu ıle aynı ıse onun altına bır satır acıp eklemesını ıstıyorum. Eğer veri sayfasında c sütununda ozette b sütununda hıc olmayan bır deger var ıse de en alt satıra eklesın ıstıyorum nasıl yapabilirim? Şimdiden çok teşekkür ederim.
 
Hem ozet sayfasında hem de veri sayfasında
KOD sütun başlığı altındaki veriler düzensiz.
ozet sayfasında metin biçiminde veri sayfasında
karışık biçimde. Bu veriler sayısal olarak mı
yoksa metin olarak mı değerlendirilecek.
 
Konu Sahibi
Hem ozet sayfasında hem de veri sayfasında
KOD sütun başlığı altındaki veriler düzensiz.
ozet sayfasında metin biçiminde veri sayfasında
karışık biçimde. Bu veriler sayısal olarak mı
yoksa metin olarak mı değerlendirilecek.

Veriler sayısaldır hocam.
 
Merhabalar

HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Karşılaştırma yapmak için dosyanız epeyce sıkıntılı.
Keşke daha düzenli veriler içeren bir dosya ekleyebilseydiniz.
Karşılaştırma yapabilmeniz için Sayfa1 de J sütununa listeledim.
Eğer doğruysa
'S1.Range("A2:C1048576").ClearContents satırındaki kesme işaretini
kaldırarak satırı aktif hale getirin.
S1.Columns(10 And 11 And 12 And 13).ClearContents satırının başına
kesme işareti koyarak pasif hale getirin. Şöyle olacak('S1.Columns(10 And 11 And 12 And 13).ClearContents)
S1.Cells(2, 10).Resize(say_bnz, 3).Value = (arrB) satırınıda
S1.Cells(2, 1).Resize(say_bnz, 3).Value = (arrB) olarak düzeltin.
Kolay gelsin.
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Konu Sahibi
Karşılaştırma yapmak için dosyanız epeyce sıkıntılı.
Keşke daha düzenli veriler içeren bir dosya ekleyebilseydiniz.
Karşılaştırma yapabilmeniz için Sayfa1 de J sütununa listeledim.
Eğer doğruysa
'S1.Range("A2:C1048576").ClearContents satırındaki kesme işaretini
kaldırarak satırı aktif hale getirin.
S1.Columns(10 And 11 And 12 And 13).ClearContents satırının başına
kesme işareti koyarak pasif hale getirin. Şöyle olacak('S1.Columns(10 And 11 And 12 And 13).ClearContents)
S1.Cells(2, 10).Resize(say_bnz, 3).Value = (arrB) satırınıda
S1.Cells(2, 1).Resize(say_bnz, 3).Value = (arrB) olarak düzeltin.
Kolay gelsin.
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Hocam merhaba, denedım ancak j ye aldı ekleme yapmadı dıgerlerını.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst