Esqueceu sua senha? Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

LABEL FIXAR VALOR

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
Avatar do usuário
willianrc
Colaborador
Colaborador
Mensagens: 37
Registrado em: Qua Nov 23, 2016 7:28 am

LABEL FIXAR VALOR

Mensagem por willianrc » Seg Fev 11, 2019 1:51 pm

Ola,
Alguem sabe como deixar o valor na label?, mesmo quando fecha e abre o formulario o valor fique la?
Detalhe: Nao pode usar celulas

Código: Selecionar todos

Private Sub CommandButton1_Click()

Dim NewLabel As Object
Dim myValue As Variant

myValue = InputBox("Digite um valor")

Set NewLabel = Me.Controls.Add("Forms.Label.1")
With NewLabel
  .Tag = myValue 'Usar no lugar de "Name"
  .Caption = .Tag 'Name inicia do Label2 pois existe o Label1 no formulário
  .Top = 50
  .Left = 50
End With
ThisWorkbook.Save
End Sub



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
LaerteB
Colaborador
Colaborador
Mensagens: 82
Registrado em: Qui Out 19, 2017 8:20 am

Re: LABEL FIXAR VALOR

Mensagem por LaerteB » Ter Fev 12, 2019 2:53 pm

Boa tarde, willianrc

Veja a solução que dei no outro Fórum (que tu abriste com o mesmo assunto), segue abaixo:

"Não vi o seu arquivo, mas se for "somente" para fechar o formulário que contenha a Label e que os dados
permaneçam quando voltar a abri-lo, use este exemplo: "UserForm1.Hide"; desta forma o formulário ficará
oculto e todos os dados contidos em textbox ou nessa Label ficarão "intactos".. quando retornar ao formulário
os seus dados estarão lá.. :)

Espero que isto o ajude ;)

Veja as regras sobre o Título ou conteúdo dos Textos em "Caixa Alta". "

Dica: Você criou um Tópico com o mesmo assunto em outro Fórum.. quando lançar a mesma dúvida, você
poderá informar com os Links deles para que os integrantes deste(s) Fórum(ns) que tenham perguntas
semelhantes possam acompanhar ...
(e aqueles que querem ajudar possam verificar se já foi solucionado, para não "amarrá-los" depois que
foi resolvido), fazendo isso em todos os Fóruns que tenha aberto; se tiver a(s) solução(ões) em algum
deles coloque o link desta solução nos outros :)...

LaerteB :)


Se a dica foi útil, clique no Joinha do lado direito da mensagem (acima).
Se tiver tirado todas as suas dúvidas, por gentileza atribuir ao título do tópico: [RESOLVIDO].

Responder