Büyük Küçük Harf Fonksiyonlarını Kullanma

Büyük Küçük Harf Fonksiyonlarını Kullanma, VBA ile yazılı olan harflerin durumlarına göre işlem yapmayı öğreten hazır kodlar içermektedir.

Büyük Küçük Harf Fonksiyonlarını Kullanma – Hazır Kod

Sub HarfDönüştür()
    Dim rng As Range
    Dim secim As String
 
    secim = InputBox("Metni nasıl dönüştürmek istersiniz? Büyük Harf: 'B', Küçük Harf: 'K', Baş Harf Büyük: 'BH'", "Harf Dönüşümü")
 
    If secim = "" Then Exit Sub
 
    For Each rng In Selection
        If Not IsEmpty(rng) Then
            Select Case UCase(secim)
                Case "B"
                    rng.Value = UCase(rng.Value)
                Case "K"
                    rng.Value = LCase(rng.Value)
                Case "BH"
                    rng.Value = Application.WorksheetFunction.Proper(rng.Value)
                Case Else
                    MsgBox "Geçersiz seçim yaptınız.", vbExclamation, "Hata"
                    Exit Sub
            End Select
        End If
    Next rng
 
    MsgBox "Dönüşüm tamamlandı.", vbInformation, "Tamam"
End Sub

Açıklama:

Excel, metinlerinizi düzenlemede etkili araçlar sunmaktadır. Ancak büyük ve küçük harf dönüşümleri için özel makrolar daha esnek çözümler sağlamaktadır. Yukarıdaki makro, seçilen hücrelerdeki metinleri büyük harfe, küçük harfe veya baş harflerini büyük yapacak şekilde dönüştürmektedir.

Kullanım Adımları

• Makroyu Ekleyin: Excel‘de Geliştirici > Visual Basic yoluyla makroyu yapıştırın.
• Makroyu Çalıştırın: Alt+F8 tuşlarına basarak "HarfDönüştür" makrosunu seçin ve çalıştırın.
• Seçim Yapın: "Büyük Harf" için ‘B’, "Küçük Harf" için ‘K’, "Baş Harf Büyük" için ‘BH’ yazın.
• Sonucu Görün: Seçili hücrelerdeki metinler, seçiminize uygun olarak dönüştürülecektir.

Avantajları

• Esneklik: Büyük, küçük veya baş harf dönüşümleri arasında seçim yapılmasını sağlamaktadır.
• Hızlı Düzenleme: Büyük veri setlerindeki metin düzenlemelerini kolaylaştırmaktadır.
• Kullanıcı Dostu: Kullanıcı girişi ile kontrol edilebilen bir yapıya sahiptir.

Yararlanılması temennisiyle.