Excel VBA Planilha Shapes 52 imagens validação status
ESCOLHENDO STATUS LISTA SUSPENSA E INSERINDO O SAHPES CORRESPONDENTE
Este procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), do Evento WorkSheet_Change da folha de código da folha de planilha, aprenderemos como escolher um critério em uma lista suspensa por ‘[Validação de Dados]’, e com base neste critério escolhido, o procedimento irá montar na celula da coluna seguinte o shapes (Imagem) do critério correspondente com base na prioridade isto é, com base no criterio da coluna “H”, será feito a busca na planilha auxiliar e inserido na coluna(i). Evento WorkSheet_Change() ocorrerá quando voce voce (escrever, deletar, alterar, em uma célula, em uma área limitada pelos códigos VBA)
‘//===================’
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 8 Then
‘– Deletar
For Each s In ActiveSheet.Shapes
If s.Type = 13 Then
If s.TopLeftCell.Address = Target.Offset(0, 1).Address Then
s.Delete
End If
End If
Next s
‘–
Sheets(“Auxiliar”).Shapes(Application.Substitute(Target, ” “, “”)).Copy
Target.Offset(0, 1).Select
ActiveSheet.Paste
Selection.ShapeRange.Left = ActiveCell.Left + 9
Selection.ShapeRange.Top = ActiveCell.Top + 5
Target.Select
End If
End Sub
Escola SaberExcel VBA Estudos®
Treinamento com Macros, Fórmulas e Funções
‘//===================’ OCULTAR /MOSTRAR SHAPES(AUTOFORMA) MACROS
‘neste exercício vamos aprender como ocultar o shapes
‘e mudar o caption do (Botão Shapes(Autoforma))
Sub sbx_mudar_caption_btn()
If Saber1.Shapes(“sbx_01”).Visible = True Then
Saber1.Shapes(“sbx_01”).Visible = False
Saber1.Shapes(“btnSABER”).TextFrame.Characters.Text = “Shapes Macros – MOSTRAR!”
Else
Saber1.Shapes(“sbx_01”).Visible = True
Saber1.Shapes(“btnSABER”).TextFrame.Characters.Text = “OCULTAR – Shapes Macros”
End If
End Sub
‘veja os códigos na folha de código da folha de planiha
‘no projeto vba (Saber1) clique duas vezes.
‘//===================’
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 |
 |
verifique a caixa de itens excluídos, caso não esteja na caixa de entrada.
 Baixe o exemplo de planilha contendo os macros acima: |
 Excel VBA Planilha Shapes 52 imagens validação status |
Excel VBA Planilha Shapes 52 imagens validação status
