Ismin baş harfi büyük soy isim tamamen büyük olarak yazılması için

turgayzeynep · 18 Ağustos 2025

=EĞERHATA(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1)));"")

Hocam kolay gelsin İyi çalışmalar rica etsem bu formüle ek olarak ismin baş harfi büyük soyisim tamamen büyük olarak nasıl bir ekleme yapabilirim Formula bir yardımcı olabilir misiniz Aciliyeti var Şimdiden teşekkür ederim

muhasebeciyiz · 18 Ağustos 2025

Maalesef Excel’de Türkçe karakterleri tam doğru işleyecek yerleşik bir "Yazım Düzeni" (Proper Case) fonksiyonu yoktur. YAZIM.DÜZENİ() fonksiyonu vardır, ancak Türkçe özel karakterlerde (ç, ğ, ı, ö, ş, ü) sorunlar yaratabilir.

Kod:

=EĞERHATA(YAZIM.DÜZENİ(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!M$2:M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR(B$2:B$100)-SATIR(B$2)+1);SATIR(A1))));"")

veya

Kod:

=EĞERHATA(BÜYÜKHARF(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!M$2:M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR(B$2:B$100)-SATIR(B$2)+1);SATIR(A1))));"")

turgayzeynep · 18 Ağustos 2025

muhasebeciyiz' Alıntı:

Maalesef Excel’de Türkçe karakterleri tam doğru işleyecek yerleşik bir "Yazım Düzeni" (Proper Case) fonksiyonu yoktur. YAZIM.DÜZENİ() fonksiyonu vardır, ancak Türkçe özel karakterlerde (ç, ğ, ı, ö, ş, ü) sorunlar yaratabilir.

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOL(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1))))-1)) & " " & BÜYÜKHARF(PARÇAAL(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1))))+1;UZUNLUK(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1))))));"")

veya

Kod:

=EĞERHATA(BÜYÜKHARF(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!M$2:M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR(B$2:B$100)-SATIR(B$2)+1);SATIR(A1))));"")

Hocam formülü çalıştıramadım ama ben ek olarak size atayım sayfayı orada düzenleme yapıp tekrar paylaşabilir misiniz rica etsem iki tane çalışma sayfası var Gerekli bilgilendirmeleri sayfanın içerisine yazdım

muhasebeciyiz · 18 Ağustos 2025

=EĞERHATA(YAZIM.DÜZENİ(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1))));"") "Ali Veli" yazmakta

=EĞERHATA(BÜYÜKHARF(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1))));"") "ALİ VELİ" yazmakta

Orijinal formülünüzde sadece B sütununa referans verdiğiniz için isim ve soyadı aynı sütundan çekiyorsunuz. Ancak soyadın tamamının büyük olması için isimle soyadın ayrı olması gerek.
Eğer ad ve soyadınız tek bir hücrede yer alıyorsa (örneğin ANA VERİ'!B$2:B$100 aralığında "Ali YILMAZ" şeklinde), formül bu ayrımı yapamadığı için istediğiniz sonucu vermemektedir.. Başka çözüm üretemedim.

Bu, formülü parçalayarak hatayı gidermek en kolay yoldur.

J9 hücresine şu formülü girin: =EĞERHATA(İNDİS('ANA VERİ'!B$9:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$9:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$9:B$100)-SATIR('ANA VERİ'!B$9)+1);SATIR(A1)));"")

sonrasındada

K9 hücresine şu basit formülü girin: =EĞERHATA(YAZIM.DÜZENİ(SOLDAN(J9;MBUL(" ";J9))) & " " & BÜYÜKHARF(SAĞDAN(J9;UZUNLUK(J9)-MBUL(" ";J9)));"")

Bu şekilde olmakta ancak dosyanıza bunu uyarlamak gerekiyor

muhasebeciyiz · 18 Ağustos 2025

Peki makro olurmu

turgayzeynep · 18 Ağustos 2025

muhasebeciyiz' Alıntı:
Peki makro olurmu

Olmaz hocam

Mdemir63 · 18 Ağustos 2025

Selam

Verilerin A sütununda olduğunu farzederek örneğin b sütununa aşağıdaki formülü yazıp deneyebilirsiniz

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN(A1;BUL("*";YERİNEKOY(A1;" ";"*";UZUNLUK(A1)-UZUNLUK(YERİNEKOY(A1;" ";""))))-1))&" "&BÜYÜKHARF(SAĞDAN(A1;UZUNLUK(A1)-BUL("*";YERİNEKOY(A1;" ";"*";UZUNLUK(A1)-UZUNLUK(YERİNEKOY(A1;" ";""))))));"")

turgayzeynep · 18 Ağustos 2025

Mdemir63' Alıntı:
Selam

Verilerin A sütununda olduğunu farzederek örneğin b sütununa aşağıdaki formülü yazıp deneyebilirsiniz

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN(A1;BUL("*";YERİNEKOY(A1;" ";"*";UZUNLUK(A1)-UZUNLUK(YERİNEKOY(A1;" ";""))))-1))&" "&BÜYÜKHARF(SAĞDAN(A1;UZUNLUK(A1)-BUL("*";YERİNEKOY(A1;" ";"*";UZUNLUK(A1)-UZUNLUK(YERİNEKOY(A1;" ";""))))));"")

=EĞERHATA(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$M$2:$M$100="Şahsın Kimlik ve Pasaport Numarası Olmadığından Kimlik Tespiti yapılamamıştır.";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A1)));"")

Hocam bu formülde ad soyad yazıyor buna uyarlayarak yapabilir miyiz

Mdemir63 · 18 Ağustos 2025

Bu formülü kullan

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN('ANA VERİ'!B9;BUL("*";YERİNEKOY('ANA VERİ'!B9;" ";"*";UZUNLUK('ANA VERİ'!B9)-UZUNLUK(YERİNEKOY('ANA VERİ'!B9;" ";""))))-1))&" "&BÜYÜKHARF(SAĞDAN('ANA VERİ'!B9;UZUNLUK('ANA VERİ'!B9)-BUL("*";YERİNEKOY('ANA VERİ'!B9;" ";"*";UZUNLUK('ANA VERİ'!B9)-UZUNLUK(YERİNEKOY('ANA VERİ'!B9;" ";""))))));"")

turgayzeynep · 18 Ağustos 2025

Mdemir63' Alıntı:

Bu formülü kullan

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN('ANA VERİ'!B9;BUL("*";YERİNEKOY('ANA VERİ'!B9;" ";"*";UZUNLUK('ANA VERİ'!B9)-UZUNLUK(YERİNEKOY('ANA VERİ'!B9;" ";""))))-1))&" "&BÜYÜKHARF(SAĞDAN('ANA VERİ'!B9;UZUNLUK('ANA VERİ'!B9)-BUL("*";YERİNEKOY('ANA VERİ'!B9;" ";"*";UZUNLUK('ANA VERİ'!B9)-UZUNLUK(YERİNEKOY('ANA VERİ'!B9;" ";""))))));"")

Istediğim bu şekilde değildi hocam

Mdemir63 · 18 Ağustos 2025

Mülakatları yapılamadı sayfasının B+ hücresine aşağıdaki formülü yazıp CTRL+SHİFT+ENTER ile

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2))))-1))&" "&BÜYÜKHARF(PARÇAAL(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2))))+1;50));"")

muhasebeciyiz · 18 Ağustos 2025

Alternatif deneyiniz

turgayzeynep · 18 Ağustos 2025

muhasebeciyiz' Alıntı:
Alternatif deneyiniz

Tamamdır hocam elinize sağlık Çok teşekkür ederim

muhasebeciyiz · 19 Ağustos 2025

Mdemir63' Alıntı:

Mülakatları yapılamadı sayfasının B+ hücresine aşağıdaki formülü yazıp CTRL+SHİFT+ENTER ile

Kod:

=EĞERHATA(YAZIM.DÜZENİ(SOLDAN(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2))))-1))&" "&BÜYÜKHARF(PARÇAAL(İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2)));BUL(" ";İNDİS('ANA VERİ'!B$2:B$100;KÜÇÜK(EĞER('ANA VERİ'!$I$2:$I$100="YAPILAMADI";SATIR('ANA VERİ'!B$2:B$100)-SATIR('ANA VERİ'!B$2)+1);SATIR(A2))))+1;50));"")

Lütfen Mdemir hocamızında çözümü deneyiniz. Çok şık bir çözüm sunmuş.Teşekkür ederiz kensisne

turgayzeynep · 19 Ağustos 2025

Ctrl shift enter yaptım ama isim gelmedi hocam

muhasebeciyiz · 19 Ağustos 2025

Gönderdiğim dosyamda Sayfa görünümünden normali seçiniz. H ve I sutunlarında formüller var o formülleride gerçek dosyanıza yazmanız gerekmektedir. veya ekteki dosyaı deneyiniz

alicimri · 19 Ağustos 2025

Alttaki KTF isimlerin ilk harfini soy isimin tamamını büyük harfe çeviriyor.
Türkçe karakter sorunundan kaçınmak için WORD'ün özelliğinden yararlandım.
Tek isim, iki isim (göbek isim) ayırmak için. isimsay diye bir değişken var, Tek isim için 1, çift isim için 2 değerini kullanın.

Kod:

Function ayar(ad, isimsay)
'On Error Resume Next
    Dim wordApp As Object
    Dim doc As Object
    Set wordApp = GetObject(class:="Word.Application")
        Set doc = wordApp.Documents.Add
        ad = Split(ad, " ")
        For i = 0 To UBound(ad)
        doc.Content.Text = ad(i)
        If i = 0 And isimsay = 1 Then
        doc.Content.Case = 2
       ElseIf i = 1 And isimsay = 1 Then
        doc.Content.Case = 1
        ElseIf i = 0 Or i = 1 And isimsay = 2 Then
        doc.Content.Case = 2
        Else
         doc.Content.Case = 1
        End If
       ayar = ayar & " " & doc.Content.Text
        ayar = Trim(ayar)
       Next
        doc.Close SaveChanges:=False
        wordApp.Visible = False
        Set doc = Nothing
        Set wordApp = Nothing
End Function

Ismin baş harfi büyük soy isim tamamen büyük olarak yazılması için

turgayzeynep

Misafir

muhasebeciyiz

turgayzeynep

Misafir

Ekli dosyalar

muhasebeciyiz

muhasebeciyiz

turgayzeynep

Misafir

Mdemir63

turgayzeynep

Misafir

Mdemir63

turgayzeynep

Misafir

Mdemir63

Ekli dosyalar

muhasebeciyiz

Ekli dosyalar

turgayzeynep

Misafir

muhasebeciyiz

turgayzeynep

Misafir

muhasebeciyiz

Ekli dosyalar

alicimri