Kelime Kelime Tercüme Yapmak

[baydeniro]

Merhaba arkadaşlar. Excel makro yardımı ile kelime kelime tercüme yapmak mümkün müdür ? Bir cümle içinde geçen kelimelerden tercüme sayfasında kayıtlı olanlarım karşılıklarını başka bir sütuna çevirerek aktarmak mümkün mü ?

Ekteki dosyada 2 adet sayfa var :
1) TERCUME : Tercümeye konu olan kelimelerin yazıldığı sayfa

2) KAYIT : İlgili konunun kayıt sayfası. Tercüme edilecek kelimeler Açıklama sütununda bulunmaktadır. Açıklama sütununda (D) yer alan verileri TERCUME sayfasındaki karşılıklarına göre kelime kelime biçiminde Explanation (G) sütununa aktarmak mümkün mü ?

 

[uzmanamele]

merhaba
geniş bir kelime listeniz olması lazım, bu listeyi oluşturuncaya kadar zaten tercüme edersiniz
www.exasystem.com adresinden 6 dilde sözlük programını indirebilirsiniz, çok kullanışlı.

ek dosya size fikir verebilir.

 

[baydeniro]

Sayın uzmanamele ilginiz ve yardımınız için çok teşekkür ederim. Linkini verdğiniz programn gerçekten çok güzel bir program.

Benim aradığım çözüm sadece lisan için başka konularda da olabileceği için bunu yapabilecek bir makrı arayışındayım !!!

 

[baydeniro]

Arkadaşlar bu konuda fikri olan var mı ?

 

[mbankaar]

Sözlük

Sub sozluk()
'Sayfa1'de a ve b sütunlarında 500'er kelime Türkçe ve karşılığı da aynı satırda İngilizcelerinin olduğunu varsayalım

'Kelimelerimizi içine koymak için hafızada yer ayırırız
Dim Türkçe(500), İngilizce(500)

Sheets("Sayfa1").Select
'Kelimelerimizi hafızaya alırız

For kelimeler = 1 To 500

Türkçe(kelimeler) = Cells(kelimeler, 1)
İngilizce(kelimeler) = Cells(kelimeler, 2)

Next kelimeler

'Sayfa2'de metnin yer aldığını varsayıyoruz
Sheets("Sayfa2").Select
'her İngilizce kelimeyi Türkçe karşılığıyla değiştiriyoruz

For kelimeler = 1 To 500

Selection.Replace What:=İngilizce(kelimeler), Replacement:=Türkçe(kelimeler)

Next kelimeler

End Sub

 

[baydeniro]

Teşekkürler

Sayın mbankaar ilginize ve yardımınıza çok teşekkür ederim. Ayrıca forum adına da minnettarlığımı bildirmek istiyorum. Forum çok çok yararlı bir konuda çözüm üretmiş oldu. Allah sizin beyinleri Türkiye'den eksik etmesin, sizler var oldukça sırtımız yere gelmez. Allah sizden razı olsun, işinizi gücünüzü rast getirsin, rızkınız bol olsun. Sağlıcakla kalın.

 

[mbankaar]

Rica ederim. İnşallah işinize yaramıştır.