Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 VBA PARA BUSCAR LISTA DE FOTOS EM PASTA

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
Cleyton_Vieira



Mensagens : 2
Data de inscrição : 24/05/2015

MensagemAssunto: VBA PARA BUSCAR LISTA DE FOTOS EM PASTA   Dom Maio 24, 2015 2:18 am

Boa noite pessoal.

Não sei muito de VBA e ainda vou fazer um curso mas vou tentando aprender de curioso. Tenho um script para busca as fotos de uma lista de produtos. Mas quando outra pessoa abre o arquivo, as fotos não aparecem. O arquivo fica na rede e a pasta das fotos também (não na mesma pasta). Pesquisando na internet achei uma pessoa falando que para incorporar as fotos ao arquivo precisa usar o comando AddPicture. Tentei alterar o meu script mas não consegui, segue o meu script:

Sub InsertPic()
Dim pic As String 'ENDEREÇO
Dim myPicture As Picture
Dim rng As Range 'RANGE PARA ITERAR


Set rng = Range("M5") '1A CELULA DA FOTA

Do While rng.Offset(0, -Cool <> ""

pic = "C:\FOTOS_INTERNET\" & rng.Offset(0, -Cool & "_productr_1.jpg"
If Dir(pic) = "" Then GoTo prox 'VERIFICA SE EXISTE
Set myPicture = ActiveSheet.Pictures.Insert(pic)
With myPicture
.ShapeRange.LockAspectRatio = msoFalse
.Width = rng.Width - 1
.Height = rng.Height - 1
.Top = Rows(rng.Row).Top
.Left = Columns(rng.Column).Left
End With
prox: Set rng = rng.Offset(1, 0)
Loop

End Sub


Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: VBA PARA BUSCAR LISTA DE FOTOS EM PASTA   Ter Maio 26, 2015 7:42 pm

Boa tarde!!!

Favor indicar as postagens cruzadas!
http://www.planilhando.com.br/forum/viewtopic.php?f=10&t=15943&p=81966

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Cleyton_Vieira



Mensagens : 2
Data de inscrição : 24/05/2015

MensagemAssunto: Re: VBA PARA BUSCAR LISTA DE FOTOS EM PASTA   Qui Maio 28, 2015 3:36 pm

Bom dia alexandrevba.

Esse link é uma postagem minha em outro forum, fiz alguma coisa errada? Desculpa, pensava que era um forum diferente.

Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: VBA PARA BUSCAR LISTA DE FOTOS EM PASTA   Qui Maio 28, 2015 5:35 pm

Bom dia!!

Apenas é recomendado, quando postar uma mesma dúvida em fóruns diferentes, indicar com um link do post onde foi postado as nos outros fóruns.

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: VBA PARA BUSCAR LISTA DE FOTOS EM PASTA   Hoje à(s) 10:58 am

Voltar ao Topo Ir em baixo
 
VBA PARA BUSCAR LISTA DE FOTOS EM PASTA
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Transferindo arquivos para dentro da pasta JAVA
» Lista de sites com Efeitos Sonoros
» Vou perder , contatos , aplicativos , jogos , fotos , músicas e etc quando instalar o Bada 2.0 ?
» SCRIPT PARA LIMPAR LISTA NO DHCP SERVER EM LEASES
» Plaquinha em cima do nome

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: