Yerinekoy ve Türkçe karakterleri İngilizce yapma

Yerinekoy ve Türkçe karakterleri İngilizce yapma

  • Konuyu başlatan Konuyu başlatan PriveT
  • Başlangıç tarihi Başlangıç tarihi

PriveT

İlyas PINAROĞLU

Katılım
11 Mar 2019
Mesajlar
1,500
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Makro üstadlarım merhaba,
Sizden bir makro rica ediyorum.

Bu Makro:
A sütunundaki veriyi (A3 hücresi itibariyle) alıp;
- tamamı küçük harf
- aradaki boşluklar yerine nokta
- Türkçe karakterler yerine ingilizce karakterler
olarak düzenlenip G sütununa (G3 hücresi itibariyle) kopyalanacak.

Ayrıca A sütunundaki verilerin (A3 hücresi itibariyle) ilk kelimesini alıp;
- tamamını küçük harf yapıp sonuna 3 basamaklı rastgele bir rakam eklip, H sütununa (H3 hücresi itibariyle) kopyalanacak.

Örnek dosyada olmasını istediğim şeklini gösterdim.

Yardımcı olursanız sevinirim.
İyi günler.
 

Ekli dosyalar

Formül ile çözüm yapılabilir....

Örnek formül ( A3 hücresinde ki değeri istediğiniz şekile çevirir)

[REPLYANDTHANKS]
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
[/REPLYANDTHANKS]
 
Formül ile çözüm yapılabilir....

Örnek formül ( A3 hücresinde ki değeri istediğiniz şekile çevirir)

[Gizlenmiş içerik]
Çözüm için teşekkürler.
Ben de bu şekilde yapıyorum. H3 için de =PARÇAAL(G3;1;BUL(".";G3)-1)&RASTGELEARADA(100;999) kullanıyorum.
Ama bunların MAKRO ile yapılışını merak ettiğim için böyle bir istekte bulundum.
 
Aşağıdaki makro kodunu deneyiniz...

[REPLYANDTHANKS]
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(10 satır)
[/REPLYANDTHANKS]
 
Yapılmak istenilen h sütununa değeri yazmak mı? Yoksa h sütunundaki değeri için aynı şartları mı uygulamak mı?

A sütunundaki verilerin (A3 hücresi itibariyle) ilk kelimesini alıp;
- tamamını küçük harf yapıp sonuna 3 basamaklı rastgele bir rakam eklip, H sütununa (H3 hücresi itibariyle) kopyalamak.
 
A sütunundaki verilerin (A3 hücresi itibariyle) ilk kelimesini alıp;
- tamamını küçük harf yapıp sonuna 3 basamaklı rastgele bir rakam eklip, H sütununa (H3 hücresi itibariyle) kopyalamak.
Yukarıda g sütunu ile ilgili bir durumdan bahsetmemişsiniz :) Açıklamayı tam okumamışım. İlk kelime demişsiniz. En iyisi siz yapılacak işlemi tekrardan yazınız :)
A sütunundan veri alacak mı?
G sütunundan veri alacak mı?
Sayılar gelmeden önce nokta koyulacak mı?
Ve bunlar hangi şartlar altında gelecek?
 
Yukarıda g sütunu ile ilgili bir durumdan bahsetmemişsiniz :) Açıklamayı tam okumamışım. İlk kelime demişsiniz. En iyisi siz yapılacak işlemi tekrardan yazınız :)
A sütunundan veri alacak mı?
G sütunundan veri alacak mı?
Sayılar gelmeden önce nokta koyulacak mı?
Ve bunlar hangi şartlar altında gelecek?
Burada G sütunundan bahsetmeme sebebim siz bunun çözümünü vermiş H sütununu atlamıştınız.
Birinci yorumumu ve yorumdaki dosyamı inceler misiniz?
 
Sayın @PriveT ,
Dalgınlığıma gelmiş :) ilk yazdığınız kısımda gerekli işlemler belirtilmiş :) Dosyayı tekrardan güncelledim...

İlgili kod yapısı:
[REPLYANDTHANKS]
Kod:
İndirmek için giriş yapmanız gerekmektedir.
(19 satır)
[/REPLYANDTHANKS]

Ekli dosyayı inceleyiniz..
 

Ekli dosyalar

Merhaba.
Alternatif olsun.
C:
İndirmek için giriş yapmanız gerekmektedir.
(10 satır)

@Ömer Bey kodlar tam istediğim gibi çalışıyor teşekkür ederim.
Acaba H sütununda oluşturulan, sonu 3 haneli rakamla biten şifreleri sabitleyebilir miyiz?
Yani örneğin önce x satırlık bir veri varken bu kodu kullanarak istediğim veriler oluşturuluyor. Sonra x satırdan itibaren yeni satırlar ekleyip bu yeni veriler için yeniden hazırladığınız kodu kullandığımızda daha önce oluşturduğu 3 haneli rakamlar değişmese? Ve her seferinde böyle sadece yeni eklenenlere bu kodu uygulasa, daha önce üretilen sonu 3 haneli rakam içeren şifreler değişmese?
 
Verdiğim kod'da Next satırının hemen üstündeki iki satırı aşağıdakilerle değiştirin.
VBA:
İndirmek için giriş yapmanız gerekmektedir.
(2 satır)
 
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt