Makro İle Düşeyara

[scoskunsu07]

Merhabalar,

Excelimde yaklaşık 100 adet sheet var. Her sheette özel numaraların olduğu satır var. Ve her sheette doldurulması gereken bir hücre var. Bu hücre 100 sheette de aynı satır ve sütundadır. Bu özel numaraların ve doldurmak istediğim hücreye gelmesi gereken bilginin olduğu bir sheetim var. Düşeyara ile bütün sheetlerdeki doldurmak istediğim hücreye ilgili özel numaranın karşısındaki bilgiyi getirmek istiyorum. Yani kısacası düşeyarayı bütün sheetlere yapmak istiyorum toplu olarak makro ile. Nasıl yapabileceğim konusunda yardımcı olabilir misiniz. Ekte resimleri gönderdim

https://www.hizliresim.com/k6baajl
https://www.hizliresim.com/71n65vx

 

[Mdemir63]

Selamlar
Sitemize Hoş geldiniz.
Gerçek bilgilerinizin olmadığı ancak yapısı aynı olan örnek dosya yükleyerek link verirseniz,
Sorularınıza daha çabuk yanıtlar alırsınız.

 

[Mdemir63]

Selamlar
Dosyayı inceleyiniz.
Belki işinize yarar

İndir

 

[scoskunsu07]

Selamlar
Dosyayı inceleyiniz.
Belki işinize yarar

İndir

Çok Teşekkür Ederim. Birkaç değişiklik yaparak işime yarar hale getirebilirim atmış olduğunuz kodu. Bir sorum daha olacak 10 haneli bir ünvan var ben sadece ilk 6 hanesi gelmesini istiyorum makro olarak nasıl kısaltabilirim ünvanı

 

[Mdemir63]

Selamlar
Unvan A1 Hücresinde ise
B1 Hücresine soldan 6 haneyi alabilir siniz.

Range("B1")=Left(Range("A1"),6)

 

[scoskunsu07]

Selamlar
Unvan A1 Hücresinde ise
B1 Hücresine soldan 6 haneyi alabilir siniz.

Range("B1")=Left(Range("A1"),6)

Teşekkürler

 

[scoskunsu07]

Selamlar
Unvan A1 Hücresinde ise
B1 Hücresine soldan 6 haneyi alabilir siniz.

Range("B1")=Left(Range("A1"),6)

Soldan 6 haneyi alıp yine aynı hücreye yazdırabilir miyiz peki

 

[Mdemir63]

Selamlar

AynıHucre = Left(Range("A1"), 6)
Range("A1") = AynıHucre