1
Posso usar essa macro para converter a primeira letra para UpperCase após a vírgula?
Eu uso essa pequena macro para converter a primeira letra para UpperCase em um intervalo específico: Sub TitleCase() Dim rng As Range, cell As Range Set rng = Range("D4:D999") For Each cell In rng If (cell.Value <> "") Then cell.Value = UCase(Left(cell.Value, 1)) & Right(cell.Value, Len(cell.Value) - 1) End If …