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 |
|
|
|
|
|
|
Material Didático: Curso Excel VBA Expert |
|
|
|
Baixe o exemplo de planilha contendo os macros acima: |
Planilha Excel VBA Shapes 4 imagem e dados |
<< Download Link: Verifique também a Caixa de Itens Excluídos >> |
|
|