Excel'de isimlerden baş harfleri nasıl çıkarabilirsiniz?
Müşteri kayıtlarıyla çalışırken veya posta birleştirme yaparken, verilen bir isimden baş harfleri almak size faydalı olabilir, örneğin Hal Greer için HG. Bu nedenle, burada Excel'deki isim listesinden baş harfleri hızlıca çıkarmak için bazı ipuçları sunuyorum.
Excel'de formül kullanarak baş harfleri çıkarın
Excel'de Tanımlanmış İşlev kullanarak baş harfleri çıkarın
Excel'de formül kullanarak baş harfleri çıkarın
İlk yöntem, Microsoft Excel'de isimlerden baş harfleri çıkarmak için formül kullanmaktır.
Boş bir hücre seçin, örneğin Hücre C2, bu formülü yazın =SOL(A2)&EĞER(SAYI(MİKTAŞ(" ",A2)),ORTA(A2,MİKTAŞ(" ",A2)+1,1),"")&EĞER(SAYI(MİKTAŞ(" ",A2,MİKTAŞ(" ",A2)+1)),ORTA(A2,MİKTAŞ(" ",A2,MİKTAŞ(" ",A2)+1)+1,1),"") (A2, isim listenizin ilk hücresidir), Enter tuşuna basın, ardından doldurma tutamacını sürükleyerek aralığı doldurun. Artık her bir ismin baş harflerinin isim listesinden çıkarıldığını görüyorsunuz.
Excel'de Tanımlanmış İşlev kullanarak baş harfleri çıkarın
Formüllerin yanı sıra, baş harfleri Microsoft Excel'de belirli isimlerden kolayca çıkarmak için Tanımlanmış İşlev'i kullanabilirsiniz.
1. Seçmek istediğiniz sütunun bir hücresini seçin ve Alt + F11'e basarak Microsoft Visual Basic for Applications penceresini açın.
2. Açılan pencerede, Ekle > Modül'e tıklayın, ardından aşağıdaki VBA kodunu modüle yapıştırın.
VBA: İsimlerden baş harfleri çıkar
Function FirstCharacters(pWorkRng As Range) As String
'Updateby20140514
Dim arr As Variant
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
arr = VBA.Split(Trim(xValue))
For i = 0 To UBound(arr)
OutValue = OutValue & VBA.Left(arr(i), 1) & "."
Next
FirstCharacters = OutValue
End Function
3. Kodu kaydedin ve pencereyi kapatın, boş bir hücre seçin ve bu formülü yazın = FirstCharacters(A2), ardından Enter tuşuna basın ve doldurma tutamacını sürükleyerek istediğiniz aralığı doldurun. Bundan sonra, her bir ismin baş harflerinin çıkarıldığını görebilirsiniz.
İpucu: Yukarıdaki VBA'da baş harflerin ayırıcılarını "." ihtiyacınıza göre değiştirebilirsiniz.
İlgili Makaleler:
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar. En çok ihtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
- Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!