Converter a 1ª letra em maiúscula
21/05/2010 16:55
Vamos supor que você tem um texto todo ele em minusculo, e precisa que sómente as primeiras letras fiquem maiusculas.
use ocódigo abaixo dentro de um módulo.
Observação selecione a área desejada, ou as palavras desejadas.
Sub Converte_Primeira_Maiuscula()
Dim C As Range
For Each C In Selection
On Error Resume Next
C = StrConv(C, vbProperCase)
Next C
End Sub