Botão De Opção Obri...
 
Notifications
Clear all

Botão De Opção Obrigatório

4 Posts
3 Usuários
0 Reactions
1,298 Visualizações
 crcj
(@crcj)
Posts: 0
New Member
Topic starter
 

Boa tarde a todos.
Estou precisando de uma grande ajuda, estou fazendo uma planilha de pedido de compra, consegui configurar alguns campos obrigatórios antes de gravar a planilha ( segue um exemplo ), mas tenho alguns botões de opção que não consigo fazer isso. Alguém pode me ajudar.

código que uso para serem obrigatórios na: EstaPasta_de_trabalho:

'NÃO GRAVA SEM OS CAMPOS ESTAREM PREENCHIDOS
Private Sub Workbook_BeforeSave(ByVal SaveAsUi As Boolean, Cancel As Boolean)
   'campo produto
   If Range("B15") = "" Then
   MsgBox "PRODUTO" & vbCrLf & vbCrLf & "Você Tem Que Inserir No Mínimo Um Produto Antes De Gravar. ", vbCritical, " Campo Obrigatório "
    Range("B15").Select
    Cancel = True
    Exit Sub
    End If
End Sub
 
Postado : 08/02/2017 1:13 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

crcj,

Boa tarde!

Anexe um exemplo do seu arquivo aqui mesmo no fórum e explique melhor por gentileza.

 
Postado : 08/02/2017 1:20 pm
 crcj
(@crcj)
Posts: 0
New Member
Topic starter
 

Wagner, boa tarde.
Segue anexo, a senha para desbloquear a planilha é: 872487

 
Postado : 08/02/2017 1:37 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite crcj

Seja bem-vindo ao fórum!

Movi teu tópico para VBA & Macros que é o assunto da tua dúvida.

Como você é novato, para facilitar a tua participação no fórum, sugiro tomar conhecimento do conteúdo dos links abaixo:
viewtopic.php?f=7&t=203
viewtopic.php?f=7&t=7903
viewtopic.php?f=7&t=3841
viewtopic.php?f=7&t=16757
viewtopic.php?f=7&t=12600
viewtopic.php?f=7&t=3371

[]s

 
Postado : 08/02/2017 4:27 pm