Excel VBA Shapes Planilha 4 imagem e dados

 
Planilha Excel VBA Shapes 4 imagem e dados

Planilha Excel VBA Shapes 4 imagem e dados


Excel VBA Planilha Shapes 4 imagem e dados

Este procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application),  usando o Evento SelectionChange() da folha de planilha cria um shapes(imagem) dos dados retornados da lista de presidentes do Brasil, imagens no Diretório (Path Ativo). Bom exemplo para treinamentos com Excel VBA. bons Estudos.
'//============' baixe o exemplo de planilha no final da página.
 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Row > 1 And Target.Count = 1 Then
Application.EnableEvents = False
Application.ScreenUpdating = False
ChDir ActiveWorkbook.Path
[n2] = Target
[n3] = Target.Offset(0, 1)
[n4] = Target.Offset(0, 2)
[n5] = Target.Offset(0, 3)
[n6] = Target.Offset(0, 4)
On Error Resume Next
'-
Shapes('Presidentes').Delete
Presidentes = Target & '.jpg'
[N7].Select
Presidentes = ActiveSheet.Pictures.Insert(Presidentes).Select
Selection.Name = 'Presidentes'
Shapes('Presidentes').Left = ActiveCell.Left + 7
'--
Target.Select
Shapes('sbx_imagem').Left = ActiveCell.Offset(0, 5).Left + 5
Shapes('sbx_imagem').Top = ActiveCell.Top
Application.EnableEvents = True
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.
Compre pelo PagSeguro Compre pelo PayPal
excel-vba-treinamento-pagseguro
 Material Didático: Curso Excel VBA Expert 
excel vba treinamentos planilhas
 Baixe o exemplo de planilha contendo os macros acima:
icon Planilha Excel VBA Shapes 4 imagem e dados
<< Download Link: Verifique também a Caixa de Itens Excluídos  >>

    Deixe um comentário

    O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *