LABEL FIXAR VALOR

Visual Basic for Aplication e macros no Excel.
Regras do fórum
Sua dúvida foi respondida? Marque como RESOLVIDO em seus tópicos, usando o botão com marca verde. Imagem

LABEL FIXAR VALOR

Mensagempor willianrc » Dom Fev 10, 2019 9:30 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
Você não está autorizado a ver ou baixar esse anexo.
willianrc
Membro
Membro
 
Mensagens: 53
Registrado em: Qua Nov 23, 2016 11:22 am
Has thanked: 16 times
Have thanks: 1 time

{ SO_SELECT }

Re: LABEL FIXAR VALOR

Mensagempor LaerteB » Ter Fev 12, 2019 1:32 pm

Boa tarde, willianrc

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".

LaerteB :)
"Se foi útil para ti ;), por gentileza clicar na mãozinha ao lado do botão citar, obrigado ;) ."
LaerteB
Membro
Membro
 
Mensagens: 35
Registrado em: Seg Fev 26, 2018 4:52 pm
Has thanked: 12 times
Have thanks: 11 times


Voltar para VBA & Macros

Quem está online

Usuários navegando neste fórum: Nenhum usuário registrado e 2 visitantes

cron