Planilha Excel VBA cursor 15 formata linha Coluna célula ativa2
Planilha Excel VBA cursor 4 linha e coluna célula ativa
Este procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), utilizando o evento WorkSheet_SelectionChange da folha de planilha, formatando linhas e colunas dentro de uma área predeterminada pelo código:
Set vArea = Range(“d6:p24”)
If Not Intersect(vArea, SaberExcel) Is Nothing Then
‘//============’ EVENTO SELECTION CHANGE NA FOLHA DE CÓDIGO DA FOLHA DE PLANILHA
Private Sub Worksheet_SelectionChange(ByVal SaberExcel As Range)
Set vArea = Range(“d6:p24”)
If Me.CheckBox1 = True Then
If Not Intersect(vArea, SaberExcel) Is Nothing Then
vArea.FormatConditions.Delete
vArea.Font.ColorIndex = 1
If SaberExcel.Count = 1 Then
Union(Intersect(SaberExcel.EntireRow, vArea), Intersect(SaberExcel.EntireColumn, vArea)).FormatConditions.Add Type:=xlExpression, Formula1:=”VERDADEIRO”
Union(Intersect(SaberExcel.EntireRow, vArea), Intersect(SaberExcel.EntireColumn, vArea)).FormatConditions(1).Interior.ColorIndex = 36
SaberExcel.FormatConditions(1).Font.Bold = True
SaberExcel.Font.ColorIndex = 3
End If
End If
Else
vArea.FormatConditions.Delete
vArea.Font.ColorIndex = 1
End If
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.
PROMOÇÃO ESPECIAL – EXCEL VBA Adquirir Todo Material Didático Escola SaberExcel VBA Estudos
Baixe o exemplo de planilha contendo os macros acima:
Planilha Excel VBA cursor 5 formata linha coluna célula ativa
