COMO POSSO CRIAR UMA MACRO QUE CRIE UMA FUNÇÃO QUE QUE CONVERTE AS PRIMEIRAS LETRAS DAS PALAVRAS EM MAIÚSCULA, JÁ QUE NO EXCEL TEM O PROPERCASE, O LIBRE SÓ TEM UCASE E O LCASE
[Sub Propercase()
' Loop to cycle through each cell in the specified range.
For Each x In Range("A11:A130")
' There is not a Proper function in Visual Basic for Applications.
' So, you must use the worksheet function in the following form:
x.Value = WorksheetFunction.Proper(x.Value)
Next
End Sub]