Excel VBA Planilha objeto SpinButton altera data dia mês ano

9 de outubro de 2013 Prof. Expedito Marcondes - Escola SaberExcel VBA 0 Comentários

Planilha Excel VBA cursor 14 formata linha Coluna célula ativa

Planilha Excel VBA objeto SpinButton altera data dia mês ano

Excel VBA Planilha objeto SpinButton altera data dia mês ano

Este Macro e procedimentos do Aplicativo Microsoft Excel VBA, usando o objeto SpinButton, altera datas
aumentando ou diminuindo (Dias, Meses, Anos). (tecle Alt + F11) para visualizar os macros no
módulo de edição da folha de planilha
‘//===========’Escola Saberexcel VBA Estudos® – https://www.saberexcel.com.br =============’

Private Sub SpinButton1_SpinDown()
[B3] = [B3] – 1
[b6] = “Você alterou o ‘DIA’ – diminuindo o dia da data”
[b6].Font.ColorIndex = 3
End Sub
‘//===========
Private Sub SpinButton1_SpinUp()
[B3] = [B3] + 1
[b6] = “Você alterou o ‘DIA’ – aumentando a data”
[b6].Font.ColorIndex = 10
End Sub
‘//===========
Private Sub SpinButton2_SpinDown()
[B3] = CDate(Format(Evaluate(“DATE(Year(B3), Month(B3)-1, Day(B3))”), “dd/mm/yyyy”))
[b6] = “Você alterou o ‘MÊS’ – diminuindo o Mes da data”
[b6].Font.ColorIndex = 3
End Sub
‘//===========’
Private Sub SpinButton2_SpinUp()
[B3] = CDate(Format(Evaluate(“DATE(Year(B3), Month(B3)+1, Day(B3))”), “dd/mm/yyyy”))
[b6] = “Você alterou o ‘MÊS’ – aumentando o Mês da data”
[b6].Font.ColorIndex = 10
End Sub
‘//===========’
Private Sub SpinButton3_SpinDown()
[B3] = CDate(Format(Evaluate(“DATE(Year(B3)-1, Month(B3), Day(B3))”), “dd/mm/yyyy”))
[b6] = “Você alterou o ‘ANO’ – diminuindo o Ano da data”
[b6].Font.ColorIndex = 3
End Sub
‘//===========’
Private Sub SpinButton3_SpinUp()
[B3] = CDate(Format(Evaluate(“DATE(Year(B3)+1, Month(B3), Day(B3))”), “dd/mm/yyyy”))
[b6] = “Você alterou o ‘ANO’ – aumentando o Ano da data”
[b6].Font.ColorIndex = 10
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.