Notifications
Clear all

MsgBox com botões de seleção

9 Posts
3 Usuários
0 Reactions
1,394 Visualizações
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Bom Dia, Pessoal!

Existe uma forma de criar uma MsgBox com dois botões, como o comando vbYesNo, mas que eu possa escrever o texto nos botões. Preciso questionar se o usuário quer atualizar somente o DIA ou MÊS inteiro.

Seria mais ou menos isso que preciso: MsgBox("Você deseja Atualizar um DIA ou MÊS inteiro?") Abriria a tela combox com um botão tendo o texto DIA e outro botão ao lado tendo o texto MÊS.

 
Postado : 23/02/2016 4:21 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Kaleo_rs,

Bom dia!

Você deve criar sua Msgbox de forma personalizada através de um formulário, como no exemplo a seguir.

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 : 23/02/2016 6:09 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Crie um Userform com os botões que deseja!!!

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/02/2016 6:10 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Da forma que colocou, a dica do Wagner é o ideal, trabalhar com o userform nos dará maiores opções de programação, customização entre outras.
Então só para mostrar uma possibilidade de customização nos Botões de um controle msgbox de uma olhada no link abaixo e faça download do arquivo de exemplo.

Personalizar texto em Botão - MsgBox
http://www.tomasvasquez.com.br/forum/vi ... f=17&t=950

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/02/2016 7:15 am
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Wagner Morel

Seu exemplo atende ao que eu estou precisando, porém ao clicar em um dos botões do formulário não retorna para MACRO que o executou.

Ao clicar num botão na planilha, esse botão está associado a uma MACRO, nela eu reexibo uma aba que está oculta e a desprotejo. Eu preciso saber como fazer o formulário voltar a MACRO que o executou para dar sequencia a outras condiçõeS.

Segue em anexo arquivo modelo.

 
Postado : 23/02/2016 8:17 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Kaleo_rs,

Veja se é 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 : 23/02/2016 8:52 am
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Wagner Morel

Infelizmente não. Ao usar o formulário, seja no inicio ou no meio da especificação de uma MACRO que executa o formulário, a MACRO é interrompida neste ponto, ela não segue até o fim do fluxo de execução da MACRO ao finalizar o formulário. Ao chamar o formulário ele interrompe o resto dos comandos que existem na MACRO depois do formulário. O que eu preciso é que a MACRO não seja interrompida.

 
Postado : 23/02/2016 9:52 am
Kaleo_rs
(@kaleo_rs)
Posts: 0
Trusted Member
Topic starter
 

Wagner Morel

Acho que não vai rolar da forma que eu quero. Então, adaptei para os botões do formulário chamarem a MACRO.

A duvida é como faço para limpar o formulário da tela e a MACRO ficar executando. O comando END limpa, mas não executa a MACRO se ele for colocado antes. Se o comando for colocado depois da MACRO o formulário ficara ativo até o fim da execução da MACRO.

Private Sub Botao_Dia_Click()
Call Planilha_Fluxo_Atual("D")
End
End Sub

 
Postado : 23/02/2016 10:29 am
Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

OK.

Já tentou usar a função HIDE?

Userform1.Hide[code][/code]

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 : 23/02/2016 11:10 am