Boa tarde, valzito
Opa, legal que lhe ajudei "em partes"... em relação ao outro Tópico espero que tenha solucionado ..
Editado às 20:54hs - na frase abaixo "... para quqe continue após fechar o Userform2,..." está
incorreto, o correto seria "UserForm1" e não "UserForm2".
Agora para salvar as modificações dentro do "Frame" para que continue após fechar o UserForm2,
baixe do link (a seguir) o arquivo exemplo "Exemplo Solucao 2 Configuracao LB.Zip" que contém
a solução:
https://www.sendspace.com/file/xbril7
Alguns adendos, criei uma planilha (sheet) de nome "salvapropriedades" que irá armazenar o
conteúdo dos combobox; é uma forma que encontrei para "fixar" as ações referente ao Botão
"Salvar do UserForm2 ...
Deixei a Planilha (Sheet) "salvapropriedades" invisível, com isso o usuário não terá como saber se
existe essa planilha, assim não poderá fazer modificações acidentais ou intencionais, somente
poderá alterar no botão "configurações" dentro do UserForm2; caso tu queiras abrir essa
planilha é só comentar as linhas (que encontra-se no UserForm2 e UserForm1) abaixo:
Plan3.Visible = xlSheetVisible
Plan3.Visible = xlSheetVeryHidden
E para voltar como era é só descomentar estas linhas acima novamente (não esquecendo
de nenhuma )...
Outra informação é sobre a cor da fonte (CINZA - BOTAO) que coloquei uma msgbox para
o usuário não poder utilizá-la (somente utilizável para cor de fundo dos commandbutton);
pois achei que poderia dar alguns problemas de visualização, caso queira utilizar esta
cor da fonte é só comentar todo o código dentro do :
Private Sub ComboBox2_Change()
Verifique se é assim que queria ...
Qualquer coisa estamos aqui para ajudá-lo
Aguardando sua resposta e seu Feed Back (é muito importante)... se foi útil, não esqueça de clicar na "mãozinha"
LaerteB
Postado : 25/11/2019 11:47 am