Cümle Durumuna Dönüştürme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub convertTextCase()
Dim Rng As Range
For Each Rng In Selection
If WorksheetFunction.IsText(Rng) Then
Rng.Value = UCase(Left(Rng, 1)) & LCase(Right(Rng, Len(Rng) - 1))
End If
Next Rng
End Sub
Açıklama
Excel hücrelerinizde karışık şekilde yazılmış metinler varsa ve bu metinleri bir cümle kalıbında düzenlemek istiyorsanız, üstteki kodu kullanabilirsiniz.Faydalanılması temennisiyle