Fóruns
Microsoft Excel - 2...
Formulários
Ajuda com erro 424.
 
Notifications
Clear all

Ajuda com erro 424.

 
Formulários
7 Posts
3 Usuários
0 Reactions
1,254 Visualizações
RSS
cthulhuu
 cthulhuu
(@cthulhuu)
Posts: 16
Active Member
Topic starter
 

Estou tendo um problema com o erro 424 em um formulário do excel. É o segundo formulário que faço, estava tudo okay antes e do nada começou o erro.
Quando eu troco 

Private Sub UserForm_Initialize()

por 

Private Sub UserForm_Click()

.

A biblioteca MICROSOFT DAO 3.6 OBJECT LYBRARY está ativada e ainda assim dá esse erro. Aposto que deve ser um errinho bobo, mas estou no aguardo da ajuda de vocês.

Att

Cthulhuu.

frmcad.xlsm
 
Postado : 30/05/2014 6:48 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Seu metodo está incorreto.

Private Sub UserForm_Initialize()
    'txtFuncionario.Value = ""
    'txtCodigo.Value = ""
    'txtSalario.Value = ""
    'txtCarga.Value = ""
    'txtFuncao.Value = ""
    'txtAdmi.Value = ""
    'txtRemuneracao.Value = ""
    
    With cboRemuneracao
        .AddItem "Sim"
        .AddItem "Não"
    End With
    
    'cboDepartment.Value = ""
    'chkQuinqueno = False
    'chkInsalubridade = False
    'chkPericulosidade = False
    'chkProdutividade = False
    chkAnuenio.Visible = False '<-Correto
    'chkTrienio = False
    'chkGratificacao = False
    'chkAssiduidade = False
    'chkInsentivo = False
    'chkPTS = False
    'chkPremioTarefa = False
    'txtFuncionario.SetFocus

       
End Sub

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

 
Postado : 30/05/2014 7:11 am
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Bom Dia!

Você está tentando carregar, na procedure Initialize do formulário, o objeto "txtAdmi.Value" . Esse objeto não existe no seu formulário. Pelo menos com esse nome.

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 : 30/05/2014 7:13 am
cthulhuu
 cthulhuu
(@cthulhuu)
Posts: 16
Active Member
Topic starter
 

Obrigado, amigos, foram de excelente ajuda. Onde marco como resolvido?

 
Postado : 30/05/2014 4:07 pm
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

Na parte superior direita da mensagem existem botões, ícones, etc. Perto do botão EDITAR existe um pequeno ícone com uma marca de verificação verde. Clique nela.

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 : 30/05/2014 4:38 pm
cthulhuu
 cthulhuu
(@cthulhuu)
Posts: 16
Active Member
Topic starter
 

Porque tem que colocar o ' nas linhas do código alexandrevba?

 
Postado : 30/05/2014 10:58 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Bom dia!!

Eu coloquei o apostrofe - > ', porque você tem que editar o restante da rotina, eu fiz um como exemplo, faça para o restante.

Caso não tenha o apostrofe vai gerar erro.

Att

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

 
Postado : 31/05/2014 6:14 am
Forum Jump:
  Tópico Anterior
Próximo Tópico