Epakambalaj
Normal Üye
- Excel Versiyonu
- Excel 2016
- Excel Sürümü
- 64 Bit
- Excel Dili
- Türkçe
Hayırlı sabahlar kıymetli hocalarım ve sayfa takipçileri 
E
Çözüldü Başka hücreden veriyi sabit olarak çekme.
- Konuyu başlatan Epakambalaj
- Başlangıç tarihi
Ben öyle bir duruma rastlamadım.
B sütunundaki hücrede kopyala yapıştır, elle yazma gibi işlem yapmadan kod devreye girmez.
Gerçek belgenizde B sütununa nasıl veri yazdığınızı ya da örneğin sayfada B sütununa yönelik olarak çalışan ve
F2+ENTER gibi işlem yapan bir makro kodu var mıdır, bilemiyorum tabi.
Verdiğim kodun devreye girmesini sağlayan koşul aynen şöyle;
If (Target.Column = 1 Or Target.Column = 2 Or Target.Column = 4) And Target.Row > 1 Then
Yani; işlem yapılan sütunun sütun numarası 1, 2 veya 4 (A, B, D sütunları) ve işlem yapılan satır numarası 1'den büyükse kod devreye girer.
Bu koşul sağlandıktan sonra da satır numarasına yönelik diğer kontrollere (alttaki If ve Elseif satırları) geçilir.
Sütun koşulu sağlandığında gerçekleşen satır kontrolleri;
-- işlem yapılan satır, 8, 40, 72.... gibi Adres satırlarının bir altındaki satır mıdır?
-- işlem satır, 33, 65 gibi Toplam satırlarının 3 satır sonrası kıdı?
-- işlem satırı, 10-29 veya 42-61..... gibi elle veri yazılmak için ayrılan ürün adlarının yazılacağı satır mıdır?
Yani R, S sütunlarında ne yaparsanız yapın, kod devreye girmez, R, S sütunlarında değişiklik yapıldıktan sonra
B sütunundaki ürün adını yazarsanız yeni haline göre veri yazılır, önceki yazılan hücreler etkilenmez.
Tahminim o ki; örnek belgeniz, gerçek belgenizin bir kopyası (formüller/makrolar vs içinde olmalı) değil ve
bu durumda da yapabileceğimiz bir şey kalmıyor malesef.
Verdiğim kodu, foruma eklediğinibelgeye uygulayıp bu belge üzerinde denemeler yaptığınıza emin misiniz?
.
B sütunundaki hücrede kopyala yapıştır, elle yazma gibi işlem yapmadan kod devreye girmez.
Gerçek belgenizde B sütununa nasıl veri yazdığınızı ya da örneğin sayfada B sütununa yönelik olarak çalışan ve
F2+ENTER gibi işlem yapan bir makro kodu var mıdır, bilemiyorum tabi.
Verdiğim kodun devreye girmesini sağlayan koşul aynen şöyle;
If (Target.Column = 1 Or Target.Column = 2 Or Target.Column = 4) And Target.Row > 1 Then
Yani; işlem yapılan sütunun sütun numarası 1, 2 veya 4 (A, B, D sütunları) ve işlem yapılan satır numarası 1'den büyükse kod devreye girer.
Bu koşul sağlandıktan sonra da satır numarasına yönelik diğer kontrollere (alttaki If ve Elseif satırları) geçilir.
Sütun koşulu sağlandığında gerçekleşen satır kontrolleri;
-- işlem yapılan satır, 8, 40, 72.... gibi Adres satırlarının bir altındaki satır mıdır?
-- işlem satır, 33, 65 gibi Toplam satırlarının 3 satır sonrası kıdı?
-- işlem satırı, 10-29 veya 42-61..... gibi elle veri yazılmak için ayrılan ürün adlarının yazılacağı satır mıdır?
Yani R, S sütunlarında ne yaparsanız yapın, kod devreye girmez, R, S sütunlarında değişiklik yapıldıktan sonra
B sütunundaki ürün adını yazarsanız yeni haline göre veri yazılır, önceki yazılan hücreler etkilenmez.
Tahminim o ki; örnek belgeniz, gerçek belgenizin bir kopyası (formüller/makrolar vs içinde olmalı) değil ve
bu durumda da yapabileceğimiz bir şey kalmıyor malesef.
Verdiğim kodu, foruma eklediğinibelgeye uygulayıp bu belge üzerinde denemeler yaptığınıza emin misiniz?
.
Epakambalaj
Normal Üye
sorun anlaşıldı hocam.
kopyala yapıştır kısmında ufak bir sorun çıkıyormuş.
J hücresinden kopyaladığımız "küçük renkli poşet" yazısını, B hücresine yapıştır yapınca sorunsuz çalışıyor.
fakat I hücresine "5" yazdığımızda, J hücresine "küçük renkli poşet" yazdığımızda yani "5 küçük renkli poşet" şeklinde iki hücreyi birden kopyalayıp, sonra A sütununa yapıştırdığımızda kod çalışmıyor.
özetle tek hücreyi yapıştırınca çalışan kod, iki hücreyi aynı anda yapıştırınca çalışmıyor.
bunun çözümü var mı hocam.
kopyala yapıştır kısmında ufak bir sorun çıkıyormuş.
J hücresinden kopyaladığımız "küçük renkli poşet" yazısını, B hücresine yapıştır yapınca sorunsuz çalışıyor.
fakat I hücresine "5" yazdığımızda, J hücresine "küçük renkli poşet" yazdığımızda yani "5 küçük renkli poşet" şeklinde iki hücreyi birden kopyalayıp, sonra A sütununa yapıştırdığımızda kod çalışmıyor.
özetle tek hücreyi yapıştırınca çalışan kod, iki hücreyi aynı anda yapıştırınca çalışmıyor.
bunun çözümü var mı hocam.
Epakambalaj
Normal Üye
Hayırlı günler hocam.
eklediğim dosyada, daha önceki yaptığımız kodlamayı güncellememiz gerekti.
kopyala yapıştır işleminde kodlar çalışmadığı için bu yola başvurduk.
istediğimiz kod:
F hücresine miktar girdiğimizde, G hücresindeki ürünün geliş fiyatını I hücresine kalıcı olarak çekmek istiyoruz.
ayrıca bunu J-K-M hücrelerinde de almak istiyoruz.
yardımcı olabilir misiniz hocam?
Merhabalar Sn. Epak ambalaj
Ekteki dosyayı dener misiniz?
Ekteki dosyayı dener misiniz?
Epakambalaj
Normal Üye
ellerinize sağlık hocam. Allah razı olsun.
hayırlı günler diliyorum.
Epakambalaj
Normal Üye
hocam G3-G34 ve K3-K34 içerisinde (62 ürünlük listede) aynı ürün 2 defa yazılırsa uyarı almak istiyoruz..
G35-G66 ve K35-K66
G67-G98 ve K67-K98
bu şekilde aşağı doğru (8002'ye kadar) 250 sayfamız var.
şimdiden tekrar teşekkür ediyorum.
G35-G66 ve K35-K66
G67-G98 ve K67-K98
bu şekilde aşağı doğru (8002'ye kadar) 250 sayfamız var.
şimdiden tekrar teşekkür ediyorum.
Merhabalar Sn. Epak ambalaj
ThisWorkbook (BuÇalışmaKitabı) bölümüne aşağıdaki kodları ekleyiniz.
- Bu kod tüm sayfalarda G ve K sütunu için kontrol yapar.
- Aynı ürün varsa Mesaj Kutusu ile Hücre Adresini gösterir ve Yeni Kayıt yapılan hücre içeriğini temizler.
ThisWorkbook (BuÇalışmaKitabı) bölümüne aşağıdaki kodları ekleyiniz.
- Bu kod tüm sayfalarda G ve K sütunu için kontrol yapar.
- Aynı ürün varsa Mesaj Kutusu ile Hücre Adresini gösterir ve Yeni Kayıt yapılan hücre içeriğini temizler.
VBA:
Görüntülemek için giriş yapmanız gerekmektedir.
(26 satır)Epakambalaj
Normal Üye
hocam örnek dosyada belirtmeye çalıştım.
E sutununda liste aralığını belirttim.
o şekilde aşağı doğru 250 ayrı sayfa kullanıyoruz.
her sayfa aralığı içinde 62 kalem ürün listesi almak istiyoruz.
örnek G8 de olan ürünün aynısı, K12 de olsa uyarı almak istiyoruz.
silinmesine gerek yok, uyarı almamız yeterli olur.
özür diliyorum, vaktinizi alıyorum.
teşekkür ediyorum.
Merhabalar Sn. Epak ambalaj
Bir süredir işlerden dolayı Foruma zaman ayıramıyorum ancak sorunuzun
Belirli listede aynı ürün 2. kez yazıldığında uyarı almak istiyoruz.
başlıklı konu ile çözülmesine sevindim.
Saygılarımla, iyi çalışmalar.
Bir süredir işlerden dolayı Foruma zaman ayıramıyorum ancak sorunuzun
Belirli listede aynı ürün 2. kez yazıldığında uyarı almak istiyoruz.
başlıklı konu ile çözülmesine sevindim.
Saygılarımla, iyi çalışmalar.
Epakambalaj
Normal Üye
Merhabalar Sn. Epak ambalaj
Bir süredir işlerden dolayı Foruma zaman ayıramıyorum ancak sorunuzun
Belirli listede aynı ürün 2. kez yazıldığında uyarı almak istiyoruz.
başlıklı konu ile çözülmesine sevindim.
Saygılarımla, iyi çalışmalar.
Hayırlı sabahlar hocam
Sizinde emeğiniz/hakkınız geçti, vaktinizi aldık.
Çok teşekkür ediyorum. Allah Râzı Olsun.
Allâh kolaylık versin. Hayırlı çalışmalar hocam.
Amin, cümlemizden razı olsun inşallah.
Ben teşekkür ederim.
İyi çalışmalar.
Ben teşekkür ederim.
İyi çalışmalar.
