Hücre ismi değiştirme Makrosu

[haimow]

Merhaba,

Çok sayıda isminin değişmesini istediğim satırlarım var, ve bu her hafta yaptığım ama satırları sabit olmayan bir excelde.
İstediğim şey sadece isim değişikliği ile ilgili makro kodunu bana verebilirseniz ben içini istediğim kelimeler ile doldurabilirim.

Örnek;
Mevcut kelime : Vakif Bank - Tahsildeki Çekle
Olması İstenen: VAKIF

Bunun gibi çok fazla örnek var.

Teşekkürler

 

[Emir Hüseyin Çoban]

. . .

Sub kod()
[COLOR="DarkGreen"]'Range("A:B"):hücre aralığı
'cells: tüm tablo  cells.replace gibi...[/COLOR]
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"
End Sub

. . .

 

[haimow]

Emir Bey,

Cevabınız için teşekkürler, bütün istediğim kelimeleri aşağıdaki şekilde mi sıralamam gerekir.

Sub kod()
'Range("A:B"):hücre aralığı
'cells: tüm tablo  cells.replace gibi...
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"
    Range("A:B").Replace What:="eski kelime", Replacement:="yeni kelin"

End Sub

 

[Emir Hüseyin Çoban]

.

Bu sekilde yapabilirsiniz. Dogru.

.

 

[haimow]

Emir Bey,

Belirttiğiniz kodda yer alan Range("A:B") sadece A ve B sütunlarını mı kapsıyor, boş bir excelde verdiğiniz kodlar ile çalıştırdım fakat kendi dosyama alınca nedense beceremedim.
Örnek dosyam ekteki gibidir.

Teşekkürler

 

[Emir Hüseyin Çoban]

.

Kodlarda range("A:B") kısmı değişikliği bu sütunlarda yapması için sınır belirtir.
Siz "E:E" veya "E:F" gibi değişiklikler yapabilirsiniz.

. . .

 

[haimow]

Teşekkürler ben baştakini değiştirip aşağıdakileri değiştirmemişim

Bu makroyu uyguladığım kitabın hepsinde, yani her açacağım yeni sayfada da geçerli olmasını nasıl sağlarım ?

Birde sütun silme kodunu yazabilir misiniz ? A sütununu nasıl silerim mesela ve bu kodun altına onu ekleyeceğim.

 

[Emir Hüseyin Çoban]

. . .

Sütun silmek için kodlar.
Columns("A:A").Delete

Tüm tablolarda çalıştırmak için PERSONAL tablosunda çalıştırabilirsiniz. Belirttiğim ifade ile forumda aratınız.

. . .

 

[Emir Hüseyin Çoban]

Bu makroyu uyguladığım kitabın hepsinde, yani her açacağım yeni sayfada da geçerli olmasını nasıl sağlarım ?

.

Bu kısmı tam anlamadım.

• Açmış olduğunuz 1 tane excel kitabında tüm çalışma sayfalarında mı çalıştırmak istiyorsunuz ve
  1 tıklama ile tüm sayfaları mı kontrol edecek yoksa sayfalarda siz tek tek çalıştıracak mısınız.

• Açacağınız tüm yeni excel kitaplarında mı çalıştırmak istiyorsunuz.

. . .

 

[haimow]

Emir Bey,

PERSONEL.xls sorumun cevabıydı sanırım yanlış anlattım ondan karıştı iş.

Bütün sorularımın cevabını almış oldum, çok teşekkürler.

İyi Çalışmalar