Çözüldü Sadece Büyük harfli kelimeleri alma

Merhaba,

Dosyanızı eklerseniz, alacağınız desteğin süresi ve çözümü çok daha kolay olacaktır.

İyi çalışmalar,

Örnek dosya ekledim...

Barkın bey, H sütununda görmek istediğiniz bir kaç veriyi yazar mısınız?

@Barkın

Sayfada F ve sağa doğru sütunların BOŞ olduğu varsayımıyla (varsa F ve devamı sütunlardaki veriler silinir) aşağıdaki kod kullanılabilir.

Ömer BARAN' Alıntı:

@Barkın

Sayfada F ve sağa doğru sütunların BOŞ olduğu varsayımıyla (varsa F ve devamı sütunlardaki veriler silinir) aşağıdaki kod kullanılabilir.

VBA:

You must log in to view content
(19 satır)

Genişletmek için tıklayın ...

Ömer bey, kod büyük oranda işime yaradı. Teşekkür ederim.

Şöyle bir durum var; eğer isim ve soyisim arasında iki boşluk varsa en sağda kalan soyadını alıyor, adı almıyor. MUSTAFA KURT; Mustafa ile Kurt arasında iki veya daha fazla boşluk varsa sadece KURT'u alıyor. Bankanın sitesinden indirdiğim orijinal dosyada bu tür isimler var.

Merhaba,

Kodların en başına;Cells.Replace What:=" ", Replacement:=" " yazın, iki boşlukları tek boşluğa düşürür.

@Barkın
Eklenen örnek belgede bazı ad soyadların arasına 2'den fazla sayıda boşluk eklediğimde de sorun görmedim.
En iyisi yeni bir örnek belgede durumu örneklendirin, örnek elge üzerinden kontrol yapılsın.
Örnek veriyi elle yazmayın, gerçek bir veriden kopyala yapıştır yaparak alana aktarın.

.

Merhaba..
Güzel bir REGEX VBA sorusu. Şu kodu denermisiniz:

Admin' Alıntı:

Merhaba,

Kodların en başına;Cells.Replace What:=" ", Replacement:=" " yazın, iki boşlukları tek boşluğa düşürür.

Genişletmek için tıklayın ...

Kodu ilave edince sorun çözüldü. Teşekkürler

Ömer BARAN' Alıntı:

@Barkın
Eklenen örnek belgede bazı ad soyadların arasına 2'den fazla sayıda boşluk eklediğimde de sorun görmedim.
En iyisi yeni bir örnek belgede durumu örneklendirin, örnek elge üzerinden kontrol yapılsın.
Örnek veriyi elle yazmayın, gerçek bir veriden kopyala yapıştır yaparak alana aktarın.

.

Genişletmek için tıklayın ...

Banka dosyasındak gerçek veriler, gerçek veri ve isimlerden oluştuğu için, dosyayı dediğiniz şekilde yüklemek istemedim. Bazı sorunları önceden farkedemiyoruz...

Selman' Alıntı:

Merhaba..
Güzel bir REGEX VBA sorusu. Şu kodu denermisiniz:

CPP:

You must log in to view content
(15 satır)

Genişletmek için tıklayın ...

Selman bey teşekkür ederim, sorunsuz çalıştı.

İlgilenen herkese teşekkürler..