Notifications
Clear all

Salvar valor no ..txt e iniciar form com valores do .txt

8 Posts
2 Usuários
0 Reactions
1,840 Visualizações
willianrc
(@willianrc)
Posts: 0
Trusted Member
Topic starter
 

Ola galera, blz ? Tenho um form e alguém poderia me dar uma luz? Gostaria de inserir valor do OptionButton selecionado em um arquivo .txt , e depois ao iniciar o formulário novamente carregar os valores selecionados anteriormente nos OptionButtons.

Segue meu arquivo em anexo...

 
Postado : 05/04/2018 8:12 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

willianrc,

Bom dia!

Apesar de dá pra fazer com arquivo txt, isso envolve uma complexidade um pouco maior. Todavia, creio que o que você quer é que sempre que carregar o formulário ele já apareça com os botões de opção que foram selecionados da última vez que o formulário foi aberto. Sendo assim, você pode utilizar as células da própria planilha para configurar isso.

No arquivo abaixo, fiz da seguinte forma: Quando se clica no primeiro botão de comando, os valores correspondentes aos optionbutton 1 e 2 são inseridos na célula AA1 e quando se clica no segundo botão de comando, os valores correspondentes aos optionbutton 3 e 4 são inseridos na célula AA2. Quando se carrega o formulário, o mesmo vai lá nessas células e verifica o que está contido nelas, atribuindo assim os valores da última escolha do usuário para os optionbuttons.

Note que usei as células AA1 e AA2 e ocultei toda a coluna AA, para que numa possível impressão não seja impressa essa coluna. Também utilizei a fonte branca nessas duas células para evitar o uso por curiosos. Obviamente você pode usar quaisquer células da sua planilha. Basta alterar no código.

Veja se lhe atende assim.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 05/04/2018 9:01 am
willianrc
(@willianrc)
Posts: 0
Trusted Member
Topic starter
 

Oi wagner, tentei aprimorar meu código, acredito que seja neste caminho, ainda esta dando erro!

Segue anexo...

 
Postado : 05/04/2018 9:57 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Acho que seu arquivo está corrompido. Não extrai aqui.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 05/04/2018 10:33 am
willianrc
(@willianrc)
Posts: 0
Trusted Member
Topic starter
 

Tentei melhorar um pouco, consegui salvar o valor no .txt , mas ta salvando linha pós-linha ( o que eu não queria kkk ), mas ainda nao sei como fazer pra carregar o form com o OptionButton respectivo.

Segue anexo...

 
Postado : 05/04/2018 10:42 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

willianrc,

Bom dia!

Tudo bem mas... porque tem que ser no txt?

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 06/04/2018 5:59 am
willianrc
(@willianrc)
Posts: 0
Trusted Member
Topic starter
 

Opa, tudo bem gracas a Deus, eh porque estou desenvolvendo um sisteminha que utiliza os arquivos de configuracao em txt dentro de uma pasta criptografada.

 
Postado : 06/04/2018 7:20 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Entendi. Mas... como já havia lhe dito antes: acho o uso de arquivos txt bem mais complexo do que usar o próprio arquivo Excel em que se está trabalhando. Além do mais, usar arquivo txt, mesmo criptografado, é muito fácil de ser usado. Fragiliza a segurança dos dados.

Você pode utilizar, por exemplo, uma das abas do seu arquivo Excel, proteger com senha, deixar as letras todas na cora Branca, células, linhas e/ou colunas ocultas e ocultar a aba através do próprio VBA. Dificilmente alguém consegue quebrar tantas barreiras.

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 06/04/2018 7:51 am