Ir ao conteúdo

Posts recomendados

Postado

exemplo.rar

Bom dia!

 

preciso fazer com que a imagem de fundo de uma frame mude conforme o valor presente em txt_licenciadora

coloquei os arquivos na mesma pagina, os nomes estão corretos, porém a imagem não é carregada.

Agradeço qualquer ajuda.

 

Dim Img As String
Dim jpg As String
Dim Caminho As String

 

Caminho = ThisWorkbook.Path & Application.PathSeparator
Img = Me.txt_licenciadora.Value 'Considerando que a textbox vai receber um valor que será o mesmo nome da imagem...
On Error GoTo Fim
Me.Frame.Picture = LoadPicture(Caminho & Img & jpg)
Fim:
Exit Sub

  • Solução
Postado

@Eri França  Como a variável jpg não tem atribuição LoadPicture só está recebendo o nome do arquivo sem a extensão. Você pode atribuir com ".jpg" ou concatenar extensão,

 

LoadPicture(Caminho & Img & ".jpg")

 

  • Obrigado 1
  • Membro VIP
Postado

@Eri França

 

Faltou você clicar em Curtir na resposta da Midori e também marcar o tópico como Resolvido (Na minha assinatura tem um link para uma instrução de como proceder).

 

[]s

  • Curtir 1

Crie uma conta ou entre para comentar

Você precisa ser um usuário para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...