VBA Excel - Tornando tudo maiúsculo, minúsculo, primeira letra maiúscula - Macro

| Blog Office VBA | Blog Excel | Blog Access |

De fato não sou muito adepto na utilização do termo macro para as planilhas. Mas reconheço que a utilização destas conduzem milhões de usuários no mundo a conhecerem o VBA. Com isso em mente, compartilho as macros a seguir. Estas alteram as palavras contidas nas planilhas para Maiúsculas, Minúsculas, ou colocam a primeira letra como Maiúsculas...Divirtam-se! 

Sub nMaiuscula()

Dim C As Range

For Each C In Selection

Select Case C

Case Is = C

Let C.Value = UCase(C.Value)

End Select

Next

End Sub

Sub nMinuscula()

Dim C As Range

For Each C In Selection

Select Case C

Case Is = C

Let C.Value = LCase(C.Value)

End Select

Next

End Sub

Sub nCaptalize()

For Each C In Selection

Let C.Value = StrConv(C.Value, vbProperCase)

Next

End Sub

COMO UTILIZAR

1) Abra sua planilha

2) Acesse o painel de aplicações do VBA combinando ALT F11

3) Recorte e cole a macro.

4) Selecione as linas e colunas que você quer aplicar a macro

5) Execute a macro.

Referências: 

Tags: VBA, Excel, maiúsculo, minúsculo, Capitalizar, macro