VERİLERİ KULLANARAK ÇEVİRİ YAPMAK.

[ismail-34]

Değerli Excel web hocalarıma selamlar saygılar.

Benim sorum O sütunundaki verileri kullanılarak formun çevirisinin yapılması üzerine olacak.Çeviri örnekteki gibi aşağıda (sarı bölgede) değil yine yeşil bölgede yani çevrilenin tam üstünde (yeşil alanda) olmasını istiyorum.Sarı bölgeyi sadece nasıl çevrildiğini göstermek için oluşturdum.

Şimdiden çok çok teşekkürlerimi bir borç bilirim.

 

[ismail-34]

çözümü olan yokmu

 

[Levent Menteşoğlu]

Aşağıdaki kodu deneyin. N sütunundaki adreslere O sütunundaki verileri yazar.

Sub cevir()

For a = 4 To Cells(Rows.Count, "N").End(3).Row

adres = Replace(Cells(a, "N"), "=", "")
Range(adres) = Cells(a, "O")

Next

End Sub

 

[ismail-34]

Aşağıdaki kodu deneyin. N sütunundaki adreslere O sütunundaki verileri yazar.

Sub cevir()

For a = 4 To Cells(Rows.Count, "N").End(3).Row

adres = Replace(Cells(a, "N"), "=", "")
Range(adres) = Cells(a, "O")

Next

End Sub

Levent Hocam Harika olmuş.Harikasınız Çok teşekkür ederim.
Sayfadaki Sabit Terimlerin çevirileri için çok güzel bir eser oldu.Sağlıcakla kalın.