Excel VBA Planilha Conversão letras maiúsculas minúsculas próprias
Este Macros e procedimentos do Aplicativo Microsoft Excel VBA, cria uma barra de menu personalizada que chama determinados macros, converte letras MAIÚSCULAS, minúsculas e Próprias(Primeira Maiúsculas). observe que de repente , você tem que usar um desses macros a vezes para transformar todo conteúdo de uma determinada coluna ou área de células em minúsculas, poderá usar um desses macros. não é?, copie e as guarde para um uso posterior,
ou já vai incrementando sua coleção de macros.
Fique com Deus, Expedito Marcondes.
‘//=============’
Sub auto_open()
Dim Barra As CommandBar
Dim Botao As CommandBarControl
On Error Resume Next
CommandBars(“sbx_converte_letras”).Delete
Set Barra = CommandBars.Add(Name:=”sbx_converte_letras”)
Barra.Visible = True
Set Botao = CommandBars(“sbx_converte_letras”).Controls.Add(Type:=msoControlButton)
Botao.BeginGroup = True
Botao.Style = msoButtonCaption
Botao.OnAction = “sbx_maiusculas”
Botao.Caption = “LETRAS MAIUSCULAS”
Set Botao = CommandBars(“sbx_converte_letras”).Controls.Add(Type:=msoControlButton)
Botao.BeginGroup = True
Botao.Style = msoButtonCaption
Botao.OnAction = “sbx_minusculas”
Botao.Caption = “letras minusculas”
Set Botao = CommandBars(“sbx_converte_letras”).Controls.Add(Type:=msoControlButton)
Botao.BeginGroup = True
Botao.Style = msoButtonCaption
Botao.OnAction = “sbx_proprios”
Botao.Caption = “Letras Nomes Próprios”
End Sub
Sub sbx_maiusculas()
For Each c In Selection
If Not c.HasFormula Then
c.Value = UCase(c.Value)
End If
Next c
End Sub
Sub sbx_minusculas()
For Each c In Selection
If Not c.HasFormula Then
c.Value = LCase(c.Value)
End If
Next c
End Sub
Sub sbx_proprios()
For Each c In Selection
If Not c.HasFormula Then
c.Value = Application.Proper(c.Value)
End If
Next c
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola SaberExcel VBA Estudos® – Treinamentos com Macros, Fórmulas e Funções.
Compre pelo PagSeguro | Compre pelo PayPal | |
Material Didático: Curso Excel VBA Expert |
Baixe o exemplo de planilha contendo os macros acima: |
Planilhas Excel VBA Conversão letras maiúsculas minúsculas próprias |
<< Download Link: verifique também a caixa de itens excluídos >> |